Um dir ein bisschen Arbeit zu ersparen:
Mein Code:
Delphi-Quellcode:
var
std,min,sec,Zeit:string;
begin
std := copy(TimeToStr(Time),1,2);
min := copy(TimeToStr(Time),4,2);
sec := copy(TimeToStr(Time),7,2);
Zeit := std + '-' + min + '-' + sec;
Gibts da eigentlich noch ne eleganter version??
z.b. ExtractTime(Sec) oder so?