简介面向PowerBuilder 12开发者的票据打印实现方案聚焦自定义纸张票据打印解决PB应用中票据模板设计、数据窗口布局、打印参数控制与动态数据填充等问题。压缩包共18个文件涵盖PBL工程对象、PBT工程文件、HTML操作页面、GIF演示截图、JPG界面图片、CSS样式表与文本说明整体仅78KB体量轻便且结构清晰适合在PB12环境中直接导入研读或二次改造。目前已有257人学习下载。资料中不仅提供自定义纸张打印票据的演示页面和对应PBL源码还附有资源使用特别说明及下载使用说明文档能够帮助开发者快速理解数据窗口在票据打印中的核心用法包括报表分组、计算字段、打印参数设置、多页连续打印和自定义纸张规格的实现路径。通过实际示例读者可以掌握从票据模板设计、数据填充到打印输出的完整流程并可将示例中的布局和逻辑复用到进销存、收银、业务管理系统等项目中减少从零排查打印细节的时间成本是一份实用价值较高的PB打印参考资料。1. 票据打印在 PB12 里为什么总出幺蛾子做财务、物流、门店系统的朋友应该都有过这种经历DataWindow 里摆得好好的单据点预览一切正常一上针式打印机要么整体往右下角偏了 2 毫米要么同一个模板在三台机器上打出三种位置。PB12PowerBuilder 12的票据打印难点从来不在“会不会调用打印函数”而在 DataWindow 的坐标单位、打印机驱动 DPI、纸张物理尺寸这三层映射关系上。本文把 pb票据打印FOR pb12 这条路线完整拆开从方案选型、模板设计、最小可运行代码到套打对齐和常见故障排查最后落到用 PrintSend 直通打印机指令做切纸、开钱箱这类进阶操作。适合正在用 PB12 维护 ERP、财务、进销存项目且被票据、单据、小票打印折磨过的开发者读。2. 三条路线怎么选DataWindow 直打、PDF 中转与控件方案的边界2.1 DataWindow 原生打印的适用边界PB 里做票据打印绝大多数人第一反应就是 DataWindow 自带的 Print 机制。这个方案的逻辑非常顺报表模板长什么样打印出来就是什么样不需要额外生成中间文件也不依赖第三方 DLL。对格式固定的出入库单、送货单、收款收据这类票据DataWindow 直打是开发效率最高的一条路。但它的边界也很清晰。第一DataWindow 的打印引擎对复杂图形、渐变、透明效果的支持有限票据上要放个二维码在老版本驱动下很可能渲染得模糊甚至丢失。第二DataWindow 直打是“应用自己拿着打印任务去跟驱动打交道”一旦打印机驱动设置被改过比如缩放比例变成 110%、纸张默认成了 A4打印结果就会整体跑偏这类问题排查起来相当费时间。我一般会这样判断如果票据有预印好的格式纸比如带红线的出库单、带底纹的发票数据只需要填进固定格子那 DataWindow 直打是首选。因为它的坐标体系是固定的配合后面第 4 章讲的偏移校准能精确到十分之一毫米级别。反过来如果票据要发给别人用不同终端打印直打就不合适了——对方没有你的模板也没有你的打印机配置。2.2 PDF 中转什么时候值得多绕一步有些场景下票据不是自己打完就完事的。举个例子一张对账单要发给客户客户那边用什么打印机、什么纸你完全管不着唯一能保证的就是“看到的文件长什么样打出来就长什么样”。这种情况下先让 DataWindow 导出 PDF再调用系统打印或者交给用户自行打印是更稳的方案。PB12 里 DataWindow 支持 SaveAs PDF不需要额外装组件就能出文件只是样式上的精细度有限复杂排版容易丢元素。PDF 中转的另一个实用场景是归档。财务上很多票据需要电子存档数据和打印效果对不上会出问题。先固定成 PDF 再打印至少“当时打印的内容”有据可查。代价是打印链路变长生成文件、调起阅读器、用户点打印每一步都可能出状况而且速度比直打慢不少。如果只是自己系统内部打印我不建议为了“看起来正规”而去绕 PDF 这一步。2.3 第三方控件功能齐全但部署成本不可忽视市面上有不少独立报表控件功能确实强大支持套打、支持自定义纸张、支持直接操作打印机队列有的还带可视化设计器。但引入第三方控件意味着三件事要掏授权费、要在客户机器上部署运行库、要在每次 PB 版本升级时确认兼容性。做过企业项目的都懂软件装到客户现场多一个 DLL 就多一个玄学故障点。所以我的建议是只有当你确实需要 DataWindow 做不了的东西再考虑第三方控件。比如票据上有非常复杂的排版约束、需要动态生成 Excel 格式对账单、或者需要从服务端统一渲染——这些场景下第三方控件的投入才值得。如果只是“格子里面填文字、打完了能切纸”DataWindow 直打和 PrintSend 组合足够覆盖 90% 的票据需求。2.4 路线选型参考表方案适用场景主要优点主要缺点DataWindow 直打固定格式票据、预印纸套打、内部打印开发快、模板即所见、无额外部署受驱动影响大、复杂图形渲染弱PDF 中转外部发送、电子归档、跨终端打印显示一致性最好、可留档链路长、速度慢、不擅长套打第三方控件复杂报表、服务端渲染、动态模板功能全、设计器可视化授权与部署成本高、兼容性风险选型逻辑落在两个问题上这个票据是“自己打印自己看”还是“给别人打印”有没有预印格式纸前者走 PDF后者走直打。拿不准的时候先做一个小 Demo用真实票据打一遍再决定别在架构阶段凭感觉押注。3. 用 PB12 跑通一张票据的最小实现模板配置与核心代码3.1 票据模板的设计规范先定纸张再画控件做票据模板最容易犯的错是先在屏幕上画控件最后才想起来设纸张。屏幕是宽屏票据纸是窄长的画完再改纸张所有控件位置全乱。正确顺序是先定义好纸张长宽再往上摆控件。以最常见的 241mm × 140mm 三联票据纸为例。DataWindow 的内部坐标单位是千分之一英寸所以纸张宽度换算出来约 9488 个单位241mm 除以 25.4 再乘 1000高度约 5512 个单位。在模板属性里把 PaperWidth 和 PaperLength 填成这两个数再把边距设小比如左右边距各 500 个单位约 12.7mm这样实际可排版区域就固定下来了。这一步做完后续所有控件的位置都有了基准不会再跟着屏幕分辨率飘。如果用的是票据打印机自带的连续纸纸张尺寸经常不在系统预设列表里这时候必须走自定义纸张PaperSize 设成自定义值不同 PB 版本枚举值略有差异常见为 256同时显式指定 PaperWidth 和 PaperLength。只设自定义纸张不填尺寸打印任务会直接按系统默认纸型走白纸还好套打预印纸就是一场灾难。3.2 最小可运行代码一个 DataWindow 完成预览与打印模板设计好之后代码其实短得让人意外。下面这段是打印一张票据的最小闭环进入打印预览、用户核对后正式输出。先看代码再看参数说明。// 预览模式先把数据和格式在屏幕上过一遍 dw_1.object.datawindow.print.preview true dw_1.object.datawindow.print.preview.rulers true // 定义纸张与打印方向宽度241mm、高度140mm纵向打印 dw_1.Object.DataWindow.Print.PaperSize 256 // 自定义纸张 dw_1.Object.DataWindow.Print.PaperWidth 9488 // 千分之一英寸约241mm dw_1.Object.DataWindow.Print.PaperLength 5512 // 千分之一英寸约140mm dw_1.Object.DataWindow.Print.Orientation 0 // 0纵向1横向 // 正式打印走系统默认打印机份数由循环控制 long ll_job ll_job PrintOpen(票据打印) dw_1.PrintDataWindow(ll_job, 1, 0) // 打印第1页从页顶偏移0开始 PrintClose(ll_job)PrintDataWindow 的第三个参数是页内起始 Y 坐标单位同样是千分之一英寸。正常整页打印填 0 就行做多个小票据拼一页时这个参数就用来控制每个票据落在页面上的垂直位置。PrintOpen 返回一个打印任务号同一个任务里可以连续打印多个 DataWindow最后统一 PrintClose 提交给打印机。记得检查 PrintOpen 的返回值-1 表示打开失败常见原因是打印机驱动异常或系统默认打印机不可用提前判断能省去后面一堆莫名其妙的报表异常。如果想让用户自己选打印机、调打印份数和纸张方向在 PrintOpen 之前调用 PrintSetupDialog 即可。这个函数会弹出系统打印设置对话框用户改完的配置会写进当前 DataWindow 的打印属性里不需要额外代码去同步。注意它和 PrintSetup 的区别PrintSetup 打开的是通用打印设置和当前 DataWindow 没有关联改完还要手动去读配置再赋值多一道工序直接用 PrintSetupDialog 更省事。3.3 打印份数与页码范围逐页和整单两种控制方式票据打印经常遇到“这份单子要打三份”的需求。一类是复写纸不需要程序管份数打一遍就自带联次另一类是普通 A4 纸打印多份存档这时候就得靠循环控制。integer li_count, li_need li_need 3 // 需要打印的份数 for li_count 1 to li_need PrintDataWindow(dw_1, li_count, 1, 0) next PrintClose(dw_1)这套写法有个注意事项同一个 DataWindow 在同一个打印任务里连续多次调用 PrintDataWindow有可能出现页码累加问题——第二份的页号会从 2 开始而不是重新从 1 开始。解决方法是每份单独走一次 PrintOpen 和 PrintClose代价是每个任务之间打印机有短暂的暂停动作多联连续打的时候速度会受影响。我的经验是份额少比如三份以内用分开任务保证页码干净份额多且对页码无要求时合并在一个任务里打印效率更高。如果只需要打印 DataWindow 的某几页而不是全部页可以在 PrintDataWindow 之前先设置打印页码范围属性或者用 GetNextPage 循环筛选。这个技巧适合那种“一单多页用户只勾选了其中两页”的界面交互代码上不需要重查数据库直接把当前显示的页数据打印出来即可。4. 套打对齐让打印位置分毫不差的坐标体系与调参方法4.1 坐标单位换算DataWindow 的千分之一英寸与打印机 DPI 的差异套打是票据打印里最考验耐心的一环。所谓套打就是纸上已经有印好的表格线、公司抬头、序号框程序只负责把数据填进对应的空格里位置差了哪怕 0.5 毫米字要么压线要么出框。要解决这个问题先要理解三层坐标系是怎么换算的。第一层是 DataWindow 的虚拟坐标单位是千分之一英寸第二层是打印机驱动的输出分辨率常见针式打印机为 180 DPI 或 360 DPI激光打印机为 300 或 600 DPI第三层才是纸张的物理位置。三层之间任何一层换算不对打印结果就偏。举个例子DataWindow 里一个文本框的 X 坐标是 2000意味着它距离报表原点 2 英寸。如果打印机驱动把缩放比例设成了 105%那这 2 英寸实际被打成了 2.1 英寸肉眼看不出来但逐行往下叠到了票据底部偏移量就能超过 3 毫米。所以套打第一个动作不是调坐标而是把打印机的“缩放/调整大小”功能全部关掉打印比例锁死在 100%。同时 DataWindow 的 Print.DPI 属性保持默认 0跟随打印机不要手工指定一个和驱动不一致的 DPI 数值否则 DataWindow 会按你指定的 DPI 重新换算坐标反而造成偏移。这一步做完三层坐标系的换算才统一。4.2 全局偏移与逐控件微调的两级调整法套打对齐不要一个控件一个控件去试那样效率极低而且容易调乱。正确做法是先做全局偏移再做局部微调两级调整各管各的事。全局偏移解决的是“整张纸上的打印内容整体往右下方移动”的问题。比如预印纸上的表格线整体比标准位置偏右了 1 毫米那所有数据也应该跟着往右移 1 毫米这时候只需要改 DataWindow 的打印偏移属性不需要动任何控件坐标。// 全局偏移所有打印内容整体平移单位千分之一英寸 // 向右移 0.5mm 约19个单位向下移 1mm 约39个单位 dw_1.Object.DataWindow.Print.Offset.X 19 dw_1.Object.DataWindow.Print.Offset.Y 39全局偏移调完之后再处理单个字段的偏差。比如“订单号”这一栏打出来总比预印框往左偏一点而“金额”栏是准的说明问题出在字段本身的位置上跟全局偏移无关。这时进入模板设计器单独调整该字段的 X 坐标一次不要动超过 20 个单位约 0.5mm打印一次看一次效果。这个流程很笨但可靠全偏调 Offset单偏调控件混着改会越调越乱。调整过程中一定要用同一台打印机、同一卷纸。针式打印机换一个品牌出纸位置和默认边距都不一样之前调好的参数可能全部作废。这也是为什么套打参数应该存到配置文件里而不是写死在代码中——客户换打印机改配置文件就行不用重新编译发布。4.3 纸张规格与边距在 PB12 里的显式设置套打还有一个隐蔽的坑DataWindow 模板里的边距和打印机驱动里的可打印区域边距是两套概念。模板里设了左边距 500 个单位但如果打印机驱动的可打印区域默认为 3mm那么实际输出位置会在模板边距的基础上再加上驱动造成的偏移两个值叠加位置自然不对。解决方法是把边距也纳入校准范围。先用废纸打印一张“回”字定位标记页面四角各打一个十字线然后量十字线到纸张边缘的实际距离和模板里的边距设置对比差值就是驱动层面的固定偏移把差值并入全局 Offset 即可。这一步做完以后换纸、换驱动只需要重新做一次同样的校准。前面第 3.2 节代码里设定的 PaperWidth 和 PaperLength 也务必和实际纸张一致特别是自定义纸型差 1mm 在连续打印时会被累计成越来越大的偏移。5. 票据打印常见问题排查与避坑记录5.1 现象打印出来的字体比屏幕预览小一圈而且整体位置偏移这个问题的根源是屏幕分辨率和打印机 DPI 不一致。屏幕逻辑分辨率通常 96 DPI而打印机驱动可能是 300 或 600 DPI。DataWindow 在屏幕上按像素渲染打印时按打印机 DPI 重新换算中间只要有舍入误差就会表现为整体轻微偏移和字体变小。解决方式是检查 DataWindow 的 Print.DPI 是否被手工指定过改成 0 跟随打印机如果改完还偏就在打印机驱动里把缩放比例确认回 100%再重新做一次全局偏移校准。5.2 现象多联复写打印时第二联第三联的内容和第一联错位复写纸联次错位通常不是程序问题是打印机机械走纸和纸张厚度造成的。针式打印机打多联时纸张总厚度增加走纸齿轮和纸张之间的摩擦系数变化会导致后续联次出现微小位移联数越多越明显。解决方向是打印机驱动里选择正确的纸张类型比如“多联纸”同时在代码里不要额外发送走纸指令让打印机按连续纸模式自行处理。如果错位是固定的比如每次都偏同一个方向同一个量可以做一个“联次偏移”参数单独给第二联以后的打印任务加不同的 Y 偏移。5.3 现象连续打印几十张之后内容逐渐往一边斜过去这是典型的针式打印机走纸偏差。现象是前几张正常越打越偏最后可能偏出整个网格。原因通常是纸张在牵引器上没有完全对齐或者纸张宽度和打印机纸宽设置不一致。解决方法是先检查打印机进纸槽的卡扣是否夹紧纸张两侧再确认驱动里的纸张宽度和实际纸宽一致。代码层面没什么可调的因为问题不在坐标而在物理走纸。如果确认机械没问题可以尝试每次打印前发送一次初始化指令给打印机让打印机重新校正走纸起点。5.4 现象打印一张小票据打印机要停顿两次速度很慢这个问题的原因基本是打印任务开得太碎。常见的有两种写法一种是在循环里对每一个字段单独 PrintOpen 和 PrintClose另一种是每个数据行调一次 DataWindow 的 Print 函数。每次都新建打印任务驱动就要重新初始化一次速度自然慢。解决方案是把同一个单据的所有内容合并到一个 PrintOpen 任务里通过多次 PrintDataWindow 或 PrintSend 顺序输出最后只 PrintClose 一次。我们之前在模拟项目X里做过一次统计同样的三张小票据从逐条打印改成单任务合并打印耗时可减少一半以上。5.5 现象老项目从旧版本 PB 升级到 PB12 后原来调好的模板整体偏移了PB12 对字体渲染和默认坐标系有过调整同一个 DataWindow 在旧版本里打得好好的升到 PB12 后可能出现字体宽度变化引起换行位置偏移或者整体坐标换算差异。排查时先用最简单的纯文本框模板做一次标准打印确认是整体偏移还是个别字段偏移。整体偏移就校准全局 Offset个别字段偏移就调整字体设置——把字体设为打印机内置字体或中易宋体这类通用字体减少字体渲染差异带来的影响。不要试图在代码里做大量兼容性判断直接重新校准模板并锁定各字段的精确坐标一劳永逸。6. 进阶用 PrintSend 直通打印机指令实现切纸与钱箱控制6.1 什么时候需要 PrintSendDataWindow 打印解决的只是“把内容画到纸上”的问题但票据打印的收尾动作往往不是画内容而是控制打印机硬件。典型场景有三个一是小票打完后自动切纸二是收银小票打印完成时弹开钱箱三是针式打印机在连续纸上打完一份单子后需要精确走纸到撕纸位置。这三个动作不属于 Windows 打印驱动管的事要直接往打印机端口发控制指令PrintSend 就是干这个的。6.2 PrintSend 的调用方式与转义序列组织PrintSend 的使用思路是把打印指令当作普通字符串发送给打印机。以最常见的 ESC/POS 指令集为例执行切纸前先初始化打印机再发送走纸和切纸命令。下面是一段在 PB12 里完成“打印小票、走纸、切纸、开钱箱”的完整流程代码。// 打开打印任务 long ll_job ll_job PrintOpen(小票打印) if ll_job -1 then MessageBox(错误, 无法打开打印机任务请检查默认打印机) return end if // 初始化打印机ESC PrintSend(ll_job, Char(27) Char(64)) // 打印小票内容DataWindow 负责排版 dw_1.PrintDataWindow(ll_job, 1, 0) // 走纸 6 行ESC d 06 PrintSend(ll_job, Char(27) Char(100) Char(6)) // 切纸GS V mm1 表示切纸并走纸到撕纸位 PrintSend(ll_job, Char(29) Char(86) Char(1)) // 开钱箱ESC p m n1 n2m0 接钱箱1脉冲时间由 n1 n2 控制 PrintSend(ll_job, Char(27) Char(112) Char(0) Char(25) Char(25)) // 结束任务 PrintClose(ll_job)代码里的关键点是指令的字节必须严格按顺序发送。ESC 初始化要在开头否则打印机可能处于非标准模式后面的切纸钱箱指令会被当成普通文本打印出来。PrintSend 的第三个参数是发送长度如果字符串里含中文字符或特殊结尾符传长度会可靠一些。另外注意 PrintDataWindow 和 PrintSend 混用时内容打印和指令发送共用同一个任务号顺序不能乱先打内容再走纸再切纸最后开钱箱。最后说一个我自己的习惯接手遗留票据模块时我会先查代码里有没有到处散落的裸 Print 调用有就统一收拢成一个“打票服务”函数里面规范处理纸张设置、偏移校准、PrintSend 指令序列。后来某次客户现场反馈切纸偶尔失效排查原因就是某段代码在 PrintSend 之前多打印了一个换页符把指令序列顶掉了统一封装之后这类问题再没出现过。这个方向不难值得投入希望帮到你。本文还有配套的精品资源点击获取
简介面向PowerBuilder 12开发者的票据打印实现方案聚焦自定义纸张票据打印解决PB应用中票据模板设计、数据窗口布局、打印参数控制与动态数据填充等问题。压缩包共18个文件涵盖PBL工程对象、PBT工程文件、HTML操作页面、GIF演示截图、JPG界面图片、CSS样式表与文本说明整体仅78KB体量轻便且结构清晰适合在PB12环境中直接导入研读或二次改造。目前已有257人学习下载。资料中不仅提供自定义纸张打印票据的演示页面和对应PBL源码还附有资源使用特别说明及下载使用说明文档能够帮助开发者快速理解数据窗口在票据打印中的核心用法包括报表分组、计算字段、打印参数设置、多页连续打印和自定义纸张规格的实现路径。通过实际示例读者可以掌握从票据模板设计、数据填充到打印输出的完整流程并可将示例中的布局和逻辑复用到进销存、收银、业务管理系统等项目中减少从零排查打印细节的时间成本是一份实用价值较高的PB打印参考资料。1. 票据打印在 PB12 里为什么总出幺蛾子做财务、物流、门店系统的朋友应该都有过这种经历DataWindow 里摆得好好的单据点预览一切正常一上针式打印机要么整体往右下角偏了 2 毫米要么同一个模板在三台机器上打出三种位置。PB12PowerBuilder 12的票据打印难点从来不在“会不会调用打印函数”而在 DataWindow 的坐标单位、打印机驱动 DPI、纸张物理尺寸这三层映射关系上。本文把 pb票据打印FOR pb12 这条路线完整拆开从方案选型、模板设计、最小可运行代码到套打对齐和常见故障排查最后落到用 PrintSend 直通打印机指令做切纸、开钱箱这类进阶操作。适合正在用 PB12 维护 ERP、财务、进销存项目且被票据、单据、小票打印折磨过的开发者读。2. 三条路线怎么选DataWindow 直打、PDF 中转与控件方案的边界2.1 DataWindow 原生打印的适用边界PB 里做票据打印绝大多数人第一反应就是 DataWindow 自带的 Print 机制。这个方案的逻辑非常顺报表模板长什么样打印出来就是什么样不需要额外生成中间文件也不依赖第三方 DLL。对格式固定的出入库单、送货单、收款收据这类票据DataWindow 直打是开发效率最高的一条路。但它的边界也很清晰。第一DataWindow 的打印引擎对复杂图形、渐变、透明效果的支持有限票据上要放个二维码在老版本驱动下很可能渲染得模糊甚至丢失。第二DataWindow 直打是“应用自己拿着打印任务去跟驱动打交道”一旦打印机驱动设置被改过比如缩放比例变成 110%、纸张默认成了 A4打印结果就会整体跑偏这类问题排查起来相当费时间。我一般会这样判断如果票据有预印好的格式纸比如带红线的出库单、带底纹的发票数据只需要填进固定格子那 DataWindow 直打是首选。因为它的坐标体系是固定的配合后面第 4 章讲的偏移校准能精确到十分之一毫米级别。反过来如果票据要发给别人用不同终端打印直打就不合适了——对方没有你的模板也没有你的打印机配置。2.2 PDF 中转什么时候值得多绕一步有些场景下票据不是自己打完就完事的。举个例子一张对账单要发给客户客户那边用什么打印机、什么纸你完全管不着唯一能保证的就是“看到的文件长什么样打出来就长什么样”。这种情况下先让 DataWindow 导出 PDF再调用系统打印或者交给用户自行打印是更稳的方案。PB12 里 DataWindow 支持 SaveAs PDF不需要额外装组件就能出文件只是样式上的精细度有限复杂排版容易丢元素。PDF 中转的另一个实用场景是归档。财务上很多票据需要电子存档数据和打印效果对不上会出问题。先固定成 PDF 再打印至少“当时打印的内容”有据可查。代价是打印链路变长生成文件、调起阅读器、用户点打印每一步都可能出状况而且速度比直打慢不少。如果只是自己系统内部打印我不建议为了“看起来正规”而去绕 PDF 这一步。2.3 第三方控件功能齐全但部署成本不可忽视市面上有不少独立报表控件功能确实强大支持套打、支持自定义纸张、支持直接操作打印机队列有的还带可视化设计器。但引入第三方控件意味着三件事要掏授权费、要在客户机器上部署运行库、要在每次 PB 版本升级时确认兼容性。做过企业项目的都懂软件装到客户现场多一个 DLL 就多一个玄学故障点。所以我的建议是只有当你确实需要 DataWindow 做不了的东西再考虑第三方控件。比如票据上有非常复杂的排版约束、需要动态生成 Excel 格式对账单、或者需要从服务端统一渲染——这些场景下第三方控件的投入才值得。如果只是“格子里面填文字、打完了能切纸”DataWindow 直打和 PrintSend 组合足够覆盖 90% 的票据需求。2.4 路线选型参考表方案适用场景主要优点主要缺点DataWindow 直打固定格式票据、预印纸套打、内部打印开发快、模板即所见、无额外部署受驱动影响大、复杂图形渲染弱PDF 中转外部发送、电子归档、跨终端打印显示一致性最好、可留档链路长、速度慢、不擅长套打第三方控件复杂报表、服务端渲染、动态模板功能全、设计器可视化授权与部署成本高、兼容性风险选型逻辑落在两个问题上这个票据是“自己打印自己看”还是“给别人打印”有没有预印格式纸前者走 PDF后者走直打。拿不准的时候先做一个小 Demo用真实票据打一遍再决定别在架构阶段凭感觉押注。3. 用 PB12 跑通一张票据的最小实现模板配置与核心代码3.1 票据模板的设计规范先定纸张再画控件做票据模板最容易犯的错是先在屏幕上画控件最后才想起来设纸张。屏幕是宽屏票据纸是窄长的画完再改纸张所有控件位置全乱。正确顺序是先定义好纸张长宽再往上摆控件。以最常见的 241mm × 140mm 三联票据纸为例。DataWindow 的内部坐标单位是千分之一英寸所以纸张宽度换算出来约 9488 个单位241mm 除以 25.4 再乘 1000高度约 5512 个单位。在模板属性里把 PaperWidth 和 PaperLength 填成这两个数再把边距设小比如左右边距各 500 个单位约 12.7mm这样实际可排版区域就固定下来了。这一步做完后续所有控件的位置都有了基准不会再跟着屏幕分辨率飘。如果用的是票据打印机自带的连续纸纸张尺寸经常不在系统预设列表里这时候必须走自定义纸张PaperSize 设成自定义值不同 PB 版本枚举值略有差异常见为 256同时显式指定 PaperWidth 和 PaperLength。只设自定义纸张不填尺寸打印任务会直接按系统默认纸型走白纸还好套打预印纸就是一场灾难。3.2 最小可运行代码一个 DataWindow 完成预览与打印模板设计好之后代码其实短得让人意外。下面这段是打印一张票据的最小闭环进入打印预览、用户核对后正式输出。先看代码再看参数说明。// 预览模式先把数据和格式在屏幕上过一遍 dw_1.object.datawindow.print.preview true dw_1.object.datawindow.print.preview.rulers true // 定义纸张与打印方向宽度241mm、高度140mm纵向打印 dw_1.Object.DataWindow.Print.PaperSize 256 // 自定义纸张 dw_1.Object.DataWindow.Print.PaperWidth 9488 // 千分之一英寸约241mm dw_1.Object.DataWindow.Print.PaperLength 5512 // 千分之一英寸约140mm dw_1.Object.DataWindow.Print.Orientation 0 // 0纵向1横向 // 正式打印走系统默认打印机份数由循环控制 long ll_job ll_job PrintOpen(票据打印) dw_1.PrintDataWindow(ll_job, 1, 0) // 打印第1页从页顶偏移0开始 PrintClose(ll_job)PrintDataWindow 的第三个参数是页内起始 Y 坐标单位同样是千分之一英寸。正常整页打印填 0 就行做多个小票据拼一页时这个参数就用来控制每个票据落在页面上的垂直位置。PrintOpen 返回一个打印任务号同一个任务里可以连续打印多个 DataWindow最后统一 PrintClose 提交给打印机。记得检查 PrintOpen 的返回值-1 表示打开失败常见原因是打印机驱动异常或系统默认打印机不可用提前判断能省去后面一堆莫名其妙的报表异常。如果想让用户自己选打印机、调打印份数和纸张方向在 PrintOpen 之前调用 PrintSetupDialog 即可。这个函数会弹出系统打印设置对话框用户改完的配置会写进当前 DataWindow 的打印属性里不需要额外代码去同步。注意它和 PrintSetup 的区别PrintSetup 打开的是通用打印设置和当前 DataWindow 没有关联改完还要手动去读配置再赋值多一道工序直接用 PrintSetupDialog 更省事。3.3 打印份数与页码范围逐页和整单两种控制方式票据打印经常遇到“这份单子要打三份”的需求。一类是复写纸不需要程序管份数打一遍就自带联次另一类是普通 A4 纸打印多份存档这时候就得靠循环控制。integer li_count, li_need li_need 3 // 需要打印的份数 for li_count 1 to li_need PrintDataWindow(dw_1, li_count, 1, 0) next PrintClose(dw_1)这套写法有个注意事项同一个 DataWindow 在同一个打印任务里连续多次调用 PrintDataWindow有可能出现页码累加问题——第二份的页号会从 2 开始而不是重新从 1 开始。解决方法是每份单独走一次 PrintOpen 和 PrintClose代价是每个任务之间打印机有短暂的暂停动作多联连续打的时候速度会受影响。我的经验是份额少比如三份以内用分开任务保证页码干净份额多且对页码无要求时合并在一个任务里打印效率更高。如果只需要打印 DataWindow 的某几页而不是全部页可以在 PrintDataWindow 之前先设置打印页码范围属性或者用 GetNextPage 循环筛选。这个技巧适合那种“一单多页用户只勾选了其中两页”的界面交互代码上不需要重查数据库直接把当前显示的页数据打印出来即可。4. 套打对齐让打印位置分毫不差的坐标体系与调参方法4.1 坐标单位换算DataWindow 的千分之一英寸与打印机 DPI 的差异套打是票据打印里最考验耐心的一环。所谓套打就是纸上已经有印好的表格线、公司抬头、序号框程序只负责把数据填进对应的空格里位置差了哪怕 0.5 毫米字要么压线要么出框。要解决这个问题先要理解三层坐标系是怎么换算的。第一层是 DataWindow 的虚拟坐标单位是千分之一英寸第二层是打印机驱动的输出分辨率常见针式打印机为 180 DPI 或 360 DPI激光打印机为 300 或 600 DPI第三层才是纸张的物理位置。三层之间任何一层换算不对打印结果就偏。举个例子DataWindow 里一个文本框的 X 坐标是 2000意味着它距离报表原点 2 英寸。如果打印机驱动把缩放比例设成了 105%那这 2 英寸实际被打成了 2.1 英寸肉眼看不出来但逐行往下叠到了票据底部偏移量就能超过 3 毫米。所以套打第一个动作不是调坐标而是把打印机的“缩放/调整大小”功能全部关掉打印比例锁死在 100%。同时 DataWindow 的 Print.DPI 属性保持默认 0跟随打印机不要手工指定一个和驱动不一致的 DPI 数值否则 DataWindow 会按你指定的 DPI 重新换算坐标反而造成偏移。这一步做完三层坐标系的换算才统一。4.2 全局偏移与逐控件微调的两级调整法套打对齐不要一个控件一个控件去试那样效率极低而且容易调乱。正确做法是先做全局偏移再做局部微调两级调整各管各的事。全局偏移解决的是“整张纸上的打印内容整体往右下方移动”的问题。比如预印纸上的表格线整体比标准位置偏右了 1 毫米那所有数据也应该跟着往右移 1 毫米这时候只需要改 DataWindow 的打印偏移属性不需要动任何控件坐标。// 全局偏移所有打印内容整体平移单位千分之一英寸 // 向右移 0.5mm 约19个单位向下移 1mm 约39个单位 dw_1.Object.DataWindow.Print.Offset.X 19 dw_1.Object.DataWindow.Print.Offset.Y 39全局偏移调完之后再处理单个字段的偏差。比如“订单号”这一栏打出来总比预印框往左偏一点而“金额”栏是准的说明问题出在字段本身的位置上跟全局偏移无关。这时进入模板设计器单独调整该字段的 X 坐标一次不要动超过 20 个单位约 0.5mm打印一次看一次效果。这个流程很笨但可靠全偏调 Offset单偏调控件混着改会越调越乱。调整过程中一定要用同一台打印机、同一卷纸。针式打印机换一个品牌出纸位置和默认边距都不一样之前调好的参数可能全部作废。这也是为什么套打参数应该存到配置文件里而不是写死在代码中——客户换打印机改配置文件就行不用重新编译发布。4.3 纸张规格与边距在 PB12 里的显式设置套打还有一个隐蔽的坑DataWindow 模板里的边距和打印机驱动里的可打印区域边距是两套概念。模板里设了左边距 500 个单位但如果打印机驱动的可打印区域默认为 3mm那么实际输出位置会在模板边距的基础上再加上驱动造成的偏移两个值叠加位置自然不对。解决方法是把边距也纳入校准范围。先用废纸打印一张“回”字定位标记页面四角各打一个十字线然后量十字线到纸张边缘的实际距离和模板里的边距设置对比差值就是驱动层面的固定偏移把差值并入全局 Offset 即可。这一步做完以后换纸、换驱动只需要重新做一次同样的校准。前面第 3.2 节代码里设定的 PaperWidth 和 PaperLength 也务必和实际纸张一致特别是自定义纸型差 1mm 在连续打印时会被累计成越来越大的偏移。5. 票据打印常见问题排查与避坑记录5.1 现象打印出来的字体比屏幕预览小一圈而且整体位置偏移这个问题的根源是屏幕分辨率和打印机 DPI 不一致。屏幕逻辑分辨率通常 96 DPI而打印机驱动可能是 300 或 600 DPI。DataWindow 在屏幕上按像素渲染打印时按打印机 DPI 重新换算中间只要有舍入误差就会表现为整体轻微偏移和字体变小。解决方式是检查 DataWindow 的 Print.DPI 是否被手工指定过改成 0 跟随打印机如果改完还偏就在打印机驱动里把缩放比例确认回 100%再重新做一次全局偏移校准。5.2 现象多联复写打印时第二联第三联的内容和第一联错位复写纸联次错位通常不是程序问题是打印机机械走纸和纸张厚度造成的。针式打印机打多联时纸张总厚度增加走纸齿轮和纸张之间的摩擦系数变化会导致后续联次出现微小位移联数越多越明显。解决方向是打印机驱动里选择正确的纸张类型比如“多联纸”同时在代码里不要额外发送走纸指令让打印机按连续纸模式自行处理。如果错位是固定的比如每次都偏同一个方向同一个量可以做一个“联次偏移”参数单独给第二联以后的打印任务加不同的 Y 偏移。5.3 现象连续打印几十张之后内容逐渐往一边斜过去这是典型的针式打印机走纸偏差。现象是前几张正常越打越偏最后可能偏出整个网格。原因通常是纸张在牵引器上没有完全对齐或者纸张宽度和打印机纸宽设置不一致。解决方法是先检查打印机进纸槽的卡扣是否夹紧纸张两侧再确认驱动里的纸张宽度和实际纸宽一致。代码层面没什么可调的因为问题不在坐标而在物理走纸。如果确认机械没问题可以尝试每次打印前发送一次初始化指令给打印机让打印机重新校正走纸起点。5.4 现象打印一张小票据打印机要停顿两次速度很慢这个问题的原因基本是打印任务开得太碎。常见的有两种写法一种是在循环里对每一个字段单独 PrintOpen 和 PrintClose另一种是每个数据行调一次 DataWindow 的 Print 函数。每次都新建打印任务驱动就要重新初始化一次速度自然慢。解决方案是把同一个单据的所有内容合并到一个 PrintOpen 任务里通过多次 PrintDataWindow 或 PrintSend 顺序输出最后只 PrintClose 一次。我们之前在模拟项目X里做过一次统计同样的三张小票据从逐条打印改成单任务合并打印耗时可减少一半以上。5.5 现象老项目从旧版本 PB 升级到 PB12 后原来调好的模板整体偏移了PB12 对字体渲染和默认坐标系有过调整同一个 DataWindow 在旧版本里打得好好的升到 PB12 后可能出现字体宽度变化引起换行位置偏移或者整体坐标换算差异。排查时先用最简单的纯文本框模板做一次标准打印确认是整体偏移还是个别字段偏移。整体偏移就校准全局 Offset个别字段偏移就调整字体设置——把字体设为打印机内置字体或中易宋体这类通用字体减少字体渲染差异带来的影响。不要试图在代码里做大量兼容性判断直接重新校准模板并锁定各字段的精确坐标一劳永逸。6. 进阶用 PrintSend 直通打印机指令实现切纸与钱箱控制6.1 什么时候需要 PrintSendDataWindow 打印解决的只是“把内容画到纸上”的问题但票据打印的收尾动作往往不是画内容而是控制打印机硬件。典型场景有三个一是小票打完后自动切纸二是收银小票打印完成时弹开钱箱三是针式打印机在连续纸上打完一份单子后需要精确走纸到撕纸位置。这三个动作不属于 Windows 打印驱动管的事要直接往打印机端口发控制指令PrintSend 就是干这个的。6.2 PrintSend 的调用方式与转义序列组织PrintSend 的使用思路是把打印指令当作普通字符串发送给打印机。以最常见的 ESC/POS 指令集为例执行切纸前先初始化打印机再发送走纸和切纸命令。下面是一段在 PB12 里完成“打印小票、走纸、切纸、开钱箱”的完整流程代码。// 打开打印任务 long ll_job ll_job PrintOpen(小票打印) if ll_job -1 then MessageBox(错误, 无法打开打印机任务请检查默认打印机) return end if // 初始化打印机ESC PrintSend(ll_job, Char(27) Char(64)) // 打印小票内容DataWindow 负责排版 dw_1.PrintDataWindow(ll_job, 1, 0) // 走纸 6 行ESC d 06 PrintSend(ll_job, Char(27) Char(100) Char(6)) // 切纸GS V mm1 表示切纸并走纸到撕纸位 PrintSend(ll_job, Char(29) Char(86) Char(1)) // 开钱箱ESC p m n1 n2m0 接钱箱1脉冲时间由 n1 n2 控制 PrintSend(ll_job, Char(27) Char(112) Char(0) Char(25) Char(25)) // 结束任务 PrintClose(ll_job)代码里的关键点是指令的字节必须严格按顺序发送。ESC 初始化要在开头否则打印机可能处于非标准模式后面的切纸钱箱指令会被当成普通文本打印出来。PrintSend 的第三个参数是发送长度如果字符串里含中文字符或特殊结尾符传长度会可靠一些。另外注意 PrintDataWindow 和 PrintSend 混用时内容打印和指令发送共用同一个任务号顺序不能乱先打内容再走纸再切纸最后开钱箱。最后说一个我自己的习惯接手遗留票据模块时我会先查代码里有没有到处散落的裸 Print 调用有就统一收拢成一个“打票服务”函数里面规范处理纸张设置、偏移校准、PrintSend 指令序列。后来某次客户现场反馈切纸偶尔失效排查原因就是某段代码在 PrintSend 之前多打印了一个换页符把指令序列顶掉了统一封装之后这类问题再没出现过。这个方向不难值得投入希望帮到你。本文还有配套的精品资源点击获取
