Problema con consulta fecha desde hasta access delphi 7

[Yensis22]

Ya realice los cambio, pero no medan resultada si ejecuto la consulta con interbalos de fecha no me haces nada no tira ningun mensaje ni datos tampoco, si la ejecuto en Blanco me tira este error

"//" is not a valid invalin date date and time

Pero es que en EditMask no se encuentra el tipo de formato dataime y el que tengo es el date y le es relizado varios cambios pero no e tenido ningun resultados y es que en access el unico formato de facha es Fecha/Hora. Y tambie cambie los paramtros al tipo ftdatetime y realice uno cambios de coddigo verificalo por fovor

Código Delphi [-]
var  FConsuEquiFech: TFConsuEquiFech;implementationuses login;{$R *.dfm}procedure TFConsuEquiFech.SpeedButton4Click(Sender: TObject);beginClose ();end;procedure TFConsuEquiFech.DesdeExit(Sender: TObject);VarA,B: Tdate;beginA:= strtodatetime(Desde.text);B:= strtodatetime(Hasta.text);if A > B then Begin   Showmessage('La Fecha inicial no Puede ser Mayor que la Final');   desde.clear;   Activecontrol:= desde; End;end;procedure TFConsuEquiFech.HastaExit(Sender: TObject);VarA,B: Tdate;beginA:= strtodatetime(Desde.text);B:= strtodatetime(Hasta.text);if B < A then Begin   Showmessage('La Fecha Final no Puede ser Menor que la Inicial');   Hasta.clear;   Activecontrol:= Hasta; End;end;procedure TFConsuEquiFech.FormShow(Sender: TObject);begindesde.Clear;hasta.Text := datetimetostr(now);Desde.Text := datetimetostr(now);end;procedure TFConsuEquiFech.SpeedButton1Click(Sender: TObject);beginWith ConexionDB do begin        QEquiposporFech.active :=false;        QEquiposporFech.ParamByName('fecha1').Asdatetime:=strtodatetime(desde.text);        QEquiposporFech.ParamByName('fecha2').Asdatetime:=strtodatetime(hasta.text);        QEquiposporFech.active :=true;       // QEquiposporFech.Dataset := QEquiposporFech;      // QEquiposporFech := Desde;       //QEquiposporFech := Hasta;end ;end;end

y no se con resolver este problema

[[Caral]]

Hola
Es la misma pregunta que esta aqui.
Revisa las respuestas en ese hilo.
Saludos

[GustavoCruz]

Hola Yensis22
El problema se soluciona de la siguiente forma: pones los dos datetimepicker,
y le dices al usuario que introduzca el rango de fechas.

la consulta serìa la siguiente:

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

Código Delphi [-]
'select * from tabla where fecha between #'+fecha1+'# and  #'+fecha2+'#'

no importa el orden que el usuario le asigne a las fechas 1 y 2... prueba y me cuentas...