SaveDlg()

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; default = Leerstring (Verzeichnis der zuletzt gespeicherten Datei)
aFileName:C	Vorgabe für Pfad + Dateiname; default = Leerstring

Rückgabewert

Objekt - Gespeicherte Datei

Beispiel

CODE

| 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,