E/A-Fehler 32, Textdatei kopieren und schreiben

[eassy]

hallo zusammen,

ich habe mal wieder ein problem, und brauche hilfe.
zur zeit habe ich noch in meinem programm folgenden aufruf

Delphi-Quellcode:

 AssignFile(Datei,'c:\test.txt');
 Append(Datei);
 Writeln(Datei, 'Test');

dort wird jetzt jede 10 sekunden das reingeschrieben.
gleichzeitig wird alle minute die datei auf einen server kopiert.

nun bekomme ich aber irgendwann das problem: E/A-FEHLER 32.
und zwar dann, ich denke mal das es so ist wenn noch kopiert wird
aber gleichzeitig reingeschrieben werden soll.

könnte es helfen wenn ich das ganze mit tfilestream mache.
z.b. wie folgt:

Delphi-Quellcode:

  DateiStream := TFileStream.Create('C:\test.txt', fmOpenWrite or fmShareDenyNone);

oder kann ich da das gleiche problem bekommen. :gruebel:

wäre um jede hilfe dankbar.

gruß
eassy

[mirage228]

Hi,

wenn Du folgendes benutzt:

Delphi-Quellcode:

AssignFile(Datei,'c:\test.txt'); 
Append(Datei); 
Writeln(Datei, 'Test');

Solltest Du die Datei danach auch wieder schließen:

Delphi-Quellcode:

CloseFile(Datei);

Ansonsten gibt es die besagte Sharing Violation (I/0 32).

mfG
mirage228

[eassy]

upps.
das habe ich vergessen einzufügen.
das mache ich natürlich

Delphi-Quellcode:

  try
   AssignFile(Datei,'c:\test.txt');
   Append(Datei);
   Writeln(Datei, 'Test');
  finally
    CloseFile(Datei);
  end;

bei tfilestream:

  try
    ..
  finally
    DateiStream.Free;
  end;

trotzdem bekomme ich das e/a fehler 32 problem und zwar schon beim append bzw. assignfile