PB中一个类Word打印对话框的实现发送到手机|收藏全屏阅读模式字体:小|大Powerbuilder数据窗口可用于生成各种复杂的报表,但如何让用户在使用时控制打印份数、打印范围等信息呢?我们在开发我局MIS系统时,经过对我局报表打印需求的分析,提出了如下的功能要求:1.必须能够控制象打印份数、打印(页码)范围等信息,这是基本的要求。2.我们系统中装有多台打印机,必须能让用户根据自己需要选择使用哪台打印机,必要时能对所选打印机进行配置。3.在设计时,对每一个报表需要什么样的纸张,要多大的边距合适,都已确定,所以使用时不需要页面的设置。但由于不同的报表使用不同的纸张,必须在使用时给出提示,以便用有机会换上合适的纸张(或换用合适的打印机)。根据以上要求,我们设计了如下图所示的对话框。下面把设计过程以及用到的技术介绍一下。首先使用窗口画板画出窗口,名字为w_printdlg,窗口类型为respons。“打印机”组框中的“名称”文本控制的名字为st_printname,“设置”按钮的名字为cb_printsetup。“页面范围”组框中的无线按钮组名字分别为rb_pagearrangeall,、rb_pagearrangecurrent、rb_pagearrange,单行编辑框名字为sle_pagearrange,其enable属性为false。“副本”组框中的编辑域名字为em_copies。“打印”旁边的下拉列表框名字为ddlb_printwhat,列表有三项,分别为所选页面、偶数页、奇数页。“纸张”组框中的下拉列表框名字为ddlb_paper,列表内容为Poerbuiler定义的43种纸张类型,分别用0-42的数字来表示。“纵向”无线按钮的名字为rb_portrait,“横向”无线按钮的名字为rb_landscape。表示纵向和横向的图片框分别为p_portrait和p_landscape。命令按钮“确定”和“取消”的名字分别为cb_ok和cb_cancel。以上工作完成之后,就要着手编写程序。首先为窗口定义实例变量idw_toprint,类型为datawindow,用于保存要打印的数据窗口。再定义一个窗口事件ue_initcontrols(也可以定义为窗口函数),其程序内容如下://eventue_initcontrols()//设置窗口中各控件的初始值st_printername.text=idw_toprint.object.datawindow.printer//当前打印机名字em_copies.text="1"//默认打印份数为1rb_pagearrangeall.checked=true//默认范围为全部页sle_pagearrange.enabled=false//页面范围编辑框无效ddlb_printwhat.SelectItem(1)//默认为“所选页面”//打印方向integerli_temi_temp=integer(idw_toprint.object.datawindow.print.orientation)//取出设计时的方向ifli_temp=1then//横向rb_landscape.checked=true//选中p_landscape.visible=true//图片显示p_portrait.visible=falseelseifli_temp=2then//纵向rb_portrait.checked=truep_portrait.visible=truep_landscape.visible=falseendif//纸张类型li_temp=integer(idw_toprint.object.datawindow.print.Paper.Size)//设计时的纸张类型ddlb_paper.SelectItem(li_temp+1)//列表框中选中然后,在窗口的open事件中编写如下脚本://openevent//要使用OpenWithParm()打开,参数中包含要打印的数据窗口。idw_toprint=message.powerobjectparm//从参数中取出要打印的数据窗口this.eventue_initcontrols()//初始化窗口各控件在无线按钮rb_pagearrangall的clicked事件中编写脚本如下:sle_pagearrange.enabled=false在无线按钮rb_pagearrangcurrent的clicked事件中编写脚本如下:sle_pagearrange.enabled=false在无线按钮rb_pagearrang的clicked事件中编写脚本如下:sle_pagearrange.enabled=true//当此无线按钮选中时才可用在命令按钮cb_printersetup中编写如下脚本://cb_printersetupPrintSetup()//设置打印机parent.eventue_initcontrols()在无线按钮rb_portrait的clicked事件中编写如下脚本://纵向p_landscape.visible=falsep_portrait.visible=true//显示纵向图片框在无线按钮rb_landscape的clicked事件中编写如下脚本://横向p_portrait.visible=falsep_landscape.visible=true在命令按钮cb_cancel的clicked事件中编写如下脚本//cb_cancel执行程序CloseWithReturn(parent,2)//如果选择取消,返回2在命令按钮cb_ok的clicke...