Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Problemas con Fecha en base de datos (https://www.clubdelphi.com/foros/showthread.php?t=29273)

Roilo 17-01-2006 21:46:32

Problemas con Fecha en base de datos
 
Tengo el siguiente Problema:
en mi aplicacion el usuario debe entrar una fecha posterior (un dia despues) a otra fecha que tengo en un campo de mi tabla. Si no los hace pues debe salirle un mensage de advertencia...Primero declaro una variable Fecha de tipo TDate, aqui esta el codigo:
Código Delphi [-]
fecha:=strtodate(table1.fieldbyname('CampoFecha').Asstring) +1;
 if (maskedit1.Text <>datetostr(fecha)) then
  begin
   showmessage('La nueva Fecha de alta no es Válida.');
   maskedit1.Clear;
   maskedit1.SetFocus;
  end;
bueno. En mi equipo esto funciona, pero cuando lo intento en otra máquina, simplemente no resulta...
Dime qué tienes por ahí de esto.
Gracias de antemanos.

vtdeleon 17-01-2006 21:57:14

Saludos

He editado tu mensaje para agregarle las etiquetas [ delphi], editalo y veras como se usan. Es imprescindible su uso!

Ahora vamos a tu codigo.
* fecha:=strtodate(table1.fieldbyname('CampoFecha').Asstring) +1;
Aqui estas usando funciones innecesarias. Podrias hacer:
fecha:=table1.fieldbyname('CampoFecha').AsDate+1;//no recuerdo si es AsDate o AsDateTime

* El MaskEdit y el fecha deben tener el mismo formato, es decir, dd/mm/yy, si esto no se cumple, no obtendras los resultados esperados.

*El por qeu no funciona en una maquina u otra, quizas sea por lo citado anteriormente

Suerte ;)

Roilo 20-01-2006 15:30:23

Gracias
 
Estabas en lo cierto con respecto al formato...
Gracias nuevamnete....


La franja horaria es GMT +2. Ahora son las 01:11:28.

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