Delphi - ¡¡¡¡problemas con consulta!!!!

Hola, tengo una consulta de seleccion en la que le paso 2 parametros pero al ser del tipo fecha cuando lo hago así me da error

with DataModule2.query_reporte_unidades do
begin
Close;
SQL.Clear;
SQL.Add('Select nombre From consumo Where consumo.dia between '+#39+fecha_asignacion_transervi+#39+' and '+#39+'date'+#39+')';
Open;
end;

entonces me dice que no se puede meter un tipo fecha en un tipo cadena. Agradecería mucho su ayuda.

A veces funciona pasando la fecha en string, pero puede darte problemas por aquello del mes y día 31/12/2004 o 12/31/2004

SQL.Add('Select nombre From consumo Where consumo.dia between '+#39+DateTimeToStr(fecha_asignacion_transervi)+#39+' and '+#39+DateTimeToStr(date)+#39+')';

lo mejor es usar parametros

SQL.Add('Select nombre From consumo Where consumo.dia between :f1 and :f2')
Params[0].Value := fecha_asignacion_transervi;
Params[1].Value := DATE;
Open;

ok...