Y yuan625 Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-12 #1 我在TQuickRep的TQrimage中加了一个背景图片(*.jpg),如何实现能预览TQrimage还不 打印TQrimage,敬请国际援助!
Y yuan625 Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-12 #4 我想实现的功能:预览时可以看到背景图,但打印时不打印出来。
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-12 #6 这个很好办。 设置一个全局变量。 RunTimes: Integer; 在调用QuickReport以前初始化RunTimes:=0; 在他的BeforePrint里面判断打印次数。 procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin if RunTimes = 1 then //注意,如果你使用了prepare,那么这里需要判断是否为2 QRImage1.Enabled := False; RunTimes := RunTimes + 1; end;
这个很好办。 设置一个全局变量。 RunTimes: Integer; 在调用QuickReport以前初始化RunTimes:=0; 在他的BeforePrint里面判断打印次数。 procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin if RunTimes = 1 then //注意,如果你使用了prepare,那么这里需要判断是否为2 QRImage1.Enabled := False; RunTimes := RunTimes + 1; end;
Y yuan625 Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-12 #7 在调用QuickReport以前初始化RunTimes:=0; 如何做?
Y yuan625 Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-12 #10 yzhshi,老大,你很忙是吗?我试过啦,没成功,不只为什么? 可否详细讲解?
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-12 #12 Sorry,最近一直挺忙的。 看来你已经试验成功了。其实就是使用这个办法实现套打的。没有什么别的好办法。