Datum und Uhrzeit in Logdatei schreiben

[Delphijunkie2006]

writeln(txtfile, (datetimetostrstr(now))); das klappt nicht, inkompatible Typen kommt da raus.

Meine Idee war folgende:

Delphi-Quellcode:

procedure writelog (memo1: tmemo);
var memotxt: textfile; i : integer;
begin if not fileexist ('C:\log.log') then begin
memo1.lines.savetofile('C:\log.log') end else
assignfile (memotxt, 'C:\log.log'); append(memotxt);
for i:= 0 to (memo1.lines.count -1) do
writeln (memotxt, memo1.lines[i])  >>>>> hier müßte der Zeistempel hin<<<<<
; closefile(memotxt);
end;
end;

Nun wie implementiere ich "Now" nun am besten?