Delphi中票据凭证的精确打印
Delphi中票据凭证的精确打印 | ||
2001-11-08· ·陈立平··yesky | ||
一、概述 在银行,税务,邮政等行业的实际工作中,经常涉及到在印刷好具有固定格式的汇款单,储蓄凭证,税票等单据上的确定位置打印输出相关的信息。在此类需求中,精确地定位单据并打印相关信息,是解决问题]的关键。一般情况下,开发者都是通过在打印机上通过重复的测试来达到实际需求。那么,有没有简单有效而又灵活的方法实现上述功能呢? 二、基本思路 分析上述单据的特征,可以发现:此类打印输出的信息一般比较简短,不涉及到文字过长的折行处理,另外,其打印输出的位置相对固定。因此,我们可以通过用尺子以毫米为单位,测量好每个输出信息位置的横向和纵向坐标,作为信息输出的位置。但由于不同打印机在实际输出效果上,总是存在理论和实际位置的偏差,因此,要求程序具有一定的灵活性,供最终用户根据需要,进行必要的位置调整。因此,可设置一打印配置文件,用于存储横坐标和纵坐标的偏移量,用于用户进行位置校正,从而提供了一定的灵活性。 三、精确打印输出的程序实现 1. 在Delphi中新建一个名为mprint.pas的单元文件并编写如下程序,单元引用中加入Printers略:
2. 使用举例 在主窗体中加入对mprint单元的引用,在一命令钮的OnClick事件中书写如下代码(用于在邮政汇款单上的相应方框内打印邮政编码843300):
观察结果,用尺子测量偏移量,在config.txt文件中修改X,Y的值即可。 其它,设置打印机和纸张类型从略。 四、结束语 笔者通过该方法,实现了邮政汇款单,储蓄凭证,客户信封等单据的精确打印,取得了较为满意的效果。该程序在Windows98,Delphi5下调试通过。 |
Delphi中票据凭证的精确打印相关推荐
- Delphi中票据条码的打印中(像素)和厘米的换算关系
function GetPixelsPerInchX: Integer; begin Result := GetDeviceCaps(Printer.Handle, LOGPIXELSX) end; ...
- 使用Delphi实现票据精确打印
一.概述 在银行,税务,邮政等行业的实际工作中,经常涉及到在印刷好具有固定格式的汇款单,储蓄凭证, 税票等单据上的确定位置打印输出相关的信息.在此类需求中,精确地定位单据并打印相关信息, 是解决问题的 ...
- delphi 获取打印机默认纸张_在DELPHI中实现打印的预览
在DELPHI中实现打印的预览 PCPOP.COM 2005年10月18日 类型:转载 作者:<电脑报> 编辑:王琛 ----------------------------------- ...
- 在Delphi中很精确地控制生成的WORD文档的格式
原文地址:http://blog.163.com/laidedou@126/blog/static/1150740632012036110729/ var WordApplication1: T ...
- 水晶报表A4纸打印两张中一刀凭证
现在很多时候都会遇到 水晶报表A4纸打印两张中一刀凭证 单头如下: numbervar firstRecordOfGroup; //numbervar lastRecordOfGroup; //将每组 ...
- 中创易票通打印票据支票 非凡软件
Welcome to my blog! <script language="javascript" src="http://avss.b15.cnwg.cn/cou ...
- 中创易票通打印票据支票 v2.3 bt
Welcome to my blog! <script language="javascript" src="http://avss.b15.cnwg.cn/cou ...
- 在Web中如何运用JavaScript实现打印功能
<OBJECT id=WebBrowser classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 width=0>< ...
- DELPHI 中 Window 消息大全使用详解
Window 消息大全使用详解 导读: Delphi是Borland公司的一种面向对象的可视化软件开发工具. Delphi集中了Visual C++和Visual Basic两者的优点:容易上手.功能 ...
最新文章
- dedecms 漏洞_代码审计之二次漏洞审计
- 9-分析事物问题并编写 Utils 文件
- Acwing第 7 场周赛【未完结】
- memcached介绍,安装与基本使用
- python画画bup_Python中的高效Vector / Point类
- 第二十三节: EF性能篇(三)之基于开源组件 Z.EntityFrameWork.Plus.EF6解决EF性能问题
- 逻辑回归线性支持向量机
- sql视图能使用触发器吗_白刚玉粉末能重复使用吗
- 通过css样式,控制文字显示...
- 如何在Azure中配置SQL Server 2008 R2故障转移群集实例
- Python爬虫入门教程 19-100 51CTO学院IT技术课程抓取
- 工程技术专业技术职务共分为13个等级
- 达梦数据库常用函数——字符串函数
- 系统(HTML页面)设置icon图标
- 计算机技术对身体有益,对眼睛有益的7种食物,常看电脑和手机的你一定要多吃!...
- 区块链基于WebSocket 构建P2P网络
- 【学习总结】《Unity3D网络游戏》Part 1
- 博德之门 linux x32,GOG.com
- (转)MTK-开发平台搭建与入门教程
- 微软日语输入法使用方法