Delphi-Quellcode:
var
y, m, d, dw : word ;
begin
getdate (y,m,d,dw) ;
end ;
rsp. gettime
Aber unabhängig davon, wie du die Zeit im alten Pascal ausliest, auf die Millisekunde genau wirds nicht werden, sondern nur auf die 1/13 Sekunde genau. Das liegt an der Taktung des Zeitinterrupts.