[rrosariom]

Saludos,

Tengo una base de datos en dbase y estoy haciendo una consulta por fecha y me devuelve un mensaje de error como el que sigue:

type mismatch in expression

Lo he hecho de diferente manera como sigue:

form6.Query1.Close;
form6.Query1.SQL.Clear;
form6.Query1.SQL.Add('select * from tbl_backup where fecha='+datetostr(DateTimePicker1.Date));
form6.Query1.Open;
if form6.query1.recordcount > 0 then
form6.showmodal
else
showmessage('No existen registros en la fecha especificada');

=========================================================================

{form6.Query1.close;
form6.Query1.sql.clear;
form6.query1.sql.add('select * from tbl_backup');
form6.query1.sql.add('where fecha =' + DateToStr(DateTimePicker1.Date));
form6.query1.open;
if form6.query1.recordcount > 0 then
form6.showmodal
else
showmessage ('No existen registros para la fecha indicada');

==========================================================================
form6.query1.SQL.clear;
form6.query1.sql.add('Select * from tbl_backup,');
form6.query1.sql.add('where Fecha =# '+DateToStr(DateTimePicker1.Date)+'#');
form6.Query1.Params[0].AsDate:= datetimepicker1.date;
form6.query1.open;
if form6.query1.recordcount > 0 then
form6.showmodal
else
showmessage ('No existen registros para la fecha indicada');

El campo de es tipo date y estoy utilizando el componebte datetimerpicker1.

Espero que alguien me ayude con esto por favor.