Determinar dias entre dos fechas

[[Caral]]

Hola
Esto no es exatamente lo que pides pero te puede ayudar, esta hecho por Al Gonzalez.
2 dateTimepicker y un edit en el evento on click de un boton.

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;

Espero te sirva de ejemplo o guia.
Saludos