各位大虾,请问打印标签,如何控制显示的字符串？ 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
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
打印机ESC控制字符的使用
回复
0
查看
637
import
I
S
[QMacros] 使用宏替换在百度地图上加标注
回复
0
查看
452
swish
S
D
[译]Delphi for iOS开发指南(1):在Mac上配置你的开发环境
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部