打印和打印机设置函数.doc

《打印和打印机设置函数.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、打印和打印机设置函数打印函数用于在打印机上格式化输出数据。这组函数与各对象的Print()函数有所不同，程序在使用这组函数时，需要使用PrintOpen()函数打开一个打印作业，然后根据需要执行这组函数中的一个或多个函数，最后使用PrintClose()函数关闭打印作业。打印机设置函数用于得到当前的打印机名称，设置应用程序使用的打印机，得到系统中包含的所有打印机，显示打印机设置对话框等。1、Print()功能：以当前字体在打开的打印作业中打印一行或多行文本。语法：Print(printjobnumber,{tab1,}string{

2、,tab2})参数：printjobnumber：用PrintOpen()函数打开的打印作业号；tab1：Integer类型，可选项，指定文本开始打印的位置，在开始打印字符串之前将打印光标移动到该位置，从打印区的左边界开始计算，以千分之一英寸为单位。如果打印光标已经位于指定位置、或打印光标已经超过了指定位置、或省略了该参数，那么，Print()函数从打印光标的当前位置开始打印string：string类型，指定要打印的字符串。如果字符串中包括回车换行字符（~r~n），那么该字符串将被分成多行输出，但是，除第一行之外，其它行忽略tab

3、1参数指定的起始打印位置；tab2：Integer类型，可选项，指定字符串打印结束后打印光标移动到的位置，从打印区的左边界开始计算，以千分之一英寸为单位。如果打印光标已经超过了指定位置，那么Print()函数忽略该参数，打印光标位于已打印字符串的尾部。如果省略了该参数，Print()函数把打印光标移动到下一行的起始位置；返回值：Integer。函数执行成功时返回1，发生错误时返回-1。如果任何参数的值为NULL，Print()函数返回NULL。用法：在打印作业中，PowerBuilder使用打印光标来跟踪打印位置。打印光标保存了即将

4、打印区域左上角的坐标。使用Print()函数打印文本后，PowerBuilder自动更新打印光标。PowerBuilder使用行距来决定打印出的两行文本之间的距离，行距与字符的高度成比例，缺省的行距是字符高度的1.2倍。使用PrintSetSpacing()函数可以改变行距。当Print()函数在下一行打印输出时，它把打印光标的x坐标设置为0、y坐标增加当前行距指示的数值。由于每打印一行时Print()函数都自动调整打印光标的y坐标位置，因此，该函数会自动处理分页，因此，应用程序没有必要调用PrintPage()函数进行分页。打印区

5、由纸张的物理尺寸和边界空白决定，PrintSend()函数能够发送具体打印机的ESC控制序列，使用这个函数可以改变边界空白的大小。另外，在打印开始之前，使用PrintDefineFont()和PrintSetFont()函数可以改变Print()使用的字体。示例：Thisexampleopensaprintjob,printsthestringSybaseCorporationinthedefaultfont,andthenstartsanewline:longJob//Defineablankpageandassignthejob

6、anIDJob=PrintOpen()//PrintthestringandthenstartanewlinePrint(Job,"SybaseCorporation")...PrintClose(Job) Thisexampleopensaprintjob,printsthestringSybaseCorporationinthedefaultfont,tabs5inchesfromtheleftedgeoftheprintareabutdoesnotstartanewline:longJob//Defineablankpagea

7、ndassignthejobanIDJob=PrintOpen()//PrintthestringbutdonotstartanewlinePrint(Job,"SybaseCorporation",5000)...PrintClose(Job) ThefirstPrintstatementbelowtabshalfaninchfromtheleftedgeoftheprintarea,printsthestringSybaseCorporation,andthenstartsanewline.ThesecondPrintstate

8、menttabsoneinchfromtheleftedgeoftheprintarea,printsthestringDirectors:,andthenstartsanewline:longJob//Defineablankpag