各位大虾,请问打印标签,如何控制显示的字符串？ 200分定送上。(在线等待) (200分)

  • 主题发起人 沙嘶劈哑
  • 开始时间
沙

沙嘶劈哑

Unregistered / Unconfirmed
GUEST, unregistred user!
标签格式如下：
品名：
　 产地：　　　　　商品条码：
等级： 规格：
计价单位：　　　价格：
如何将数据库的字段打印到固定的位置？可否做成让用户能手动调整打印位置的通用打印？
请大家帮我。200分将送上。
 
热切关注。
 
Fastreport可以做到。
 
有POS机的话，只能手工写打印控制代码
 
你用什么打印机？有相应的程序吗？
没有的话，找打印机提供商索取，参照它提供的源程序，对需要的参数进行相应修改就可以了。
 
不是POS机打印，是我们在商场看到的那种价格标签。
 
FastReprt
ReportBuilder
都可以
要的话我给你发过去
 
to 无疯无禄:
可以发给我吗？
我的邮箱地址是wangchangli2001@sohu.com，谢谢!
 
第三方控件，Rave
使用Rave条形码就可以了
 
{
品名： Edit1
　 产地：Edit2　　　　　商品条码：Edit3
等级：EDit4 规格： Edit5
计价单位：　Edit6　　价格： Edit7
}
uses
Printers;
procedure TForm1.Button1Click(Sender: TObject);
var
F : TextFile;
begin
AssignPrn(F);
try
Rewrite(F);
Writeln(F, '品名：' + Edit1.Text);
Writeln(F, '产地：' + Edit2.Text + ' 商品条码：' + Edit3.Text);
Writeln(F, '等级：' + EDit4.Text + ' 规格：' + Edit5.Text);
Writeln(F, '计价单位：' + Edit6.Text+ ' 价格：' + Edit7.Text);
finally
CloseFile(F);
end;
end;
 
可能我没说太清楚：下面显示的中文是标签上已有的。要按照这种格式
将数据库中的数据对应的打印在相应的位置（、、、、）上。（标签是连续页的）.
　品名：、、、、、
　 产地：、、、、、、　　　　　商品条码：、、、、、、
等级：、、、、、、 规格： 、、、、、、
计价单位：、、、、、、、　　价格： 、、、、、
 
用Delphi自带的QuickReport就可以了：
将QuickReport的DetailBand 的Height设为你标签的高度,
QuickReport.DataSet设为Query
将 几个 QrDbText 分别摆放在合适位置，然后分别连接到Query控件的几个Filed
 
用Delphi自带的QuickReport就可以了：
将QuickReport的DetailBand 的Height设为你标签的高度,
QuickReport.DataSet设为Query
将 几个 QrDbText 分别摆放在合适位置，然后分别连接到Query控件的几个Filed
 
to zhaomh
第三方控件，Rave 哪里可以找到。
 
to 无疯无禄
to 所有的高手
谁有打印从数数据库读出一行数据的例子
发给我好吗：jmct@sina.com
 
抓到分辨率，用位子空开
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

S
我有一很麻烦的问题，关于标签打印的(15分)
回复
2
查看
236
SLaDE
S
L
我的打印设置程序为什么在有的打印机上好使，有的打印机上不好使(200分)
回复
2
查看
244
xsj_by
X
T
关于精确定位打印的问题(200分)
回复
5
查看
200
xuejian
X
N
500分求解如何控制打印走纸问题(300分)
回复
13
查看
183
duguqiubai
D
小
立象X-1000打印机打印（救命）(200分)
回复
3
查看
170
duancy
D
顶部