Hi folks,
wollt ihr wirklich ständig in einem OnTimer-Event nachschauen, ob wer an der Uhr gedreht hat? Wenn die Logdatei in einem Memo mitgeschrieben wird, dann wird wohl nicht unbändig viel rein geschrieben. Ich würde dann beim Schreiben eines Eintrages prüfen, ob es wiedermal so weit ist.
Mit der angehängten
Unit geht das so:
Delphi-Quellcode:
procedure TMainForm.FormCreate(Sender: TObject)
begin
self.Log := TLogStrings.Create(Memo.Lines, ParamStr(0));
end;
// ...
begin
Log.AddLine('so long');
end;
Getippt und kaum getestet...
Freundliche Grüße vom marabu