Milisekunden jetzt!

[theomega]

Hallo
ich habe folgenden Code gschrieben um die aktuelle Zeit in Milisekunden herauszubekommen. Nur der Code gibt immer 0 zurück:

Delphi-Quellcode:

function gettime:longword;
var now,hour,min,sec,msec:word;
parent:TDateTIme;
z:longword;
begin;
parent := now;
decodetime(parent,hour,min,sec,msec);
z := msec+(sec*1000)+(min*60*1000)+(hour*60*60*1000);
result := z;
end;

Warum ist das so?
Wo ist der Fehler?

Danke

TO

[theomega]

hab es rausgefunden: statt
now muß es time heißen.

Warum weiß ich aber auch nicht!

[Chewie]

now liefert datum & Uhrzeit, time nur die Uhrzeit.

[CalganX]

Problem: Du hast eine Variable, die now heißt!!!

Chris