搏击

用PB5设计串口通讯程序

2019-09-12 10:56:37来源:励志吧0次阅读

PowerBuilder5.0是一种面向对象的、具有可视图形界面的、快速的交互式开发工具,它通过不同数据库采用各自的专用接口或通过ODBC接口,同时支持多种关系数据库系统、支持多文档界面(MDI)、对象嵌入 与链接(OLE)、动态数据交换(DDE)。利用其独特的数据窗口对象,无须编写SQL语句,便可直接对数据库进行查询、修改、插入、删除、浏览、打印,以多种文件格式打开和存储数据,因此深受广大用户的欢迎。在实际应用过程中经常遇到PowerBuilder与其它设备通过串口进行通讯的程序设计如IC卡应用系统中需通过串口与IC卡读写器进行通讯;在控制系统中,需通过串口与下位机进行通讯。下面介绍PowerBuilder5.0中常用的两种串口通讯设计方法。

一、 调用Windows SDK函数进行串口通讯

1、Windows SDK函数介绍

OpenComm int OpenComm(LpszDevControl, CbInQueue,cbOutQueue)LPCSTR lpszdevcontro l 设备控制信息的地址 UINT CbInQueue 接受队列的大小(以字节为单位) UINT cbOutQueue 发送队列的大小返回:如调用成功,返回值标示此打开的设备否则其返回值小于0

·CloseComm Int CloseComm(idComDev)

Int idComDey 要关闭的设备 返回值:调用成功返回0,否则返回负值

·WriteComm int WriteComm(idComDev,lpvBuf,cbWrite)

int idComDev 通讯设备标示符 const void FAR * lpvBuf 数据缓存区地址 int ,cbWrite 要写的长度返回值:如果成功返回所写的字节数,否则返回值小于0

·ReadComm Int ReadComm(idComDev,lpvBuf,cbRead)

int idComDev 通讯设备标示符 const void FAR * lpvBuf 数据缓存区地址 int cbRead 要读的字节数返回值:如果成功返回所读的字节数,否则返回值小于0

·FlushComm Int FluseComm(idComDev,fnQueue)

Int idComDev 通讯设备标示符 Int fnQueue 要刷新的队列 返回值:成功时返回0,否则返回为负

2、示例:

为一人事管理系统中的查询窗口。如果想与被查询人拨打电话,可输入该人姓名,在输入过程中,数据窗口会显示满足要求的所有人姓名,双击该行即将该人电话号码显示于单行编辑窗内,然后按“拨号”按钮即可。

程序设计如下:

在窗口设计菜单中选取:Declare菜单?Declare External Function 输入:

Function int OpenComm(String Comm, Uint Inqueue,Uint Outqueue)Library “USER.EXE”

Function int CloseComm(int lpt)Library “USER.EXE”

Function int WriteComm(int lpt,String buf,int Size) Library “USER.EXE”

Function int FlushComm(int lpt, int no_que)Library “USER.EXE”

“拨号”按钮的”Clicked” 事件编程如下:

int ret String port_2,ph_code port_2=”Com2” //取单行编辑框内容,并用atdt拨号

ph_code=”atdt”+sle_code+”~r~n” //打开串口

ret=OpenComm(port_2,128,128) //拨号开始

FlushComm(ret,0)

FlushComm(ret,1)

WriteComm(ret,ph_code,len(ph_code))

WriteComm(ret,”~r~n”,2)

CloseComm(ret)   二、利用Microsoft公司提供的通讯控件

利用Microsoft公司提供的通讯控件(Mscomm.vbx,用于16位通讯程序、Mscomm32.ocx用于开发32位通讯程序)可方便实现串口通讯

1、 常用属性 CommPort:设置或返回串行端口号,缺省为1。

Setting:设置或返回串行端的波特率、奇偶校验位、 数据位数、停止位。缺省值为"9600,N,8,1"。

PortOpen:设置它为True则打开端口,设置它为False则关闭端口。

InBufferSize:设置或返回接收缓冲区的大小,缺省为1024 字 节。

InBufferCount:返回接收缓冲区内的等代读取的字节个数,设属性为0清除接收缓冲区。

OutBufferSize:设置或返回发送缓冲区,缺省为512字节。

OutBufferCounter:返回发送缓冲区内等待发送的字符数,可用0来清空缓冲区。

Output:向发送缓冲区传送数据

RThreshold: 该属性确定当接收缓冲区内字节个数达或超过该值后就产生代码为ComEventReceive

的OnComm事件,设置位0,则不产生OnComm事件。

CommEvent:有通讯错误或事件发生时产生OnComm事件,CommEvent事件的值可以用来确定引

发OnComm事件的具体的错误或事件常用的有以下几种(更详细的资料可参考MSComm控件帮助文件)

ComEventbreak:接受到中断信号

ComEventFrame:硬件检测到帧错误。

ComEventRxOver:接收缓冲区溢出。

ComEventTxFull:发送缓冲区溢出。

ComEventReceive:接受到规定的字符数。

InputLen:设置或返回接收缓冲区内用Input读入的个数。若取0,则读取整个缓冲区的内容。

Input:返回并删除接受缓冲区的数据。  2、 示例:

下面举一接收程序示例:制作一通讯接收窗口,选择菜单Controls→OLE→Insert Control→Microsoft Communications Control,

在窗口中出现通信控件图标单击鼠标右键,选择OCX Properties设置常用属性,也可在程序中进行设置窗口的Open事件程序如下:

ole_1.object.CommPort=2

ole_1.object.Settings="9600,N,8,1"

ole_1.object.PortOpen=ture

ole_1.object.Rthreshold=10

ole_1.object..Inputlen=0 . .

通信控件的oncomm事件的程序如下

choose case ole_1.object.CommEvent

case comEventBreak //接收到中断信号

case comEventCDTO //处理CD超时

. . .

case comEvReceive sle_1.text=ole_1.object.Input

. .

end choose  以上是一个基本的例子,在实际应用过程中应根据不同的情况进行不同的设计,如波特率、帧格式等。

总之,利用以上方法可以方便的在PowerBuilder中进行串口通讯,并对接收的数据利用PowerBuilder进行数据处理。

查看本文来源

小孩子反复发烧怎么办
两岁宝宝咳嗽
小儿便秘的饮食禁忌
小孩子的退热药物
分享到: