Wir wollen doch wissen, warum es nicht klappt.
Mein Beispiel war ja nur dafür, wie man eigentlich generell mit AssignFile/CloseFile umgehen sollte. Das Abfangen/Protokollieren des Fehlers habe ich ja davor aufgeführt.
Die weitere Ausschmückung bleibt jedem selber überlassen. Generell würde ich einfach nur das AssignFile/CloseFile wie Object := TObject.Create/Object.Free immer in einem try..finally Block einschliessen.
Sozusagen die Basic-Rules, ähnlich wie
Zitat:
Randomize gehört an den Anfang der
dpr-Datei und nirgend woanders hin
Delphi-Quellcode:
program foo;
{...}
begin
Randomize;
{...}
end.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)