山东条码技术通报
总第２００41２期

    全方位提供自动识别技术和条码打印解决方案

本期内容导读

软件教程
BarTender软件教程（一）

技术支持
BarTender ActiveX在Delphi和VB下调用数据库的实例

产品通报
经济型条码打印机TTP/TDP-243E

软件课程

　　 　　　　　　BarTender软件教程（一）

　　BarTender是一款优秀的标签打印软件，其强大的功能并不代表高难度的操作，恰恰相反，BarTender易学易用。由于它严格遵循Microsoft软件设计的“所见即所得”标准，操作简单方便。下面这篇文章便就其简单易操作和强大功能性给出介绍。

　　大众化的操作界面，软件采用大众化的Microsoft Windows界面，只要您使用过一种Windows程序，即可设计出专业水准的标签。

　　“文件”包括新建、打开、保存、关闭等常用功能和页面设置、打印及预览等，另外还有一个“说明”功能，可以对所设计标签进行说明，即备注功能。试用功能是向用户提供Bartender最新版本的所有功能，但只有30天的试用期，到期后所有包含试用功能的标签格式在打印时将随机更改一个字符。在文件下拉菜单中还显示最近打开的文件，以快速打开文件。从下图中的“全部关闭”和“全部保存”可以看出BarTender是多窗口式的。窗口之间的切换通过“窗口”菜单实现。关于“数据库设置”将在数据库部分详细介绍。

　　“编辑”菜单包括最常用的撤销、重复和剪贴、复制、粘贴、删除、全选等，这些功能就不再一一介绍了，菜单最下面一项“导出”能够实现可选择的导出所设计对象，导出路径可以是剪贴板或指定位置，可存为bmp,jpg,eps,pcx/dcx,tif格式。这样方便于标签对象在未安装Bartender的机器上打开。

　　“查看”菜单可以设置设计标签时使用的视图方式，如标签视图大小，样式等，高精度的屏幕显示是软件的一大特色，使你可以快速完成标签设计而不浪费标签。

　　“创建”菜单可以向标签对象中加入条码、文本、图形、方框、线条等。其实这些功能在它下面的快捷工具栏中可以更快更直接的加入到标签对象中。最后的“创建所选对象的组件”功能还可以在选中对象的右键中选择。

　　“修改”可以对所选对象、所选编组和默认对象进行修改。

　　“工具”菜单包括信息设置、首选设置、口令设置和管理设置。信息设置包括消息设置和日志文件设置。首选设置包括软件语种设置，保存格式的设置及是否总是使用高级数据源对话框等。口令设置是对软件的权限管理，当设置了口令后，未登录用户不能修改标签格式。在更新的V7.1版本中，新增了IDoc定义设置、打印机代码模板安装、更具体的日志文件格式设置等功能。这些功能将在以后给予详细介绍。

　　“窗口”菜单用于多个窗口之间的切换。

　　“帮助”包括使用帮助、VB脚本帮助、软件在万维网上的注册、技术支持、Seagull的网站及版本信息等。使用帮助包括BarTender的安装、创建标签对象、修改对象、数据库设置、标签打印、参考码制等帮助主题。

　　上面简单介绍了软件的主要功能和结构，在接下来的几期中我们将就其高级功能陆续给以详细介绍，希望能使软件更好的为大家服务。请大家予以关注。

技术支持

　　 　BarTender ActiveX

　　　　　在Delphi和VB下调用数据库的实例

　　BarTender ActiveX封装了大量的函数和属性，其中包括对数据库的调用。下面通过在Delphi和VB下的实例给出其调用方法。

　　先看Delphi的例子。

　　1. 首先打开BarTender生成一个标签，并正确添加数据库，设置其子串共享名为domain1。

　　2. 打开Delphi，创建一个工程。

　　3. 声明全局变量btapp，btformat，btdb。

　　4. 在FormCreate过程中引用BarTender。
　　btapp:=createoleobject('Bartender.application.7');
　　btapp.visible:=false;

　　５．向窗体中加入一个button，设置其Caption值为“打印”，其name为“print”，为其click过程添加代码：
　　btformat:=btapp.formats.open('d:\bartender\format1.btw', true, '');
　　btdb:= btformat.databases.item(1);
　　btformat.printout(0,0);
　　btformat.close(1);

　　6. 向FormCloseQuery中加入代码：
　　　try
　　　btapp.quit(1)
　　　except
　　　application.terminate
　　　end;

　　７．保存并运行。

源代码如下:

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, OleCtrls, DBOleCtl, BARCODELib_TLB, ComObj,OleCtnrs,
ExtCtrls, ComCtrls, DBCtrls;

type
TForm1 = class(TForm)
print: TButton;
Label1: TLabel;
procedure FormCreate(Sender: TObject);
procedure printClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
btapp:variant;
btformat:variant;
btdb:variant;
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
btapp:=createoleobject('Bartender.application.7');
btapp.visible:=false;
end;

procedure TForm1.printClick(Sender: TObject);
begin
btformat:=btapp.formats.open('d:\bartender\format1.btw', true, '');
btdb:= btformat.databases.item(1);
btformat.printout(0,0);
btformat.close(1);
end;

procedure TForm1.FormCloseQuery(Sender: Tobject; CanClose: Boolean);
begin
　　try
　　btapp.quit(1)
　　except
　　application.terminate
　　end;
end;

end.

　　下面我们再通过一个简单的例子说明BarTender ActiveX在VB下如何调用数据库，因此在此例中我们直接为format1.btw指定了数据库域，并指定了文件存放的路径。

　1. 首先打开BarTender生成一个标签，并正确添加数据库，设置其子串共享名为domain1。

　2. 在VB中新建一个工程，保存。“工程|引用”中选中BarTender7.0，然后打开代码窗口，选择“通用/声明”，添加下列声明：
　Dim btapp As BarTender.Application
　Dim btformat As BarTender.Format
　Dim btdb As BarTender.Database

　3. 在“Form/Load”中加入代码：
　　Private Sub Form_Load()
　　Set btapp = CreateObject("bartender.application")
　　btapp.Visible = False
　　End Sub

　4. 在对象窗口向Form中放入一个Command按钮，其Caption属性赋为“打印”，name属性为“print”　　，双击为其添加代码：
　　Private Sub print_Click()
　　Set btformat = btapp.Formats.Open("d:\bartender\format1.btw")
　　Set btdb = btformat.Databases(1)
　　'Set btdb = btformat.Databases.Item(1)
　　'Set btdb = btformat.Databases("domain1")
　　btformat.PrintOut
　　End Sub

　5. 在“Form/Unload”中添加：
　　btapp.Quit

　　按F5运行，单击打印按钮，通过连接的打印机即可打印所需的标签。

产品通报

　 　　经济型条码打印机TTP/TDP-243E　　　　　　　　　　　　　　

　　TTP/TDP-243E经济型标签打印机提供热感、热转两种打印方式。打印速度可调整在每秒2、3或4吋。可打印多种标签及纸张，包括卷装纸，折页式卷标纸等，可打印常用的条形码格式。可以将字型及条形码旋转 4 种角度，提供 5 组不同大小的英数字体。应用放大功能，字体尺寸可作更大范围的变化。平滑字型和中文字体可从简单的的标签设计窗口软件中下载。

　　此外，TTP/TDP-243E内建BASIC解译器，可独立执行 BASIC 程序功能，包括数值运算、逻辑运算、循环、流程控制及档案管理。打印机状态及错误讯息可经由打印机打印出或经由连接 RS-232串行端口显示于终端机上。

　　TTP/TDP-243打印机的结构如右图所示，其标准配件包括：
　　·TTP/TDP-243打印机
　　·热敏式标签纸及热转式碳带各一卷
　　·碳带纸滚动条一只
　　·碳带滚动条及回滚动条
　　·标签滚动条一只
　　·标签滚动条挡板二只
　　·外部纸卷架 / 滚动条
　　·Windows驱动盘一张
　　·电源供应器
　　·电源线
　　·并口线
　　·快速安装指南手册一本
　　·卷标设计软件
　　
　　外围设备或耗材包括以下物品：
　　·标签纸
　　·碳带
　　·字库卡
　　·裁刀
　　·可携式LCD键盘（KU 007）

联系我们

　　电话：0531－2679341 2679342 　　　Fax：0531－2679340

　　地址：山东省济南市历山路146－6号三层

　　网站：www.autoid.com.cn

　　Email:autoid@12365.sd.cn

　　获取我们的技术通报请发邮件通知我们，并注明“订阅”，如果我们的邮件给您带来不便，请发邮件并注明“退订”。

　　　　　
　　　　　　　订 阅　　　　　　　　　　　　　退 订