Pfad von OpenPictureDialog in *.ini schreiben?

[Tim.exe]

Hallo,

grundsätzlich habe ich keine Probleme mit *.ini's, wie gesagt schreibe ich mehrere Edits, RadioButtons, Checkboxen in eine *.ini und lese diese wieder aus. Das alles funktioniert wunderbar. Nur eben dieses Edit in dem ich den Pfad zu einem Bild speichern will wird nicht gespeichert.

Meine Frage ist ob man etwas beachten muss wenn man den Pfad eines OpenDialoges bzw. OpenPictureDialoges über eine Edit in ein *.ini speichern will. Der ganze code sieht ungefair so aus:

Delphi-Quellcode:

...
uses Inifiles, ...
...

OnCreate:

procedure TForm1.FormCreate(Sender: TObject);
var
savestat: TIniFile;
begin
savestat := TIniFile.Create('.\settings.ini');

SpinEdit1.Value := savestat.ReadInteger('Schedule1','Status1',SpinEdit1.Value);
SpinEdit2.Value := savestat.ReadInteger('Schedule2','Status1',SpinEdit2.Value);

edIconHint.Text := savestat.ReadString('IconHint','Status1',edIconHint.Text);
Edit1.Text := savestat.ReadString('Icon','Status1',Edit1.Text); //Dieses Edit will nicht (OpenPictureDialog)

CheckBox2.Checked:=savestat.ReadBool('Aktiv1', 'Status1', CheckBox2.Checked);
CheckBox3.Checked:=savestat.ReadBool('Aktiv2', 'Status1', CheckBox3.Checked);

SUIRadioButton1.Checked:=savestat.ReadBool('Tastaturein', 'Status1', SUIRadioButton1.Checked);
SUIRadioButton2.Checked:=savestat.ReadBool('Tastaturaus', 'Status1', SUIRadioButton2.Checked);

savestat.Free;
end;

####################################################

OnDestroy:

procedure TForm1.FormDestroy(Sender: TObject);
var
savestat: TIniFile;
begin
savestat := TIniFile.Create('.\settings.ini');

savestat.WriteInteger('Schedule1','Status1',SpinEdit1.Value);
savestat.WriteInteger('Schedule2','Status1',SpinEdit2.Value);

savestat.WriteString('IconHint','Status1',edIconHint.Text);
savestat.WriteString('Icon','Status1',Edit1.Text); //Dieses Edit will nicht (OpenPictureDialog)

savestat.WriteBool('Aktiv1', 'Status1', CheckBox2.Checked);
savestat.WriteBool('Aktiv2', 'Status1', CheckBox3.Checked);

savestat.WriteBool('Tastaturein', 'Status1', SUIRadioButton1.Checked);
savestat.WriteBool('Tastaturaus', 'Status1', SUIRadioButton2.Checked);

savestat.Free;
end;

[Edit=Sakura]DELPHI-Tags eingefügt.[/Edit]