pb使用热敏打印机的有关问题

pb使用热敏打印机的问题
由于并口上接了一个针式打印机,热敏打印机只能接在串口上, 串口如果用驱动来打印,速度很慢. 打算不用驱动打印,直接通过指令来打印. 之前没做过这种方式的打印,光听过. 一点想法都没有, 谁有这方面的例子或者源代码给我发个呗, 谢谢啦 打印机支持标准的指令集的 什么ESP/POS的这个东西

[解决办法]

SQL code

        string  ls_prntrs , ls_printcontents         long  ll_rtn                     ls_prntrs = COM1//端口类型        ll_rtn = fileopen(ls_prntrs,streammode!,write!)        if ll_rtn = -1 then            messagebox("提示","打开端口" + ls_prntrs  + "失败~r~n请检查是否正确连接打印机")        else            filewrite(ll_rtn,ls_printcontents)            fileclose(ll_rtn)        end if
[解决办法]
首先你下载这个pb串口通讯的例子
在你的电脑上注册串口控件

http://download.csdn.net/detail/yo_yo2005/2452946

在下载到的文件里找到 w_com_example.srw

导入到你自己的程序的pbl里
然后把ole控件复制到你自己的窗口上

ole控件配置串口的参数我已经写在例子里了，你自己看

另外附加一点
通过ole控件往打印机上发数据的代码给你贴上

ole的oncomm事件里
VB code
ole_1.object.output='让打印机打印的命令写在这里'