...
with QuickReport1.ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select tablaA.ta_fecha,');
SQL.Add('tablaA.ta_total-(tablaA.ta_total * TablaB.Dcto/100) as descuento ');
SQL.Add('from tablaA, tablaB ');
SQL.Add('where tablaA.ta_descuento = tablaB.ID');
SQL.Add('and ta_fecha between :DESDE and :HASTA');
Parameters.ParamByName('DESDE').Value:= DateTimePicker1.Date;
Parameters.ParamByName('HASTA').Value:=DateTimePicker2.Date;
Open;
end;
QuickReport1.QRDBText1.DataSet:= ADOQuery1;
QuickReport1.QRDBText1.DataField:= 'descuento';
...