Si adaptas este ejemplo que yo utilizo no tendrás problemas.
Código Delphi
[-]Procedure Facturas_Del_Mes();
begin
DmComisi.QrComis.Close;
DmComisi.QrComis.Sql.Clear;
DmComisi.QrComis.Sql.Add('Select NFactura, Fecha, Codclient, Vendedor, ');
DmComisi.QrComis.Sql.Add('Base, Repartos ');
DmComisi.QrComis.Sql.Add(' from Facturas');
DmComisi.QrComis.Sql.Add('Where Vendedor = '+QuotedStr(DmAni.VendCodigo.Value));
DmComisi.QrComis.Sql.Add('And Fecha Between :Ini And :Fin');
DmComisi.QrComis.ParamByName('Ini').AsDate:= fIni;
DmComisi.QrComis.ParamByName('Fin').AsDate:= fFin;
DmComisi.QrComis.Open;
end;
fIni y fFin, son variables de tipo TdateTime.
Un Saludo.