Einzelnen Beitrag anzeigen

egentur

Registriert seit: 27. Sep 2006
Ort: Freising
60 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

E/AFehler 433. bei Append TextFile

  Alt 1. Dez 2022, 14:16
Delphi-Version: 6
Hallo zusammen

Ich schreibe Daten in ein TextFile wie folgt:

Procedure xy(hlog : string);
var EFile:TextFile;
begin
{$I-}
SCAN: AssignFile(EFile,'xy.bin');
Reset (EFile);
{$I+}
if IOResult=2 then begin
Rewrite (EFile);
end;
Append(EFile);
Writeln (EFile,hLog);
Flush(EFile);
CloseFile(EFile);
end;

Das funktioniert auch soweit einwandfrei !

Nur auf einem bestimmten Rechner bringt mir EurekaLog sporadisch einen

E/A Fehler 433.

an der Stelle Append(EFile)

ich kann aber nirgends eine Fehlerbeschreibung zu 433. finden

Danke für eure Hilfe
  Mit Zitat antworten Zitat