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

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,


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


Revisa este código:

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:


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/l/blrtldatetime.htm

Dates and times : http://www.delphibasics.co.uk/ByFunction.asp?Main=DatesAndTimes


Espero sea útil :)

Nelson.

[GustavoCruz]

Hola nlsgarcia, mil gracias por tu ayuda...

Ahora Todo Bien....:):):)