Ver Mensaje Individual
  #10  
Antiguo 11-11-2005
CRIS CRIS is offline
Miembro
 
Registrado: jul 2003
Posts: 63
Reputación: 21
CRIS Va por buen camino
Código Delphi [-]
procedure TForm1.SpeedButton1Click(Sender: TObject);
var recordpista,vueltarapida,Diferencia:TTime;
begin
recordpista:=StrToTime(label1.caption);
vueltarapida:=StrToTime(label2.caption);
Diferencia:=recordpista-vueltarapida;
label3.caption:=TimeToStr(Diferencia);
end;
end.

Hasta aqui llego chicos, pero me da horas minutos y segundos.
Responder Con Cita