Entwickler-Ecke

Dateizugriff - .ini Dateien per Savedialog speichern


Phraser - Mi 22.01.03 21:15
Titel: .ini Dateien per Savedialog speichern
Ich habe eine weitere Frage zu den .ini's:
Ich möchte eine .ini Datei abspeichern. Die ganze Prozedur ist mir klar, ich kann die Dateien auch ohne weiteres abspeichern (und auch laden), allerdings würde ich gerne den Zielpfad per Savedialog wählen (und nicht wie ich es immer bisher machte, über ein normales Edit).

Wie funktioniert das mit dem Savedialog?

Würde mich freuen, wenn auch ich eine Antwort bekommen würde


smiegel - Mi 22.01.03 21:41

Hallo,


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
TForm1.FormClose(Sender:TObject; var Action:TCloseAction);
var Dateiname:String;
begin
  with SaveDialog1 do
  begin
    Filter:='Ini-Dateien|*.ini';
    DefExt:='ini';
    InitialDir:=ExtractFilePath(ParamStr(0));
    if Execute then 
    begin
      Dateiname:=FileName;
      // --> Speichere Ini-Datei 
    end; // if
  end; // with
  Action:=caFree;
end;


Im Reiter "Dialoge" findest Du den SaveDialog. Das Icon auf Deine Form legen, welches die Ini-Datei speichern soll.