mit TDateTime rechnen

[shmia]

Zitat von HHennig:

Geht mit Trunc(ADateTime).

Eigentlich wäre hier die Funktion Int() anstelle von Trunc() zu verwenden.
Trunc() funktioniert zwar auch; liefert aber einen Integer zurück der sogleich in einen Double umgewandelt werden muss.

Delphi-Quellcode:

// Int returns the integer part of X; that is, X rounded toward zero.
function Int(X: Extended): Extended;