Hallo,

Versuch mal in Deinem Main folgendes noch einzubauen:

Im Main(Declare) bitte:


gettime:CurTimeEx;

Der Aufruf im Main:

getTime(SystemTime:=systime, timedate:= systimestruct);

Viele Grüße