Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   datetimepicker (https://www.clubdelphi.com/foros/showthread.php?t=19590)

cmena 18-03-2005 21:28:06

datetimepicker
 
Hola amigos estoy usando el componente datetimepicker de la lengueta win32 de delphi 7 lo llamo "dtpFULTIMAMANTENCION" , cuando elijo y selecciono a modo de ejemplo la fecha 30-12-1999 y luego aplico el if que indico a continuacion ,no se cumple la condicion y se va por else, antes de que entre al if he desplegado los contenidos de ambas variables y el largo siendo estos los mismos(30-12-1999 y largo 10) y, lo mas extraño que deberia cumplirse la condicion.


if dtpFULTIMAMANTENCION.date = StrToDateTime('30-12-1999') then
sho...........
else
sho...........;


gracias amigos

roman 18-03-2005 21:57:48

Intenta esto:

if Trunc(dtpFULTIMAMANTENCION.date) = StrToDateTime('30-12-1999') then

// Saludos

DynaRoc 19-03-2005 01:13:59

El datetimepicker no devuelve fecha y hora?

y si cambias el formato de la fecha en un string y luego comparas?

var sFecha : String;
sFecha := FormatDateTime('dd-mm-yyyy',dtpFULTIMAMANTENCION.date);

y luego haces el if ?

marcoszorrilla 19-03-2005 12:32:23

Código Delphi [-]
 if Trunc(dtpFULTIMAMANTENCION.date) = StrToDateTime('30-12-1999') then
 
 {Un pequeño cambio}
 
 if Trunc(dtpFULTIMAMANTENCION.date) = StrToDate('30-12-1999') then

Yo prefiero la solución de Román, aunque retocaría un poco la conversión de la cadena, según indico.

Un Saludo.

OSKR 19-03-2005 15:52:00

te lo muestro pero esta en builder, a mi me sirve:
dtpFULTIMAMANTENCION->Format="dd-MM-yyyy"; //ojo en la mayuscula MM
if(dtpFULTIMAMANTENCION->Date == EncodeDate(1999,12,30))
//....
else
//....


La franja horaria es GMT +2. Ahora son las 13:07:42.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi