E/A Fehler bei Reset

[venice2]

Zitat:

Welcher Fehler-Code?

Ein und Ausgabe . Oder was meinst du sonst.

Zitat:

Außerdem ist dringend davon abzuraten AssignFile mehrmals hintereinander auszuführen.

Ja ist Original nicht so war ein copy\paste Fehler hier im Forum.

Delphi-Quellcode:

procedure TraceDebug(Msg: PWideChar);
var
  FileName: string;
begin

  FileName := ExtractFilePath(ParamStr(0)) + 'Debug.txt';

  AssignFile(txtTracer, FileName);
  if FileExists(FileName) then
    Append(txtTracer)
  else
  Rewrite(txtTracer);

  WriteLn(txtTracer, Msg);
  CloseFile(txtTracer);

end;

Es bleibt beim Fehler. EInOutError E/A-Fehler 32