ERROR: Data Type mismatch in criteria expression

[El Mike]

Hola amigos y amigas del club..

Explico mi problema: manejo delphi 2006 y acces, estoy tratando de hacer una consulta entre fechas y otro dato (digamos modelo), pues bien el asunto es que al hacer mi consulta por medio de un TADOQuery me arroja el siguiente error: "Data Type mismatch in criteria expression".

Ya revice mis tipos de datos en la DB y son de tipo 'Date'.

les pongo el codigo de mi consulta para que lo chequen y me digan si estoy mal... segun yo el codigo esta bien.

para sacar las fechas utilizo dos TDateTimepicker, uno para la fecha inicial y otro para la fecha final.

Código Delphi [-]
QC.Close;
   QC.SQL.Clear;
   QC.SQL.Add('SELECT * from envios');
   QC.SQL.Add('Where (envios.modelo = :mod) and (envios.fecha Between (fecha >= :Fecha1) and (fecha <= :Fecha2))');

   QC.SQL.Add('ORDER By envios.Fecha');
   QC.Parameters.ParamByName('Mod').Value:=frmfreportes.Edopcion.Text;
   QC.Parameters.ParamByName('Fecha1').Value:=frmfreportes.MCdesde.Date;
   QC.Parameters.ParamByName('Fecha2').value:=frmfreportes.MCHasta.Date;

   QC.active:=true;
   QC.Open;

Saludos...