Consulta con formatos de fecha
 

Hola, tengo un problema con una query, tengo una tabla en mysql llamada factura con un campo fecha_factura de tipo datetime, yo cojo en un formulario una fecha de un datetimepicker, y a continuación hago una consulta

Código Delphi [-]
query1.SQL.Add('select * from factura where fecha_factura=:fecha;');
query1.ParamByName('fecha').AsDate:=datetimepicker1.date;

y me da error en la consulta cuando compara el datetimepicker con el campo fecha factura, la fecha me la pone como año-mes-dia, en mysql está almacenada como dia/mes/año, he probado a definir una variable s de tipo string y utilizar la función

Código Delphi [-]
s:=formatdatetime('dd/mm/yyyy',datetimepicker1.date);

lo cual me cambia el formato, pero al pasar otra vez el string a date con strtodate(s); me lo pone otra vez en año-mes-dia, ¿alguien sabe como solucionar este error?

un saludo.

Hola

Revisa este link

Recuerda utilizar los TAG's

Salu2

Gracias por el link, me he dado cuenta que el datetimepicker coge los datos en formato dd/mm/aaaa y en mysql la fecha la toma en formato aaaa/mm/aaaa
por lo que se me había ocurrido declararme 2 variables string e y s (ya que la consulta la hago entre 2 fechas y luego

Código Delphi [-]
e:=formatdatetime('yyyy/mm/dd',datetimepicker1.date);
s:=formatdatetime('yyyy/mm/dd',datetimepicker2.date);

y la consulta quedaria asi:

Código Delphi [-]
datamodule2.Query2.SQL.text:='select num_fra, fec_fra, nom_cli from clientes right join factura on cod_cli=cod_cli_fra where fec_fra >= '+e+' and fec_fra <='+s+' order by fec_fra';

también he probado con:

Código Delphi [-]
 datamodule2.Query2.SQL.text:='select num_fra, fec_fra, nom_cli from clientes right join factura on cod_cli=cod_cli_fra where fec_fra >= '+datetostr(datetimepicker1.Date)+' and fec_fra <='+datetostr(datetimepicker2.Date)+' order by fec_fra';

y en ambos casos me dice que la consulta está vacia cuando existen registros

Gracias por la ayuda ya está solucionado, al final con formatdatetime ha funcionado

Hola pau_elx.

Me alegra que lo resolvieras y agradezco que hayas compartido con nosotros la solución.

Aprovecho para pedirte lo mismo que BlueSteel. Que hagas uso de las etiquetas [delphi] [/delphi] para que el código que expones sea más legible.

Un saludo.