Hola anubis
Lo que no entiendo muy bien es que es lo que quieres calcular.
Si es cuantos dias han pasado entre fecha y fecha, asi:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
Var
FechHora1 :TDateTime;
FechHora2 :TDateTime;
Dias :Integer;
begin
FechHora1:= DateTimePicker1.DateTime;
FechHora2:= DateTimePicker2.DateTime;
Dias := Trunc (FechHora2) - Trunc (FechHora1);
Edit1.Text:= IntToStr(Dias);
end;
Sacado de codigo de Al Gonzalez
De otra manera no se lo que quieres hacer.?
Saludos