Hola zeta2.
Cita:
|
Tendo 2 variables TTimes y las quiero comparar preguntando si una es mayor a otra y no me lo hace, hago algo mal?
|
Lo único que veo mál en tu código es la comparación
>=, ya que compara por mayor o igual y no por mayor. Pero por lo demás, tu código es correcto.
Para que salgas de dudas copia y pegá este código en el evento
OnClick de un
TButton:
Código Delphi
[-]
Var
Hora1, Hora2:TTime;
begin
Hora1 := StrToTime('10:10:12');
Hora2 := StrToTime('10:10:11');
If Hora1 >= Hora2 Then
Edit1.Text := 'Hora1 Es mayor que Hora2!!!';
end;
Verás que el mensaje aparece en el
TEdit.
Un saludo.