pb 设置打印机

来源:互联网 发布:linux查看oracle实例 编辑:程序博客网 时间:2024/05/21 11:30
最近遇到关于打印的一些问题。
在数据窗口中实现了检索的数据,但需要打印出来,不知如何进行打印窗口设置。我的代码如下:
printsetup()//设置打印机属性
dw_tj_result.Object.DataWindow.Print.Preview  = "yes"//进行打印预览
dw_tj_result.Object.DataWindow.Print.Preview.Rulers = "yes"
messagebox("提示","预览比例为75%")
dw_tj_result.object.datawindow.print.preview.zoom=75 //设置预览比例为75%

integer li_Net
li_Net = MessageBox("提示", "确认开始打印吗?", &
Exclamation!,YesNo!, 2)
IF li_Net = 1 THEN
     dw_tj_result.print()
else
return
END IF
但我现在的问题是,打印出的内容太靠纸头了,即页眉空间太小了,能用什么方法进行调整,最好能向word打印设置中那样进行动态调整;另外窗口的表格属性项较多,即设置了横向页面布局设置仍不够,有没有好的方法,能打完整个表格(是否可以调整字体或间距,又如何实现呢?)。
谢谢!

在线等!


pb8.0 打印设置:
//打印份数
dw_print.object.datawindow.print.copies=lstr_param.prn_printcopies
//纸张大小
dw_print.object.datawindow.print.paper.size=lstr_param.prn_papersize
//打印方向
dw_print.object.datawindow.print.orientation=lstr_param.prn_orientation
//页边距
dw_print.object.datawindow.print.margin.left=string(lstr_param.prn_margin_left)
dw_print.object.datawindow.print.margin.top=string(lstr_param.prn_margin_top)
dw_print.object.datawindow.print.margin.bottom=string(lstr_param.prn_margin_bottom)
dw_print.object.datawindow.print.margin.right=string(lstr_param.prn_margin_right)
//缩放比例
dw_print.Object.DataWindow.Zoom=integer(lstr_param.prn_scale)
dw_print.Object.DataWindow.print.scale=integer(lstr_param.prn_scale)
em_font.text =lstr_param.prn_scale
//打印到文件
dw_print.object.datawindow.print.filename=lstr_param.prn_filename
//打印范围
dw_print.object.datawindow.print.page.rangeinclude=lstr_param.prn_printrange

0 0