Muchas gracias por sus recomendaciones, el del error era yo, la propiedad date del DateTimePicker esta en 01/01/1889 no se por que razon estaba haya, esa era el motivo por el cual me aparecia ese numero tan elevado, mcuhas gracias a ustedes, ahora si dejo codigo corregido y modificado para que le puedan cambiar cuando pasa la media noche, gracias a lepe y a roman por el tiempo prestado.
Código:
uses DateUtils;
procedure TForm1.Button3Click(Sender: TObject);
var
Salida:Integer;
begin
Salida:=MinuteSpan(DateTimePicker1.Time),DateTimePicker2.Time);
Label1.Caption:=IntToStr(Salida);
end;
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked=True then
begin
DateTimePicker1.kind:=dtkDate;
DateTimePicker2.Kind:=dtkDate;
end
else
begin
DateTimePicker1.kind:=dtkTime;
DateTimePicker2.Kind:=dtkTime;
end;
bye