[fpc-pascal] TEventLog.FileName : Hot to do an append to existing log file
phoebus phoebus
frphoebus at yahoo.fr
Wed Sep 22 13:30:00 CEST 2010
Hi,
I'm not understand how to use unit Teventlog to no create each time a new
file but to append to an existing log file.
I want to do something like:
assign(f,filename);
if FileExists(filename) then Append(f)
else Rewrite(f);
Writeln(f,FormatDateTime('dd/mm/yyyy hh:nn:ss ',Now),msg);
CloseFile(f);
Regards,
More information about the fpc-pascal
mailing list