设置QuickRep的 while i<QuickRep1...PageNumber do begin QuickRep1.PrinterSettings.FirstPage:=i; QuickRep1.PrinterSettings.LastPage:=i; QuickRep1.print; inc(i); end;
for i:=1 to ..PageNumber do begin QuickRep1.PrinterSettings.FirstPage:=i; QuickRep1.PrinterSettings.LastPage:=i; QuickRep1.Print; end;
应该不关打印机的事情把
我在word下打印多页都没问题
谁告诉我我该怎么办??
分数不够可以在加!!!!!!!!
一点问题都没有
真tmd怪了
后面的就一团漆黑.那是操作系统的问题.
我同事昨天试了
可报表做了那么多了
不想改了
打印记录多的时候需要分页啊
一次放一页纸也不行
我们估计可能与打印机内存容量有关,至于Word等能正常打印,可能是因为Word是按页发送数据,而QReport则是一次全发过去了:(
如果可能,换一能新的打印机试一下(新的机器一般内存会稍大些)
while i<QuickRep1...PageNumber do
begin
QuickRep1.PrinterSettings.FirstPage:=i;
QuickRep1.PrinterSettings.LastPage:=i;
QuickRep1.print;
inc(i);
end;
begin
QuickRep1.PrinterSettings.FirstPage:=i;
QuickRep1.PrinterSettings.LastPage:=i;
QuickRep1.Print;
end;
每次打印一页时正常
代码写在哪里?
因为Delphi中的报表是作为图形打印的,在打印机属性中的图形页把分辨率设为低一点就搞定了.
因为Delphi中的报表是作为图形打印的,在打印机属性中的图形页把分辨率设为低一点就搞定了.
请各位到http://www.csdn.net/Expert/topic/447/447488.shtm签个名
中午下班结贴!!!
[email protected]
代码写在哪里?