|
Registriert seit: 11. Jan 2005
Ort: Schleswig
193 Beiträge
Delphi XE8 Professional
|
Re: Uhrzeiten Addieren?
10. Okt 2006, 11:58
Also um aus "5:20" "320" zu machen kannst Du folgendes nutzen:
Delphi-Quellcode:
var h,m,s,msec : Word;
zeit : String;
begin
Zeit := '5:20';
decodetime(StrToTime(zeit),h,m,s,msec);
showmessage(Inttostr(h*60 + m)); // sind 320 Minuten
end;
Christian Wahl
me, myself and I, die lustigen Drei !!
|