Differenz von Datum1 und Datum2

[yasR]

Sers
ich möchte die Differenz zwischen zwei Datum(s) herausfinden. (bsp. 01.01.09 und 30.01.09).
Die beiden Datum-Werte bekomme ich über ein Editfeld, das gewöhnlicherweise ein string ist.

Das hier ist mein (logischer) Lösungsansatz, der allerdings nicht funktioniert.



var datum1, datum2 : TDateTime;
tage : string;

datum1 := StrToDate(Edit1.Text);
datum2 := StrToDate(Edit2.Text);

tage := DateToStr(datum1-datum2);

Label1.Caption := 'Die Differenz zwischen Datum1 und Datum2 ist ' + tage + ' Tage';

Bitte um Hilfe 8)

Mit freundlichen Grüßen
yasR