Código Delphi
[-]
query1.Active := false;
query1.SQL.Text := 'select * from tabla';
query1.Active := true;
Código Delphi
[-]
query2.Active := false;
query2.SQL.Text := 'select * from tabla where cliente = ''%MI%''';
query2.Active := true;
antes de llamar al preview del quickreport, pones su propiedad dataset a la query q quieras sacar
Código Delphi
[-]
QuickRep1.DataSet := Query2; QuickRep1.Preview;
...
QuickRep1.DataSet := Query1; QuickRep1.Preview;
...
...
por lo que veo ahora estas hablando de registros seleccionados, supongo que con el multiselect. Entonces debes usar la propiedad SelectedRows para, con sus items, saber que registros se han marcado y construir asi tu query2
Código Delphi
[-]
Query2.Active := false;
Query2.sql.text := 'select * from tablas where id = -1 and'
for i := 0 to DBGrid1.SelectedRows.Count do
Query2.sql.text := ' id = ' + DBGrid1.SelectedRows.Items[i] + ' and';
Query2.Active := true;
PD: lo de arriba es pseudocodigo. deberas investigar en el foro o en la ayuda el correcto uso de Selectedrows.