采用TQuickRep控件QuickRep1,QuickRep2两个控件用QRCompositeReport1控件联合打印
procedure TFrm_Printer.QRCompositeReport1AddReports(Sender: TObject);
beginwith QRCompositeReport1.Reports do
begin
Add(QuickRep1);
Add(QuickRep2);
end;
end;
procedure TFrm_Printer.QRCompositeReport1AddReports(Sender: TObject);
beginwith QRCompositeReport1.Reports do
begin
Add(QuickRep1);
Add(QuickRep2);
end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货