Hi!
Ich will eine simple Savelog-Funktion einbauen. Erstmal die Version die funktioniert:
Code:
procedure TForm1.Button4Click(Sender: TObject);
var FileName : String;
begin
FileName := 'Chatlog.txt';
Memo1.Lines.SaveToFile(FileName);
end;
Wenn ich jetzt aber noch die Uhrzeit dabei haben will geht es leider nicht:
Code:
procedure TForm1.Button4Click(Sender: TObject);
var FileName : String;
begin
FileName := TimeToStr(now)+'Chatlog.txt';
Memo1.Lines.SaveToFile(FileName);
end;
also alla 22:05:31Chatlog.txt ... Fehlermeldung: Falsche/r Parameter und er spring auf diese Zeile: Memo1.Lines.SaveToFile(FileName);