Ver Mensaje Individual
  #3  
Antiguo 14-02-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
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
Responder Con Cita