Fechas con distintos formatos en una DBGrid

[defcon1_es]

Hola, si usas parámetros, no te pasarán esas cosas

Código Delphi [-]
 ADOQDatos.Close;
 ADOQDatos.SQL.Clear;
 ADOQDatos.SQL.Add('SELECT F_Mov, B1, B2, B3, Ord_Eje_Inc, Ord_Noeje, Ord_Bien, Observac FROM MOV_SCADA WHERE F_Mov = :ParFecha ORDER BY B1');
 ADOQDatos.ParamByName('ParFecha').AsDateTime := MCalendario.Date;
 ADOQDatos.Open;
// ADOQDatos.ExecSQL; //creo que sobra

PD: Si en F_Mov guardas las horas,minutos y segundos, la consulta no saldrá correctamente.
Yo siempre omito las horas, minutos y segundos para estos casos:

SELECT F_Mov, B1, B2, B3, Ord_Eje_Inc, Ord_Noeje, Ord_Bien, Observac 
FROM MOV_SCADA WHERE TRUNC(F_Mov) = :ParFecha ORDER BY B1

[Rowerto]

Gracias por la pronta contestacion.
En casa y con un poco de calma he variado un poco el codigo, ya que el ASDATETIME no me funcionaba. Lo hice como sigue:

Código Delphi [-]
ADOQDatos.Close;
ADOQDatos.SQL.Clear;
ADOQDatos.SQL.Add('SELECT F_Mov, B1, B2, B3, Ord_Eje_Inc, Ord_Noeje, Ord_Bien, Observac FROM MOV_SCADA WHERE F_Mov = :ParFecha ORDER BY B1');
//ADOQDatos.ParamByName('ParFecha').AsDateTime := MCalendario.Date;//asi no sirve
ADOQDatos.Parameters.ParamByName('ParFecha').DataType := ftDateTime; 
//como no lo declaro y lo creo en ejecucion le defino el tipo de dato 
//que va a recoger el parametro
ADOQDatos.Parameters.ParamByName('ParFecha').Value := MCalendario.Date;
ADOQDatos.Open;
// ADOQDatos.ExecSQL; //como bien decia defcon1_es esto sobra

Yo antes de esto hacia un apaño, ya que me di cuenta que lo cambiaba solo en los 12 primeros dias y lo estaba haciendo con strings. Una chapuza como un templo (hay que tener dos variables en la funcion de tipo string, busco y buscom).

Código Delphi [-]
busco:=datetostr(MCalendario.Date);
if strtoint(copy(datetostr(MCalendario.Date), 0, 2)) < 13 then
begin
buscom:=trim(copy(busco, 4, 2)+'/'+copy(busco, 0, 2)+copy(busco, length(busco)-4, 5));
busco:=buscom;
end;
//aqui el codigo que yo tenia antes

[Rowerto]

Y por que no me funciona cuando cambio el MonthCalendar por un DateTimePicker?

[[oscarac]]

hola

tambien tenia problemas con las fechas especialmente en access (q es un dolor de cabeza)

lo de abajo me funciona bien

Código Delphi [-]
 
Query.ParamByName('FechaInicio').AsDateTime := StrToDate(FormatDateTime('DD/MM/YYYY',DateTimePicker1.Date));

espero te ayude
saludos

[Rowerto]

Muchas gracias por el resuelve. Al final no lo puse tal cual me lo das, sino que tuve que variarlo un poco para que funcionara. Eso si, funciona FETEN!!!!

En el evento CloseUp del DateTimePicker

Código Delphi [-]
  
ADOQDatos.SQL.Clear;
  ADOQDatos.SQL.Add('SELECT * FROM MOV_SCADA WHERE F_Mov = :ParFecha ORDER BY B1');
  ADOQDatos.Parameters.ParamByName('ParFecha').DataType := ftDateTime;
  ADOQDatos.Parameters.ParamByName('ParFecha').Value := StrToDate(FormatDateTime('dd/MM/yyyy',DateTimePicker1.Date));
  ADOQDatos.Open;

Habia visto la solucion en un par de hilos, pero soy un poco lerdo (a veces )

[[oscarac]]

me alegra haber sido de utilidad !!!
saludos