关于打印总页数的问题,请大家多帮帮忙啊,先谢过了! (50分)

H

hcw

Unregistered / Unconfirmed
GUEST, unregistred user!
1、如何在页面上打印这样的信息:
第2页,共8页

2、如何在最后一页加注脚?
3、如何在每一页的最下面加注脚,像第一个问题类似的!

非常感谢
 
你是用QuickReport吗?
用sysdata机可解决你的问题。看看在线帮助吧!
 
我也需要同样的东西,可以帮我解决吗
 
哎呀,就是QREPORT栏里面的一个控件啊。
在QREPORT栏的第10个,图标的下面有一个SYS字样
把这个东西加到报表里面,然后看该控件的属性DATA,选择PAGENUMBER就可以了
 
用excel套打吧,所有的都有呀!
 
是的,在线帮助全是英语看不太懂
 
lovefox 哥们,谢谢你!那总页数怎么打印?
zzf888 哥们说的套打怎么打?这个我不太会!
 
nPageCount := form1.QuickRep1.QRPrinter.PageCount

OK?
 
nPageCount := form1.QuickRep1.QRPrinter.PageCount
?
是定义一个变量然后把这个变量的值给一个 QRExpr 控件的表达式吗?我太笨了。
另外我发现我的第一个问题用 QRExpr 控件 ,表达式为 PAGENUMBER 也可以的!没想到这个这么容易。
没办法,刚才接触,一些简单的简单的问题也不会。
 
没有关系啊。大家以前都这样啊,而且编程这东西博大精深,一个人
不可能精通所有的东西,大家贵在交流啊。是么?[:D][8D][:(][:(!]
 
我初学的时候连网都没得上,[:(]
 
to hbezwwl:
呵呵,那现在一定是高手
 
使用TPrinters类吧。
printer.begin
doc;
printer.canvas.textout(600,600,'8');
printer.enddoc;
 
>>1、如何在页面上打印这样的信息:
>>第2页,共8页
用QrSysData把Data属性设为QrsPageNumber.
或者用QrExpr,Expression=PageNumber;
如果想得到总页数,则先要QuickRep1.Prepare,再
QuickRep1.Preview才能得到.可用QRLabel显示出来.
总页数为QuickRep1.QrPrinter.PageCount;

>>3、如何在每一页的最下面加注脚,像第一个问题类似的!
加入一个QRBand,BandType为PageFooter.在里面放置你想要显示的内容.

>>2、如何在最后一页加注脚?
同上,不过要先判断PageNumber是否等于QuickRep1.QrPrinter.PageCount;

 
不好意思,不家一点没弄清楚,那总页数为QuickRep1.QrPrinter.PageCount
这个值在什么地方赋呢?多谢了
 
priview之前
 
在QRLabel1的OnPrint事件中
Value:=QuickRep1.QrPrinter.PageCount;
 
priview 之前加报错:

Project test.exe raised exception class EAccessViolation with message 'Access
violation at address 004EE2C6 in module 'test.exe'. Read of address
0000006C'.Process stopped. Use Step or Run to Continue.

下面是选 'OK' 或 'Help'
 
在QuickRep的Prepare之后,在BeforePrint事件中.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
950
SUNSTONE的Delphi笔记
S
S
回复
0
查看
772
SUNSTONE的Delphi笔记
S
顶部