Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 16. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#12

AW: Datum berechnen

  Alt 18. Dez 2010, 02:35
Hmmm ich glaube das klappt jedoch kriege ich immer als Wert irgendwas über 40000 ...
liegt das daran das Delphi ab 1900 mit den Tagen beginnt zu zählen ??!
Das liegt daran, dass eines der beiden "Datümer" = 0.0 (entspricht dem 31.12.1899) ist.
Du hast also etwas falsch gemacht.
Hier ein Beispiel wie man DaysBetween verwenden kann:
Delphi-Quellcode:
var
  heute, Anfang2000 : TDateTime;
  anzahltage : Integer;
begin
  heute := SysUtils.Date;
  Anfang2000 := EncodeDate(2000, 1, 1); // 1.Jan.2000
  anzahltage := DaysBetween(heute, Anfang2000);
  ShowMessageFmt('Zwischen Heute und Anfang 2000 sind %d Tage', [anzahltage]);
end;
  Mit Zitat antworten Zitat