Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-03-2005
cmena cmena is offline
Miembro
 
Registrado: abr 2004
Ubicación: CHILE
Posts: 67
Poder: 20
cmena Va por buen camino
Unhappy 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
Responder Con Cita
  #2  
Antiguo 18-03-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Intenta esto:

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

// Saludos
Responder Con Cita
  #3  
Antiguo 19-03-2005
DynaRoc DynaRoc is offline
Miembro
 
Registrado: nov 2004
Posts: 12
Poder: 0
DynaRoc Va por buen camino
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 ?
Responder Con Cita
  #4  
Antiguo 19-03-2005
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
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.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #5  
Antiguo 19-03-2005
Avatar de OSKR
OSKR OSKR is offline
Miembro
 
Registrado: nov 2004
Ubicación: San Cristóbal/Táchira/Venezuela
Posts: 389
Poder: 20
OSKR Va por buen camino
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
//....
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 08:11:00.


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
Copyright 1996-2007 Club Delphi