引言
随着社会的不断发展条形码技术以其可靠性高输入速度快采集信息量大灵活使用等优点为各行业带来了良好的经济效益和管理效益如今条码仓库管理不只适用于商业商品库存的管理同样适用于工厂产品和原料库存管理通过仓库管理(盘存)电子化的实现使产品原料信息资源得到充分利用条码打印系统是整个条码仓库管理系统中一个重要组成部分准确的条码打印是正确盘点出库入库及库存数据信息的前提和基础本文以为北京XX厂仓库设计的条码打印系统为例重点介绍了条码打印系统的设计思路和实现代码希望为日后类似系统开发有借鑒意义
条码打印系统设计思路
制定条码编制规则
北京XX厂仓库担负全厂零部件电子元器件的存储和管理任务经过对仓库结构和所存放物品的分析条码的码制采用EAN条码EAN条码是由国际物品编码协会(EAN lnternational)和美国统一代码委员会(UCC)联合开发共同采用的一种特定的条码符号它是一种连续型非定长有含义的高密度代码能够代表整个ASCII字符集用以表示生产日期批号数量规格保质期收货地等更多的信息
图 条码打印系统——条码形成界面
条码格式实现
根据制定的条码规则来手工录入产品零部件数据信息形成条码条码格式形成窗体如图所示
运行环境
本系统将以Microsoft Windows 简体中文版和Microsoft Windows 为基本的开发平台使用SQL SERVER数据库管理系统
条码打印系统主要技术实现
条码打印系统的关键在于如何将条码信息准确的传送到条码打印机中打印这些信息主要包括查询数据库信息打印标签设置原打印标签提取等
()变量设置(条码标签设置)条码打印设置见图
Print_Outportstring //输出连接口
Print_Tftextfile //存盘时INI声明
Print_Heightstring //标签高度
Print_Refxstring //X参考坐标
Print_Portinteger //连接口
……
图条码打印系统——条码打印设置界面
()打开输出端口将输出地址指向连接的通讯端口
Procedure print_open_port
Var
Ccomm
Begin
If port= then outport=com
If port= then outport=com
C=commcreate(print)
//先使用组件将输出端口打开
mname=outport
cstartcomm
cstopcomm
end
()存储标签机变量将当前所用到的变量值存入INI文件中
Procedure print_write_ini
Begin
If fileexists(filepath)=true then
Begin
File_rewrit(filepath)
If formexists(frclever)=true then change_variable
Ini_save_str(filepath Print_ed_heightPrint_height)
……
()测试(打印)条形码
procedure tprintBARCODEClick(SenderTObject)
var
strstring
begin
open_port
str=^xa+##
str=str+^ll+width+##
str=str+^lho+ ##
str=str+^forefx++refy +^bcn+bcheight+ynna^fd +barcodetext+
^fs+##
Str=str+ ^xz
If formexists(print )=true then
begin
moLinesClear
moLinesAdd( str )
end
comport_outln(outportstr )
end
结语
Delphi是一个强大的开发语言工具通过对其编程细节的把握对条码打印机系统的理解可以利用Delphi中barcodectrl条码控件与数据信息相连接将形成的条码信息通过端口传输到条码打印机打印该条码打印系统已成功地应用于北京XX厂库存管理系统分系统近年时间应用表明系统运行稳定可靠操作方便