虽有帮助文件,还有网络可供参考,最后还是打EPSON客服电话才搞明白。菜!
说明是这样的:
ESC ( B n1 n2 k m s V1 V2 C data,具体含义请看相关文档,我的文档只读…
如果这样发就死定了,我就死了好多回:
#27 + '(B 14 0 5 3 0 40 0 0 ' + '12345678';
正确的写法是:
#27 + '(B' + Chr(14) + Chr(0) + Chr(5) + Chr(3) + Chr(0) + Chr(40) + Chr(0) + Chr(0) + '12345678'
例:
var
LPT1File: TextFile;
sTemp: string;
begin
AssignFile(LPT1File, 'LPT1');
try
Rewrite(LPT1File);
Writeln(LPT1File, #27+'@'); // #27#64
sTemp := #27 + '(B' + // Chr(27) + Chr(40) + Chr(66) +
Chr(14) + Chr(0) + Chr(5) + Chr(3) + Chr(0) +
Chr(40) + Chr(0) + Chr(0) +
'12345678';
Writeln(LPT1File, sTemp);
finally
CloseFile(LPT1File);
end;
end;
至于支持的条形码类型,相关的长度限制,我还在郁闷中。
哪位如果完全明白,请回复。谢谢!