ICode9

精准搜索请尝试: 精确搜索
首页 > 其他分享> 文章详细

万能打印之Delphi 2010实现(二)

2021-11-28 13:59:03  阅读:197  来源: 互联网

标签:转换 矢量图 委托书 Delphi 大写 格式 数据 2010 万能


        1.根据背景图片(业务委托书_标准打印格式.jpg),可以添加数据(含:格式)到背景图上,如下所示:(ImageEn的TImageEnDBVect)

         此矢量图保存在表:MyPhoto中,字段:1.ID 数字,2.Name 文本,3.Photo OLE 对象(ID=1,Name = '业务委托书',Photo为以上矢量图)。数据对象中含:1.名称,2.格式,3.临时赋值。其中:格式是自己根据实际要求编辑得来,如:文本框是否有边框,字体大小、颜色等设置。数据对象名称以数据字段为名。[见程序Vectorial]

        2.数据库查询数据后,更新此矢量图,就可以得到一张有新数据的矢量图,可以看到,有些数据不如人意,如:金额大写中还是小写等。[见程序Vectorial、查询数据:见程序:BuildSQL]

        3.关于金额小写转金额大写、日期由数字转大写格式等,操作如下:    

        新建一INI文件,内容:字段[业务委托书]由矢量图的名称项自动生成,项由数据对象自动生成并赋值-1,如下:

       [业务委托书]

        年=-1(都是为-1,表示不用文字格式转换) 

手动增加字段如下:(注:‘‘_转换’’不能更改为其他后缀)

[业务委托书_转换]

        年=31     //自动调用不同的内部函数转换:如‘‘2021-11-21’’转换为:‘‘贰零贰壹’’,下同,

        月=32

        日=33

        金额大写=11

        金额小写=21

   这样修改后的INI文件被引入系统后,数据可被转换。[转换用的内部函数见程序AllToStr]。

        

  

标签:转换,矢量图,委托书,Delphi,大写,格式,数据,2010,万能
来源: https://blog.csdn.net/tnware163/article/details/121451642

本站声明: 1. iCode9 技术分享网(下文简称本站)提供的所有内容,仅供技术学习、探讨和分享;
2. 关于本站的所有留言、评论、转载及引用,纯属内容发起人的个人观点,与本站观点和立场无关;
3. 关于本站的所有言论和文字,纯属内容发起人的个人观点,与本站观点和立场无关;
4. 本站文章均是网友提供,不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属;如您发现该文章侵犯了您的权益,可联系我们第一时间进行删除;
5. 本站为非盈利性的个人网站,所有内容不会用来进行牟利,也不会利用任何形式的广告来间接获益,纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

专注分享技术,共同学习,共同进步。侵权联系[81616952@qq.com]

Copyright (C)ICode9.com, All Rights Reserved.

ICode9版权所有