Hallo,
und was funktioniert an dem Vergleich nicht? Probleme gibt's nur beim Vergleich auf Gleichheit, weil, wie mkinzler schon schrieb, TDateTime-Werte letztendlich Double-Werte sind. Da kannst Du z.B. mit einem Epsilon arbeiten:
Delphi-Quellcode:
if (Datum1 > Datum2 - 1.0 / SecsPerday) and (Datum1 < Datum2 + 1.0 / SecsPerday) then
ShowMesssage ('Die Werte sind wohl gleich')
MfG
Klaus