Problem mit meiner Zeitberechnung

[Remote1]

ich hab sowas ähnliches bei meinem timer mit drin:
für tage:
tage.Caption:=inttostr(trunc(DateTimePicker1.Date-date)); für stunden

Delphi-Quellcode:

if datetostr(date)=datetostr(datetimepicker1.Date)
 then
  if zeit.caption<timetostr(rectime)
   then stunden.Caption:=timetostr(rectime-time);

rectime ist dabei die zeit, die du vorher eingestellt hast (bei mir die zeit zum beenden der programme)

das ganze steht natürlich allen im ontimer, damit auch kräftig runter gezählt wird (timer auf ca. 1000ms stellen)