用ReportBuilder5套打的问题(100分)

  • 主题发起人 主题发起人 sysu
  • 开始时间 开始时间
S

sysu

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在预览时正常显示,即包括那些不需打印的内容,而真正打印时不打印出来?
 
能给我份简单的例子么?
sheepish@china.com
谢谢。收到奉送30分
 
大家没觉得 report Builder 太慢?
 
把RBuilder下的Source目录下的ppPrvDlg.dfm、ppPrvDlg.pas两个文件拷
到你的程序目录下并加到程序中,在ppPrvDlg.pas代码中 ppViewer1.Print;
前加上代码:
form1.ppLabel1.caption := '';
//不想打印
form1.ppLabel2.caption := '';
//不想打印

如果不想打印的ppLabel多,可以把不想打印的ppLable的Tag值设成1
打印时上面的代码变成:
for I := 0 to form1.ComponentCount-1do
if form1.Components is TppLabel then
if form1.TppLabel(Components).Tag = 1 then
begin
form1.TppLabel(Components).caption := '';
Break;
end;
 
接受答案了.
 
后退
顶部