SaveDlg() – Dateiauswahlfenster zum Speichern
Die Funktion öffnet den Standarddialog zur Dateiauswahl.
|
Parameter |
Beschreibung |
|---|---|
|
aTitle:C |
Titel des Dialogfensters; default = 'Speichern unter' |
|
aFilter:C |
Filterausdruck; default = Leerstring |
|
aInitialDir:C |
Anfangsverzeichnis;
|
|
aFileName:C |
Vorgabe für Pfad + Dateiname; default = Leerstring |
Rückgabewert
Objekt - Gespeicherte Datei
Beispiel
| aDlg |
aDlg := SaveDlg('BE-Dateiauswahl', 'BE-Programme|*.DWP|Alle Dateien|*.*',
MBEDEFAULT, 'File.txt'),
startseq,
aDlg.Active := true,
if aDlg.DoSave then
WriteLn(aDlg.FileName)
else
WriteLn('Keine Auswahl getroffen ...')
endif,
always,
DestroyObject(aDlg),
stopseq,