Delphi 热敏打印机(小票)

[smkf225]

想把打印的文本通过小票打印机的网络端口进行打印。找了很多资料都没有弄成功，还望这里的大神们，指点一二。写写代码。
分不够再加。

[liups]

Delphi？那就是windows打印机了，只要安装好相关驱动，唯一要做的就是纸张了，估计驱动会定义好，没有的话自己定义一下就OK了

[看那山瞧那水]

小票机不是有SDK和Demo吗（可能是其它语言的），参考做就好了

[精锐掷矛手]

打印和具体是什么打印机没有关系的，这是操作系统的设备独立性，你只需要用代码完成打印功能就行。用第三方report报表插件或者直接用API在画布上draw

[日立奔腾浪潮微软松下联想]

不装驱动，网络打印机，需要建立TCP连接，然后给它发命令，不同的打印机支持的命令集是不一样的，你还是需要看技术文档

[smkf225]

引用 6 楼 早打大打打核战争 的回复:

不装驱动，网络打印机，需要建立TCP连接，然后给它发命令，不同的打印机支持的命令集是不一样的，你还是需要看技术文档

能帮我写些代码吗？

[smkf225]

就是想实现不要装驱动。

[日立奔腾浪潮微软松下联想]

引用 7 楼 smkf225 的回复:

[quote=引用 6 楼 早打大打打核战争 的回复:]不装驱动，网络打印机，需要建立TCP连接，然后给它发命令，不同的打印机支持的命令集是不一样的，你还是需要看技术文档

能帮我写些代码吗？[/quote]

不同打印机支持的命令集不一样，常用的页面描述语言PostScript、Epson ESC/P、HP PCL之类的，一般不是做打印驱动的很少研究这些。如果只是简单打印、字形字号设置一下，#8的应该可以，你可以试用一下看是否支持你的打印机

[sisssoft]

@tanqth 这个就是来钓鱼的，他的源代码并未放出来。只放了个架子。

[tanqth]

Delphi 10 Seattle小票打印控件TQ_Printer

[smkf225]

Delphi 10 Seattle小票打印控件TQ_Printer 这个差文件无法安装。 这里的nl,nh代表什么 nl，是左边距宽 nh, 是打印宽 吗？

[日立奔腾浪潮微软松下联想]

nl、nh合起来代表左边距，前者是低8位，nh是高8位

[tanqth]

左边距= (nL+nH*256) * 横向移动单位。由nL与nH结合起来计算总的边距值 。 左边距就是左边开始打印的坐标位置。 如果 nL=2, nH=1,则：左边距= 2+1*256= 258 个移动单位。 通常默认情况下一个移动单位就是一个打印点，这个单位是可以设置的，使用GS P指令。

[xrbaa]

引用 4 楼 smkf225 的回复:

就是想实现不要装驱动。

不装驱动，你的程序都看不到打印机。

[xrbaa]

发一下打印机型号，或者购买链接。我给你看看。

[smkf225]

佳博打印机或者Epson 都是小票，都支持Esc/POS命令 测试小票 GP-L80250I

[smkf225]

引用 13 楼 xrbaa 的回复:

[quote=引用 4 楼 smkf225 的回复:]就是想实现不要装驱动。

不装驱动，你的程序都看不到打印机。[/quote] 打印机有网络端口 9100 ，往端口发数据就行

[smkf225]

PaddingLeft: string = #29 + #76 + #2 + #1; GSP: string = #29 + #80 + #90 + #360; 为何打印内容跑到最右边一列去了。

[日立奔腾浪潮微软松下联想]

按你这设置
GSP: string = #29 + #80 + #90 + #360;
横向移动单位=22.5/90=0.25mm
左边距
PaddingLeft: string = #29 + #76 + #2 + #1;
258 * 0.25=64.5mm
显然你的左边距设得太大了，你还问为什么~~~

[smkf225]

引用 20 楼 早打大打打核战争 的回复:

按你这设置 GSP: string = #29 + #80 + #90 + #360; 横向移动单位=22.5/90=0.25mm 左边距 PaddingLeft: string = #29 + #76 + #2 + #1; 258 * 0.25=64.5mm 显然你的左边距设得太大了，你还问为什么~~~

我改大，改成180，结果还是一样的。 算了，我还是加空格吧。

[jackie135]

问题描述太简单

[smkf225]

引用 17 楼 jackie135 的回复:

问题描述太简单

跪求一个代码，不需要装驱动，通过网络端口（小票打印机9100）进行打印。不知道我表述明白了没有