前台零售通过pos打印机打印小票的程序，开钱箱的程序
PowerBuilder下使用并口控制打印机使用PowerBuilder编程的人员如果需要在Windows下使用并口打印机逐行打印，而又不想使用Windows的驱动程序。我们这里提供一种不需要任何外来的元件的方法。
integer li_FileNum
String PDStr
li_FileNum = FileOpen("LPT1",LineMode!, Write!, LockWrite!, Append!)
PDStr=”PowerBuilder Printer on LPT1”
FileWrite(li_FileNum,PDStr)
FileClose(li_FileNum)
如果需要控制并口的POS58打印机开钱箱，使用以上方法是不可打开的，因为PowerBuilder会把chr(0)认为毫无意义而给屏蔽掉，所以就只有使用调用外部文件的方法来实现。把附带的OpenLptDoor.exe文件复制到程序的目录下，然后在PowerBuilder下调用以下语句就可以打开了，其实该文件执行的指令就是Chr(27)+”p”+Chr(0)+Chr(60)+Chr(255)：
Run("OpenLptDoor.exe")
如果OpenLptDoor.exe文件保存在别的位置，就要在调用语句中加入文件存放路径。
PowerBuilder环境下控制串口顾客显示屏
使用PowerBuilder编程的人员如果需要在Windows下使用串口控制顾客显示屏或串口打印机，就需要使用外来方式。我们这里提供了API_COM.DLL这个链接库供调用。
首先把API_COM.DLL文件复制到编写的源程序目录下，接着在程序中声明调用的三个函数：
1、 打开源程序，然后选择下拉菜单“Declare”，接着从菜单中选择“Local External Functions”。
2、 此时出现“Declare Local External Functions”窗口，在窗口中输入如下内容：
function Boolean com_init(Int com,int baud)library "api_com.dll"
function Boolean com_rest() library "api_com.dll"
function Boolean com_send(string buf,int len)library "api_com.dll"
按“OK”以后即对函数声明完毕。
3、 现在就可以在程序中调用函数了。首先打开窗体的脚本编辑器，选择“show”事件，写入如下内容，该内容表示窗体显示时打开端口：
if not com_init(1,2400) then
messagebox("错误","COM1打开错误!",exclamation!)
end if
4、 接着选择“close”事件，写入如下内容，该内容表示窗体关闭时关闭端口：
com_rest();
5、 现在可以返回主窗体了，在窗体上增加一个按钮，打开该按钮的脚本编辑器，写入如下内容：
string PDStr
PDStr=Char(27)+Char(81)+Char(65)+"1234.56"+Char(13);
com_send(PDStr,Len(PDStr))
6、 按照如上操作，就可以向串口发送显示数字的指令了，如果需要实现其他的功能，只需要对PDStr进行赋值就可以了。
下面是控制顾客显示屏显示“总计”灯的命令：
PDStr=Char(27)+Char(115)+”2”
该代码还可以控制POS58打印机打印，给PDStr如下赋值就开始打印了：
PDStr=”PowerBuilder Printer on COM1”+Char(10)
使用打印开钱箱：
Chr(27)+”p”+Chr(0)+Chr(60)+Chr(255)
from:http://faq.csdn.net/read/191843.html
相关附件：
API_COM.DLL 这个能否共享？？？ xihuabo@126.com 谢谢 相关附件上传了。大家下吧。 现在的pos58很少用到API_COM.DLL这个文件了 本帖最后由 tomsmh 于 2011-4-16 13:46 编辑
老大有没有用TM88III.dll写的打印例子啊有的发我一个651511387＠qq.com 好东西，收藏了 下载看看学习一下 开钱箱11111!!!
好资源，收藏下载
学习学习
页:
[1]