Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
9. Dez 2008
wenn schon, dann so: (verwendete Variablen im Exceptionblock vorher initialisieren)
assignfile(f, 'Test.txt');
try
Rewrite(f);
WriteLn(f, 'blablabla');
CloseFile(f);
except
CloseFile(f);
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
9. Dez 2008
Das ist aber nicht die richtge Lösung.
Grund für den Fehler war eine fehlerhafte Verwendung von FileCreate. :warn:
siehe Zitat von DeddyH, hast du vergessen das Dataihandle entgegenzunehmen und vorallem hast du vergesen die mit CreateFile geöffnte Datei wieder zu schließen.
Und da Rewrite keine Sharing-Rechte zuläßt schlägt der Vorgang, Aufgrund der geöffneten Datei, fehl.