Wie kann ich eine Logdatei Threadsave Speichern.

Also ich habe 2 Threads die Daten per FTP Verschicken, jetzt sollen diese Threads in eine Logdatei speichern
aber wenn jetzt Thread 1 und Thread 2 gleichzeitig was schreiben wollen knallst wohl.

Dann musst du den Zugriff mit CriticalSection synchronisieren.

Gibts da irgendwo eine Howto wie das genau funktioniert.

Du erstellst eine Klasse, von der du ein Objekt an beide Threads übergibst:

zusammenfalten · markieren

Delphi-Quellcode:

type
 TDatei=class
  constructor Create; //FCriticalSection.Create
  Destructor Destroy; override //fCriticalSection.free;
 private
  FFileName:string;
  FCriticalSection:TCriticalSection;
 public
  property FileName:string;
  procedure WritetoFile(const s:String);
end;

//...
procedure TDatei.WritetoFile;
begin
  CriticalSection.Enter;
  try
    öffne Datei
    schreibe Datei
    schließe Datei
  finally
    CriticalSection.leave;
  end;
end;

Jetzt kannst du aus jedem Thread einfach WritetoFile aufrufen und alles ist abgesichert.

(aber wird Dateiarbeit nicht auch vom OS abgesichert )

Zitat von sirius:

(aber wird Dateiarbeit nicht auch vom OS abgesichert )

Ja aber es können doch nicht 2 Prog gleichzeitig schreiben oder ?

Wenn die Zugriffsrechte es verbieten, dann nicht.

HI, versuchs damit.

Features:
Threaded-Cached Logwriter, entwickelt für hocklast Serveranwendungen, um WorkerThreads nicht zu behindern.

lg.

Moin.


Ist TFileStream nicht threadsafe?

Habe sowas bis jetzt immer damit gemacht

Nein, ist er grundsätzlich erstmal nicht.

Wenn du aber jedem "Read/Write" die Startposition getrennt mitgibst oder jeder Thread seinen eigenen Stream auf die selbe Datei hat, dann wäre er teilweise threadsicher.