会员
周边
众包
新闻
博问
闪存
赞助商
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
GhostWhisper
博客园
首页
新随笔
联系
订阅
管理
2014年7月23日
CopyFile 函数详解
摘要: CopyFile函数,文件拷贝函数,结构如下:copyfile( lpcstr lpexistingfilename, //源文件路径 lpcstr lpnewfilename, //新文件路径 bool bfailifexists //为true的话,如果新文件已存在, 则返回false; 为fa...
阅读全文
posted @ 2014-07-23 09:20 GhostWhisper
阅读(2484)
评论(0)
推荐(0)
编辑
2013年12月30日
Delphi 实现EAN-13条码
摘要: 之前在网站上看到很多Delphi 的EAN-13条码实现,在实际中也很好用。就是在实际测试中发现第一位如果是1,2,3的情况下识别不了。下面是从网上找到的示例,然后修改的。供大家参考。unit UnitEAN;interfaceuses Graphics, Windows, SysUtils, Dialogs;const //EAN 左资料码 A 类编码 EAN_A: array[0..9] of string = ('0001101', '0011001', '0010011', '0111101', '0100011&
阅读全文
posted @ 2013-12-30 11:52 GhostWhisper
阅读(789)
评论(0)
推荐(0)
编辑