Hola,
debes pasar los valores de Fecha1 y Fecha2 como parámetros a esa query:
Código Delphi
[-]
procedure TFCotiReport.RzBitBtn2Click(Sender: TObject);
begin
DM3.wQueryReport.Sql.Clear;
DM3.wQueryReport.Sql.Add('SELECT No_Presupuesto, Cod_Cliente,
Cliente, Obra, Fecha, FechaVenc');
DM3.wQueryReport.Sql.Add('FROM "TPresupuestos.DB" Tpresupuestos');
DM3.wQueryReport.Sql.Add('Where FechaVenc >= :Fecha1 And FechaVenc <= :Fecha2 ');
DM3.wQueryReport.ParamByName('Fecha1').AsDateTime := DateTimePicker1.Date;
DM3.wQueryReport.ParamByName('Fecha2').AsDateTime := DateTimePicker2.Date;
DM3.wQueryReport.Open;
end;
Si no quieres tener encuenta la hora, minutos y segundos de los DateTimePicker:
Código Delphi
[-]
DM3.wQueryReport.ParamByName('Fecha1').AsDateTime := Trunc(DateTimePicker1.Date);
DM3.wQueryReport.ParamByName('Fecha2').AsDateTime := Trunc(DateTimePicker2.Date);