den unterschied zweier Datum-Werte berechnen

[Sharky]

Hai jonny,

warum weisst Du GebDatum denn mehrmals Werte zu?

Zitat:

Delphi-Quellcode:

begin
.
    GebDatum:=DateTimePicker1.Date;
.
    GebDatum:=StrToDate(IntToStr(tag) + '.' + IntToStr(monat) + '.' + IntToStr(jahr1));
.
    GebDatum:=StrToDate(IntToStr(tag) + '.' + IntToStr(monat1) + '.' + IntToStr(jahr1));
end;