Aber plötzlich funktioniert nichts mehr. Sind gänzlich normale Schreibzugriffe. Die haben vorher alle funktioniert.
Code: Alles auswählen
Try
AssignFile(fDefaultsDatei, 'defaults.dat');
// {$I-}
ReWrite(fDefaultsDatei); {open file to write}
Write(fDefaultsDatei,DefaultsData); {saves the data}
CloseFile(fDefaultsDatei); {close the file}
// {$I+}
except
// If there was an error the reason can be found here
on E: EInOutError do
Memo1.Lines.Add('File error : '+ E.Message);
end;
Wenn ich so // die Schalter wegmache kriege ich RunError(2)
Wenn die Schalter an sind kriege ich keine gar keine Fehlermeldung.
Das 'e.Message ' scheint so nicht zu funktionieren.
Hab ich was in der IDE vertan? Kennt das jemand?
Hab bei Projekteinstellung mal als Zielsystem win64 angegeben, und win32 GUI Anwendung abgewählt.
Hab auch das Projekt mal umbenannt, hilft alles nichts.
Die Disk ist auch nicht voll oder sowas.