散尽所有分数，求教条码打印问题。求救！！！求救！！！求救！！！(200分)

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-01

• #1

我现在用的是Zebra S600的条码打印机，条码纸的规格是10cm*7cm，
我在Delphi5中用RBuider做的打印程序，在实际在打出来的效果，总是无法正确打印。
打出来时，右边总有一块大约1/3的位置，不能打印，感觉好像是打印头不能移到右边来一样。
不知，那位大侠有Zebra S600的中文开发手册，最好是有自己做的这方面的打印程序，请发一份给我
也可加QQ：61825285 （注明：DelphiBBS）或MSN:SoftBoy1980@hotmail.com,
对我在线指导，也交个朋友！
分数任你提.

 

S

samboy111

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-04

• #2

用REPORTMACHINE控件可以完美解决。
http://www.reportmachine.net/gb/index.htm
我买了WHF的正版，支持一下国内少有的DELPHI控件作者。

 

Z

zhuoyuesky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-04

• #3

条码打印没写过，你可以试着用printer自己写。

 

H

helloqiner

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-04

• #4

对， Report Machine 3.0 中专门加入了条码打印的功能，非常不错，他的 demo 中就有条码打印的实例。去看看吧。

 

W

white0212

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #5

pls try "fasereport"

 

T

tempmen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #6

Zebra,的我一直用命令方式
将下列命令写到aa.txt;然后Cmd /C COPY c:/aa.txt prn就行了
^xa^fo160,40^by2
^b3n,n,60,y,n
^fd123456789^xz

 

江

江南大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #7

最好的是自带的ZPL（Zebra Print Language）语言！我以前有一个可惜硬盘换了就丢了！
记得www.zebra.com上可以下载的吧！
到它的下载里面搜索ZPL吧！

 

9

9903

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #8

斑马的打印机还是向并口写ZPL II指令控制好点吧,用报表有时候扫描器读不出来

 

江

江南大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #9

你留下email我在源码空间找到了手册跟demo（PB版的）

 

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #10

to 江南大米:
kemp@pouyuen.com.cn
太谢谢了！！

 

江

江南大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #11

你的hotmail可能接不了那么大的文件噢！

 

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #12

kemp@pouyuen.com.cn
多大都行。

 

江

江南大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #13

demo的例子不是很好，但手册还可以吧！

 

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #14

请发。
谢谢！

 

江

江南大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #15

已经发了！

 

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #16

大米兄，收到了，谢谢！我会给你分的。
还有那位大侠有delphi的程序，请send一份，一定重酬！

 

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #17

大米兄，手册是E文的
看得头痛呀！

 

江

江南大米

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-05

• #18

Fnthex32.DLL中函数的声明
function GetFontHex(cChnStr: PChar;
cFontName: PChar;
R: Longint;
nHeight: Longint;W: Longint;
B: Longint;
I: Longint;
A: PChar): Integer;
stdcall;
这个就能直接发送中文的字符了！
看手册的话主要看里面带框的那些地方，那些是例子，其实常用的就几个命令，例如23页，
左边发送的是什么命令，右边表示打印的是什么
那个PBdemo里的函数 wf_prtchnstr 值得一改，你看着办吧！
function string wf_prtchnstr (integer ai_x, integer ai_y, string as_fontname,
integer ai_height, integer ai_xmf, integer ai_ymf, string as_chnstr);string ls_Buf, ls_return
long ll_Count
ls_Buf = SPACE(21 * 1024) // 分配存储16进制数据空间
ll_Count = GetFontHex ( as_chnstr, as_fontname, 0 , ai_height, 0, 1, 0, ls_buf)
IF ll_Count <= 0 then
RETURN ""
ls_return = mid(ls_Buf,1,ll_Count)
ls_return = ls_return + '^FO' + TRIM(strinDAT* ?g(ai_X)) + ',' + TRIM(string(ai_Y)) + &amp;
'^XGOUTSTR01,' + trim(string(ai_XMF)) + ',' + TRIM(string(ai_YMF)) + '^FS'
RETURN ls_return
end function

 

K

kuux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-06

• #19

谢谢大家!