Consultas por fecha

[gerasA]

Hola!
Tengo un problemita, lo que pasa es que tengo 7 tablas con los mismos campos y quiero que el usuario consulte por fecha de cada tabla, pero el formato de la fecha de mi tabla es dd/mm/aaaa y en sql el formato es mm/dd/aaaa entonces quiero cambiar el formato, osea que el usuario capture dd/mm/aaaa lo ke hago es lo sig:

Código Delphi [-]
consulta:='select * from Aluminio where Fecha =';
consulta:=consulta+quotedstr(edit1.Text);
consulta:=consulta+'order by Folio';
Query1.SQL.Clear;
Query1.SQL.Add(consulta);
Query1.Active;
Query1.Open;

Si hace la consulta pero el usuario tendria ke capturar la fecha asi mm/dd/aaaa como les comento yo kiero ke capture dd/mm/aaaa
espero ke me puedan ayudar
Gracias

[[eduarcol]]

utiliza los parametros asi no tendras que preocuparte por el formato de las fechas en las consultas

[ContraVeneno]

creo que esto ya lo había vivido en otro hilo, pero no recuerdo donde...


Lo mejor es que el usuario capture la fecha en un TDateTimePicker que en lugar de un TEdit, así ni tú, ni el usuario, tendrían que preocuparse por el formato.

Y a la hora de pasarlo a SQL, utiliza parámetros, de esa manera tú no tendrías que preocuparte por el formato.

[GustavoCruz]

Hazlo de esta forma

Código Delphi [-]
ConsultaSQL:='select * from Aluminio where fecha = #'+formatdatetime('mm/dd/yyyy',datetimepicker.date)+'#';
with query1 do
  begin
     sql.clear;
     sql.add(ConsultaSQL);
     open;
  end;

así debe funcionar...

Saludos...

[donki]

Hola GustavoCruz,

Es bastante engorro construir la string de consulta con una fecha con formato.

Yo te propongo lo que se comentan por otros foros y poner parámetros a la consulta:

Por ejemplo:

q.SQL.Text = 'Select * From Tabla Where Fecha=:MyFecha';
q.Parameters[0].Value = '01/01/2008';

De esta forma te puedes olvidar de los formatos de fechas.

Suerte

[gerasA]

Muchas Gracias a todos!
Ya solucione el problema