| Description |
The PromptForFileName function presents a dialog to the user allowing navigation to, and selection of a file.
If the user presses OK the FileName variable is updated with the full drive/path/filename value for the selected file, and the return value is True.
If the user presses Cancel, no updates are done, and the return value is False.
The remaining parameters are all optional (although parameters used on the right mandate use of the preceding parameters) :
Filter
Used to limit the types of file displayed. The format is as follows :
'Description|filter{|...}'
For example, to show only .txt and .pas files :
Text files (*.txt)|*.txt|Delphi files (*.pas)|*.pas
DefaultExt
Used to define an extension to add to a new file name (if SaveDialog is True).
Title
Used to give a title to the dialog.
InitialDir
Positions the dialog at a given directory. For example :
'C:Program Files'
SaveDialog
Determines whether a new file can be selected for saving.
|
|
| Related commands |
| InputBox |
|
Display a dialog that asks for user text input, with default |
| InputQuery |
|
Display a dialog that asks for user text input |
| ShowMessage |
|
Display a string in a simple dialog with an OK button |
| ShowMessageFmt |
|
Display formatted data in a simple dialog with an OK button |
| ShowMessagePos |
|
Display a string in a simple dialog at a given screen position |
| TOpenDialog |
|
Displays a file selection dialog |
| TSaveDialog |
|
Displays a dialog for selecting a save file name |
|
|
|
| Example code : Use this dialog to select a text file |
// Full Unit code.
// -----------------------------------------------------------
// You must store this code in a unit called Unit1 with a form
// called Form1 that has an OnCreate event called FormCreate.
unit Unit1;
interface
uses
Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm} // Include form definitions
procedure TForm1.FormCreate(Sender: TObject);
var
selectedFile : string;
begin
// Ask the user to select a file
if PromptForFileName(selectedFile,
'Text files (*.txt)|*.txt',
'',
'Select your project file',
'C:\',
False) // Means not a Save dialog
then
// Display this full file/path value
ShowMessage('Selected file = '+selectedFile)
else
ShowMessage('Cancel pressed');
end;
end.
|
| Hide full unit code |
{ In the dialog, user selects C:\Files\data.txt and hits OK }
Selected file = C:\Files\data.txt
|
|