Ich zitiere mal:
Delphi-Quellcode:
function Now: TDateTime;
var
SystemTime: TSystemTime;
begin
GetLocalTime(SystemTime);
with SystemTime do
Result := EncodeDate(wYear, wMonth, wDay) +
EncodeTime(wHour, wMinute, wSecond, wMilliseconds);
end;
Es wäre also ein Bug in der Funktion
GetLocalTime.
Meinst du nicht, es wäre in den 9 Jahren aufgefallen, wenn diese Funktion Murks zurückliefert?
Irgendwas machst du also falsch