(Co-Admin)
Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
Delphi 2010 Professional
|
25. Apr 2003, 11:46
Hallo Mitchl55,
wie Luckie schon vermutet hat, gibt es eine Decode... Funktion. In deinem Fall die DecodeTime:
Delphi-Quellcode:
var
std,
min,
sec,
msec : Word;
zeit : TDateTime;
insec : LongInt;
...
{ zeit sei die Zeit in TDateTime Format }
DecodeTime(zeit, std, min, sec, msec);
insec := std*3600 +min*60 +sec;
Albert Live long and prosper
MrSpock
|
|
Zitat
|