Befehl "Now" / Werte in Zukunft???

[mbamler]

Zitat von himitsu:

Bist du sicher, daß der Fehler bei Now liegt?
Wüßte jedenfalls nicht, was daran nicht unbedingt Threadsicher sein sollte ... abgesehn von GetLocalTime, aber da kann ich mir keinen Grund vorstellen, warum dort die Sprünge so groß ausfallen sollten

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;

Was bei älteren Delphi Versionen NICHT ging war sowas wie:

wert := now + 1; //für morgen

dabei bekam man gegebenenfalls falsche Werte - man konnte sich helfen mit:

wert1 := now;
wert2 := wert1 + 1;

vielleicht hängt dein Problem damit zusammen ?!?!?

Gruß
Matthias