Comparar horas Datetimepicker y time

[GustavoCruz]

Hola amigos del foro, no se si este sea el lugar indicado pero bueno aquí vamos, he estado tratando de compara un datetimepicker en su propiedad time y un Time y siempre me sale lo mismo.
este es el código que tengo

Código Delphi [-]
  if DateTimePicker1.Time > time then
     ShowMessage('Mayor')
  else
     ShowMessage('Menor');

Eso siempre me da como resultado "Mayor".
No entiendo qué pueda estar haciendo mal.

Gracias por vuestro tiempo

[Casimiro Notevi]

¿Y qué es exactamente time?

[[nlsgarcia]]

GustavoCruz,

Empezado por GustavoCruz

...tratando de comparar un datetimepicker en su propiedad time y un Time...siempre me da como resultado "Mayor"...

Revisa este código:

Código Delphi [-]
implementation

uses DateUtils;

procedure TForm1.Button1Click(Sender: TObject);
begin
   if TimeOf(DateTimePicker1.Time) > Time then
     ShowMessage('Mayor')
   else
     ShowMessage('Menor');
end;

El código anterior compara la porción de Tiempo de un control TDateTimePicker con la hora obtenida en la función Time.

Revisa esta información:

Empezado por Delphi Help:

Call TimeOf to convert a TDateTime value to a TDateTime value that includes only the time information (sets the date portion to 0, which means 12/30/1899).

Revisa estos links:

Date/Time routines : http://delphi.about.com/od/beginners...tldatetime.htm

Dates and times : http://www.delphibasics.co.uk/ByFunc...=DatesAndTimes

Espero sea útil

Nelson.

[GustavoCruz]

Hola nlsgarcia, mil gracias por tu ayuda...

Ahora Todo Bien....