Sekunden vob TDateTime rausfinden

[dominikkv]

hi
würd ja gern die suche benutzen...aber
ich hab zwei TDateTimePicker auf meiner Form, den einem als dtkDate und den anderen als dtkTime.

Nun möchte ich wissen wie viele Sekunden Unterschied die eingestellte Zeit zu jetzt hat...
Mit dem Datum bin ich schon klargekommen...

Delphi-Quellcode:

case (Trunc(DateTimePicker1.Date)-trunc(Now))of
1: Sekunden := 86400;
2: Sekunden := 172800;
3: Sekunden := 259200;
4: Sekunden := 345600;
5: Sekunden := 432000;
6: Sekunden := 518400;
7: Sekunden := 604800;
end;

...nur möchte ich jetzt halt noch den Unterschied von der Zeit hinzuaddiert haben

zB jetzt ist 12:30:00, eingestellt ist 13:45:02 ---> Unterschied = 1h 15min = 54902 Sekunden.

wie bekomme ich die Sekunden raus?

mfg.Dominik