Einzelnen Beitrag anzeigen

mbamler

Registriert seit: 19. Mai 2005
Ort: Hamburg
118 Beiträge
 
Delphi 7 Architect
 
#3

Re: Befehl "Now" / Werte in Zukunft???

  Alt 15. Mai 2006, 11:57
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
  Mit Zitat antworten Zitat