Zitat von
HuxXx:
Delphi-Quellcode:
function TimeToStr(Time: TDateTime): string;
var min, std, sec:Integer;
begin
min:= DateUtils.MinuteOf(now);
std:= DateUtils.HourOf(now);
sec:= DateUtils.SecondOf(now);
result:=IntToStr(std)+':'+IntToStr(min)+':'+IntToStr(sec);
end;
--> Gibt die eine Uhrzeit (TDateTime) als String aus. (Form: hh:mm:ss)
Nicht wirklich
Da würden die führenden Nullen fehlen.