Beim Schreiben einer TListbox mittels SaveToFile erhalte ich die Fehlermeldung:
Projekt mypsql hat die Exception-Klasse "EFCreateError" ausgelöst mit der Meldung:
Unable to create file "letzt.dat"
Bei Adresse 433C81
Code: Alles auswählen
letztbank: TListBox;
var letzt:string='letzt.dat';
procedure TFmypsql.close0(Sender: TObject; var CloseAction: TCloseAction);
begin
if letztbank.Count>0 then
begin
...
letztbank.items.SaveToFile(letzt); <<< hier passiert der Fehler
end;
end;
Es sind 10 items vorhanden, - wieso passiert dann der Fehler ?
Die Datei existiert bereits, denn sie wird beim OnCreate eingelesen.