PowerBuilder中实现数据窗口打印预览通用方法

2024-07-21 02:10:22

字体：大中小

来源：转载

供稿：网友

商业源码热门下载www.html.org.cn

　　我们在文字处理过程中，常常在打印前要预览，以便控制打印效果，特别在数据打印中要有选择地打印页面，更需要预览。powerbuilder提供了程序开发过程中的数据打印预览，下面介绍在程序应用中实现打印预览通用方法。主窗口示意图如下：

打印预览窗口
预览尺寸
自定义 30% 50% 100% 200% 标尺

一、上述w_preview窗口中各控件说明：
1. 命令按钮控件(commandbutton)
cb_1: 用于数据窗口翻至首页。
cb_2: 用于数据窗口向上翻页。
cb_3: 用于数据窗口向下翻页。
cb_4: 用于数据窗口翻至尾页。
cb_5: 用于关闭打印预览数据窗口。
2．复选框控件(checkbox)
cbx_1:用于为预览数据窗口添加显示标尺。
3．掩码编辑器控件(editmask)
em_1:用于显示和改变打印预览的相对比例。
4．成组框控件（groupbox）
gb_1:用于显示一组控件的共同属性信息。
5．收音机按钮控件（radiobutton）
rb_1:用于用户自定义打印预览显示比例。
rb_2:用于用户设置打印预览显示比例为30%。
rb_3:用于用户设置打印预览显示比例为50%。
rb_4:用于用户设置打印预览显示比例为100%。
rb_5:用于用户设置打印预览显示比例为200%。
6．数据窗口控件（datawindow）
dw_1:用于显示打印预览结果。

二、下面讲述创建上述窗口的实现过程：
1．创建一个新窗口w_preview,设置该窗口的类型(windowtype)为response,设置窗口的标题(title)为“打印预览窗口"。
2．在主窗口中按示意图放置各个控件，为掩码编辑器（em_1）定义属性,在general页中定义text为“100”，在mask页中为mask定义为“###”，选中spin control, 设置spin increment为“1”，设置spin range的min为“1”、max为“200”。
3．为窗口创建结构s_preview,具体步骤是：在powerbar工具栏中点取结构画笔（structure）,在“选择结构（select structure）”对话框中单击“new"按钮,进入结构定义窗口,在结构成员名（variable name）中输入“dw_name",在结构类型（type）中选择“string",以“s_preview"为对象名保存此结构。
4．为窗口w_preview定义open事件程序如下：
s_preview preview_parm
preview_parm=message.powerobjectparm
dw_1.dataobject=preview_parm.dw_name
dw_1.settransobject(sqlca)
dw_1.objectwindow.print.preview=“yes"
5．为掩码编辑器（em_1）定义二个用户事件（user events），二事件名称为user_change和user_room, 事件user_change 的事件标识为pbm_enchange,它是在编辑器值发生改变时触发，事件user_room的事件标识为pbm_custom01,它是在用户调用triggerevent()函数时触发，下面介绍这二事件的程序。
user_change事件程序如下：
if integer(this.text)>0 and integer(this.text)<=200 then
dw_1.object.datawindow.print.preview.zoom=integer(this.text)
end if
rb_1.checked=true
user_room事件程序如下：
if integer(this.text)>0 and integer(this.text)<=200 then
dw_1.object.datawindow.print.preview.zoom=integer(this.text)
end if
6.收音机按钮rb_2的clicked事件程序如下:
em_1.text=“30”
em_1.triggerevent("user_room")
7.收音机按钮rb_3的clicked事件程序如下:
em_1.text=“50”
em_1.triggerevent("user_room")
8.收音机按钮rb_4的clicked事件程序如下:
em_1.text=“100”
em_1.triggerevent("user_room")
9.收音机按钮rb_5的clicked事件程序如下:
em_1.text=“200”
em_1.triggerevent("user_room")
10.复选框cbx_1的clicked事件程序如下:
if cbx_1.checked=true then
dw_1.object.datawindow.print.preview.rulers=“yes"
else
dw_1.object.datawindow.print.preview.rulers=“no"
end if
11.命令按钮cb_1的clicked事件程序如下:
dw_1.scrolltorow(0) //翻至首页
12.命令按钮cb_2的clicked事件程序如下:
dw_1.scrollpriorpage() //翻至前页
13.命令按钮cb_3的clicked事件程序如下:
dw_1.scrollnextpage() //翻至后页
14.命令按钮cb_4的clicked事件程序如下:
dw_1.scrolltorow(999999999) //翻至尾页
15.命令按钮cb_5的clicked事件程序如下:
close(parent) //退出打印预览
16．以w_preview为窗口名，保存上述窗口。

三、调用上述通用打印预览窗口(w_preview)
被预览的数据窗口可以是普通数据窗口，也可以是复合数据窗口，假设要预览的数据窗口为dw_2,用如下方法调用:
s_preview ls_parm
ls_parm.dw_name=“temp.psr”
dw_2.saveas("temp.psr",psreport!,true)
openwithparm(w_preview,ls_parm)

上一篇：用PB编写邮件应用程序

下一篇：PB的可执行文件所需的环境DLL