vergangene Tage berechnen

[JannyR]

Moin,

habe ein DateTimePicker wo man ein Daum auswählt.
In einem Label sollen die vergangen Tage seit diesem Datum angezeigt werden.
Also Label1.Caption := Date-DateTimePicke1.Date... Aber wie genau???


Schon mal danke im vorraus =)

[Wolfgang Mix]

Delphi-Quellcode:

//DeddyH - Delphi-Praxis
Label1.Caption := Format('Die Differenz zwischen Datum1 und Datum2 ist %d Tage',abs(trunc(StrToDate(Edit1.Text)) -                                   trunc(StrToDate(Edit2.Text)))]);

Gruß

Wolfgang

[Matze]

Das aktuelle Datum bekommst du mit "Now".

Ich würde jedoch den Weg über DaysBetween gehen, denn DateUtils ist sowieso eingebunden:

Delphi-Quellcode:

days := DaysBetween(Now, DateTimePicke1.Date); // ungetestet

Grüße, Matze

[Wolfgang Mix]

Ach ja, weil der TE es ab heute will.
Opa Detlef ist da allgemeiner.