Question

请教如何用fastreport打印DBGrid中选中的记录

Answer 1

1.打印单条记录（当前记录），frxDataSet 设置RangeBegin和RangeEnd为Current
2.打印选中记录，基本思路：按照数据集过滤格式获取选中行的主键组合字串，过滤数据集，尔后打印。代码可依照如下（未测试）
uses StrUtils;

const filter:string = 'id in (%s)';//id相当于主键
var
i: Integer;
tmpStr,sql:string;
begin
with dbgrd1 do
begin
for i:=0 to SelectedRows.Count-1 do
begin
//假设Grid中第1列为主键所在列
tmpStr:=tmpStr+quotedStr(SelectedRows.Items[i][0])+',';
end;
if AnsiEndsStr(',',tmpStr) then
begin
tmpStr=AnsiLeftStr(tmpStr,Length(tmpStr)-1);
end;
DataSet.filtered:=false;
DataSet.filter := Format(filter,[tmpStr]);
DataSet.filtered:= True;
//打印
end;
end;