怎样设定数据窗口打印时纸张的大小,如长为200cm,宽为100cm?

以下是实现自定义纸张的完整例子代码:

声明外部函数:( Declaer - Global External Functions 中 )

Function int GetPaperSize(ref ulong lpPaper,ref ulong lpPaperWidth,ref ulong lpPaperLength, &

ref ulong lpOrientation) Library "SetPaper.dll"

Function int SetPaperSize(uint Width,uint Height,uint Orient) Library "SetPaper.dll"

声明全局变量:( Declaer - Global Variables 中 )

ulong ll_Paper,ll_PaperWidth,ll_PaperLength,ll_Orientation

需要时调用:

//取当前打印机的纸型,宽,长,方向,用于程序结束后恢复原设置.

GetPaperSize(ll_Paper,ll_PaperWidth,ll_PaperLength,ll_Orientation)

//按自己的要求设置自定义纸张大小及方向,并将当前打印机默认纸张设为自定义纸张

setpapersize(100,200,1)

//将数据窗口dw_1设为当前打印机默认纸张,即自定义纸张类型

dw_1.object.datawindow.print.paper.size=0

//将数据窗口dw_1设为打印预览模式

dw_1.object.datawindow.print.preview='yes'

关闭时调用:

//关闭数据窗口打印预览

dw_1.object.datawindow.print.preview='no'

//程序结束后恢复原打印机纸张设置

setpapersize(ll_PaperWidth,ll_PaperLength,ll_Orientation)

SetPaper.dll是用BC++写的。你说你不想用DLL，呵呵，我可以告诉你，PB很多功能

假定编辑用的数据窗口是dw_1,打印预览用的是dw_print ，则可以用：

dw_print.dataobject = dw_1.dataobject

dw_1.sharedata(dw_print)

把dw_1中的数据显示到dw_print中保持一致

打印预览完毕后，需要用：dw_print.ShareDataOff() 关闭数据共享

---