Mit 2 Datumswerten rechnen

[Luca Haas]

Hi Leute, ich habe 2 DateTimepicker, mit denen ich mir einen Startwert und einen Endwert als Datum in meine Tabelle speichere.
Jetzt würde ich gerne wissen ob es möglich ist herauszufinden, ob man diese Werte auch subtrahieren kann, um die Dauer zwischen den beiden Werten zu erhalten. Ich bekomme bei meinen Rechnungen leider nur den 31.12.1899, anstatt der Zahl 1. Kann mir jemand sagen, wie man dieses Datum in eine Zahl ändert?

[hannesgw]

Schau dir mal die function DaysBetween in der Unit System.DateUtils an

[DeddyH]

Schau mal in die Unit DateUtils, da gibt es einige Funktionen dafür, z.B. SecondsBetween.

[Luca Haas]

Danke ihr beiden, damit klappts :thumb:

[himitsu]

Zitat:

Zitat von Luca Haas (Beitrag 1395921)

Ich bekomme bei meinen Rechnungen leider nur den 31.12.1899, anstatt der Zahl 1. Kann mir jemand sagen, wie man dieses Datum in eine Zahl ändert?

Die Rechnung ist zwar richtig, aber deine Auswertung ist falsch.

DateToStr und Co. geht halt auf ein Datum
und nicht auf ein Intervall.

System.TDateTime : 0 ist da eben der 30. Dezember 1899

Intervall:

Delphi-Quellcode:

IntToStr(Trunc(Ergebnis)) + ' Tage und ' + TimeToStr(Ergebnis)

[Uwe Raabe]

Alternativ wäre auch der Einsatz von TTimeSpan eine Option.

[jobo]

Wenn die Daten sowieso aus einer Tabelle kommen, kannst Du die Differenz auch per SQL Abfrage berechnen lassen, Datum1-Datum2, kommt etwas auf die Datenbank an.
Wenn diese Differenz nur vereinzelt benötigt wird, macht es allerdings nicht unbedingt Sinn, das von der Datenbank zu erfragen.