[bastibubu]

Delphi 10.4.2, Fast Report 6.
компоненты TFDQuery, TDbGrid.
TDbGrid options: RawSelected,MultiSelected, AlwaysShowSelection=true
RangeBegin and RangeEnd of FrxDbDataset=rbCurrent.

Если выбираю несколько строк (left ctrl+mouse) печатает только одну строку(последную по id в гриде).
Как напечатать несколько выбранных строк датасета? Возможно обойти без memotable, clientdataset ?

Код:

 query1.sql.text:='select * from datailtable where mastertable_id=:id';
 query1.open;

// dbgrid1.SelectedRows.CurrentRowSelected:=true;  //лишний?

 for i := 0 to DBGrid1.SelectedRows.Count-1 Do Begin
    DBGrid1.DataSource.DataSet.GotoBookmark(DBGrid1.SelectedRows.Items[i]);
 end;

 frxReport1.LoadFromFile(ExtractFilePath(ParamStr(0))+'Doc_id.fr3');
 frxReport1.PrepareReport;
 frxReport1.ShowPreparedReport;