Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Consultar fechas en firebird (SQL) (https://www.clubdelphi.com/foros/showthread.php?t=25615)

pepitu 28-09-2005 13:18:56

Consultar fechas en firebird (SQL)
 
Tras buscar e intentar casi todas las "animaladas" que estoy seguro que puede sufrir delphi...nuevamente recurro a este foro.
Estoy con IBX y firebird.
El problema: tengo un combobox con los campos de una base de datos y un edit en el que introduzco el texto a buscar (lo capturo como 'Texto').
Detecto (según el campo escogido en el Combox) el tipo de dato a buscar introducido en el edit.
Si el campo es de tipo char o varchar uso:
Texto:=texto+'%';
SelectSQL.Add(' WHERE CAMPO LIKE ' + QuotedStr(Texto));
Y me realiza correctamente la búsqueda.

El problema está en las fechas que no consigo realizar la búsqueda correctamente.
Las "animaladas" probadas son del tipo:
- SelectSQL.Add(' WHERE FECHA = ' + StrToDate(Texto)); //da error
-Texto:=StrToDate(Texto);
SelectSQL.Add(' WHERE FECHA = ' + QuotedStr(Texto)); //da error

-He probado de meter la fecha entre comillas dobles, simples, sin comillas, dígitos separados por puntos, etc...
He usado IBExport y veo que el formato de la fecha es dd/mm/yyyy (en Options/Environement/Grid/Display...es el mismo)

¿Como se hace?
¿Pasando parámetros?¿Como?

cahp 28-09-2005 13:44:34

Código:

        Query.SQL.Add('and Fecha >= :Fecha');
        Query.ParamByName('Fecha').AsDate := DateEditFecha.Date;

Utiliza parametros, si es un edit tendras que hacer una conversion strtodate()
Si utilizas un DateEdit, como te he puesto.

Otra cosa que tienes que tener en cuenta, es que si el campo de la base de datos es timestamp tendras que poner between fecha and fecha + un dia.

Si no entiendes lo que te comento, lo dices y me extiendo mas.

Saludos.

rastafarey 28-09-2005 14:39:06

Resp
 
Si pasas la fecha como cadena ten pendiente que el formato debe ser mm/dd/yyyy osea formato gringo
Código SQL [-]
WHERE FECHA = '12/31/2005';
Se octendria con
Código Delphi [-]
  //LA fecha real es 31/12/2005 31 de diciembre del 2005
  //Si la fecha la introduces a mano
  Texto := '12/31/2005';
  
  //Si la fecha biene desde un componente o en formato no gringo
  Texto := formatDateTime('mm/dd/yyyy', Fecha);
  Texto := Format('WHERE FECHA = ''%s''', [Texto]);
Aunque la opcion que te dieron anteriormente es perfecta. Asi que tu decides cual usar

pepitu 28-09-2005 14:58:03

Solucionado
 
He probado ambas formas y las dos me lo han solucionado.

Quiero hacer hincapié en mis agradecimientos hacia quién ayuda a un novato como yo. No tan solo es lo que hace engrandecer un foro sino a la persona cuya forma de ser lo permite o lo hace posible.

Muy agradecido.

rastafarey 28-09-2005 15:03:00

Resp
 
Perfecto.

Esa es la manera no tanto por las gracias. Sino para que uno sepa que ya todo esta solucionado. Por hay muchos casos en los cuales el problema esta resulto y son incapaces de decir ya me funciono eso se dbe hacer para que las personas no pierdan su tiempo en algo que ya esat solucionado.

Pero gracia spor las gracias valga la redundancia

marcoszorrilla 28-09-2005 15:30:25

Bien dicho, aunque el foro es altruista y los agradecimientos se suponen, al menos es conveniente que se haga publica cual de las propuestas solucionó el problema y si se opta por una y no por la otra explicar por qué.

Un Saludo.

cahp 28-09-2005 15:56:14

Es de agradecer tu agradecimiento y valga la redundancia (no todos lo hacen).

Si tienes mas dudas, sobre todo con mi respuesta (que es un poco corta y a lo mejor poco comprensible por falta de tiempo), plantealas.

Saludos.

pepitu 28-09-2005 19:19:23

Qué menos que agradeceros...
 
Iba a no escribir más en este hilo...pero cuando uno se siente en deuda por la ayuda recibida...qué menos que prestar atención :)

De todas formas....no os alejéis demasiado....tengo muchas cosas en el tintero...
Pero tranquilos.....antes de hacer cualquier pregunta al foro me paso horas buscando la respuesta.
Soy supernovato en delphi y firebird (ya se nota por mis dudas, no?) y me meto en cosas cuando aun me falta una base inicial....

Cahp...lo he entendido bien, quédate tranquilo.

Saludos


La franja horaria es GMT +2. Ahora son las 10:27:48.

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