在QuickReport的OnNeedData中不段把DBGrid中复选的数据读出来,赋值到QuickReport上面的指定的控件中。
程序思路大致是这样:procedure TForm2.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean);
begin
数据源定位,用GotoBook(...
读取数据源的数据,赋值到界面上的控件
如果还没有到结尾,设置MoreData:=true;
end;
程序思路大致是这样:procedure TForm2.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean);
begin
数据源定位,用GotoBook(...
读取数据源的数据,赋值到界面上的控件
如果还没有到结尾,设置MoreData:=true;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货