Delphi - Busqueda entre fechas con ado access

Estoy buscando entre dos fechas con el siguiente codigo :
"Query2.SQL.Text := ('SELECT * FROM Kilometros ');
Query2.sql.add('Where Fech between :Fecha1 and :Fecha2');
Query2.Parameters.ParamByName('fecha1').Value := dtpc1.Date ;
Query2.Parameters.ParamByName('fecha2').Value := dtpc2.Date ;
query2.SQL.Add('Order by Fech');
Query2.Open;
Query2.Filter := 'Mat = '+QuotedStr(Cb1.Text);
Query2.Filtered := True; "

Y me da este error : "No Coinciden los tipos de datos en la expresion de criterios".
Que estoy haciendo mal?. Me está volviendo loco. Me podeis echar una mano?
La base de datos es access y uso ado delphi7.
Gracias anticipadas

Corre el programa linea a linea para ver donde esta el error, si al abrir el query o al filtrar

hola ..
asi de pronto me asaltan unas dudas sobre tu codigo

Query2.sql.add('Where Fech between :Fecha1 and :Fecha2'); //podria ser que Fecha1 no es igual que fecha1, haber si va a ser eso.

quizas asi.
Query2.sql.add('Where Fech between :fecha1 and :fecha2');

y en caso de no funcionar probaria esto.

Query2.sql.add('Where Fech between ":fecha1" and ":fecha2"');

espero que halla suerte.

Query2.SQL.Text := ('SELECT * FROM Kilometros ');
Query2.sql.add('Where Fech between :Fecha1 and :Fecha2');
Query2.Parameters.ParamByName('fecha1').Value := FormatDateTime('dd,mm,yyyy',dtpc1.Date) ;
Query2.Parameters.ParamByName('fecha2').Value := FormatDateTime('dd,mm,yyyy',dtpc2.Date) ;
query2.SQL.Add('Order by Fech');
Query2.Open;
Query2.Filter := 'Mat = '+QuotedStr(Cb1.Text);
Query2.Filtered := True;

Perdona las molestias pero lo he solucionado de esta forma y me funciona perfectamente.
Gracias y perdona por las molestias