1.MSComm控件两种处理通讯的方式 MSComm控件提供下列两种处理通讯的方式:事件驱动方式和查询方式。
1.1 事件驱动方式
事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。在许多情况下,在事件发生时需要得到通知,例如,在串口接收缓冲区中有字符,或者 Carrier Detect (CD) 或 Request To Send (RTS) 线上一个字符到达或一个变化发生时。在这些情况下,可以利用 MSComm 控件的 OnComm 事件捕获并处理这些通讯事件。OnComm 事件还可以检查和处理通讯错误。所有通讯事件和通讯错误的列表,参阅 CommEvent 属性。在编程过程中,就可以在OnComm事件处理函数中加入自己的处理代码。这种方法的优点是程序响应及时,可靠性高。每个MSComm 控件对应着一个串行端口。如果应用程序需要访问多个串行端口,必须使用多个 MSComm 控件。
1.2 查询方式
查询方式实质上还是事件驱动,但在有些情况下,这种方式显得更为便捷。在程序的每个关键功能之后,可以通过检查 CommEvent 属性的值来查询事件和错误。如果应用程序较小,并且是自保持的,这种方法可能是更可取的。例如,如果写一个简单的电话拨号程序,则没有必要对每接收一个字符都产生事件,因为唯一等待接收的字符是调制解调器的“确定”响应。
2.MSComm 控件的常用属性 MSComm 控件有很多重要的属性,但首先必须熟悉几个属性。
CommPort |
设置并返回通讯端口号。 |
Settings |
以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位。 |
PortOpen |
设置并返回通讯端口的状态。也可以打开和关闭端口。 |
Input |
从接收缓冲区返回和删除字符。 |
Output |
向传输缓冲区写一个字符串。 |
下面分别描述:
CommPort属性:设置并返回通讯端口号。
语法 object.CommPort[value ] (value 一整型值,说明端口号。)
说明 在设计时,value 可以设置成从 1 到 16 的任何数(缺省值为 1)。但是如果用 PortOpen 属性打开一个并不存在的端口时,MSComm 控件会产生错误 68(设备无效)。
注意:必须在打开端口之前设置 CommPort 属性。
RThreshold 属性:在 MSComm 控件设置 CommEvent 属性为 comEvReceive 并产生 OnComm 之前,设置并返回的要接收的字符数。
语法:object.Rthreshold [ = value ](value 整型表达式,说明在产生 OnComm 事件之前要接收的字符数。 )
说明:当接收字符后,若 Rthreshold 属性设置为 0(缺省值)则不产生 OnComm 事件。例如,设置 Rthreshold 为 1,接收缓冲区收到每一个字符都会使 MSComm 控件产生 OnComm 事件。
CTSHolding 属性:确定是否可通过查询 Clear To Send (CTS) 线的状态发送数据。Clear To Send 是调制解调器发送到相联计算机的信号,指示传输可以进行。该属性在设计时无效,在运行时为只读。
语法: object.CTSHolding(Boolean)
Mscomm 控件的 CTSHolding 属性设置值:
True Clear To Send 线为高电平。
False Clear To Send 线为低电平。
说明:如果 Clear To Send 线为低电平 (CTSHolding = False) 并且超时时,MSComm 控件设置 CommEvent 属性为 comEventCTSTO (Clear To Send Timeout) 并产生 OnComm 事件。
Clear To Send 线用于 RTS/CTS (Request To Send/Clear To Send) 硬件握手。如果需要确定 Clear To Send 线的状态,CTSHolding 属性给出一种手工查询的方法。
详细信息 有关握手协议,请参阅 Handshaking 属性。
SThreshold 属性: MSComm 控件设置 CommEvent 属性为 comEvSend 并产生 OnComm 事件之前,设置并返回传输缓冲区中允许的最小字符数。
语法 object.SThreshold [ = value ]
value 整形表达式,代表在 OnComm 事件产生之前在传输缓冲区中的最小字符数。
说明:若设置 Sthreshold 属性为 0(缺省值),数据传输事件不会产生 OnComm 事件。若设置 Sthreshold 属性为 1,当传输缓冲区完全空时,MSComm 控件产生 OnComm 事件。如果在传输缓冲区中的字符数小于 value,CommEvent 属性设置为 comEvSend,并产生 OnComm 事件。comEvSend 事件仅当字符数与 Sthreshold 交叉时被激活一次。例如,如果 Sthreshold 等于 5,仅当在输出队列中字符数从 5 降到 4 时,comEvSend 才发生。如果在输出队列中从没有比 Sthreshold 多的字符,comEvSend 事件将绝不会发生。
Handshake 常数
常数 |
值 |
描述 |
comNone |
0 |
无握手。 |
comXonXoff |
1 |
XOn/Xoff 握手。 |
comRTS |
2 |
Request-to-send/clear-to-send 握手。 |
comRTSXOnXOff |
3 |
Request-to-send 和 clear-to-send 握手皆可。 |
OnComm 常数
常数 |
值 |
描述 |
comEvSend |
1 |
发送事件。 |
comEvReceive |
2 |
接收事件。 |
comEvCTS |
3 |
clear-to-send 线变化。 |
comEvDSR |
4 |
data-set ready 线变化。 |
comEvCD |
5 |
carrier detect 线变化。 |
comEvRing |
6 |
振铃检测。 |
Error 常数
常数 |
值 |
描述 |
comEventBreak |
1001 |
接收到中断信号 |
comEventCTSTO |
1002 |
Clear-to-send 超时 |
comEventDSRTO |
1003 |
Data-set ready 超时 |
comEventFrame |
1004 |
帧错误 |
comEventOverrun |
1006 |
端口超速 |
comEventCDTO |
1007 |
Carrier detect 超时 |
comEventRxOver |
1008 |
接收缓冲区溢出 |
comEventRxParity |
1009 |
Parity 错误 |
comEventTxFull |
1010 |
传输缓冲区满 |
comEventDCB |
1011 |
检索端口 设备控制块 (DCB) 时的意外错误 |
InputMode 常数
常数 |
值 |
描述 |
comInputModeText |
0 (缺省) |
通过 Input 属性以文本方式取回数据。 |
comInputModeBinary |
1 |
通过 Input 属性以二进制方式检取回数据。 |
CDHolding 属性:通过查询 Carrier Detect (CD) 线的状态确定当前是否有传输。Carrier Detect 是从调制解调器发送到相联计算机的一个信号,指示调制解调器正在联机。该属性在设计时无效,在运行时为只读。
语法 object.CDHolding
设置值:CDHolding 属性的设置值为:
设置 |
描述 |
True |
Carrier Detect 线为高电平 |
False |
Carrier Detect 线为低电平 |
说明:注意当 Carrier Detect 线为高电平 (CDHolding = True) 且超时时,MSComm 控件设置CommEvent 属性为 comEventCDTO(Carrier Detect 超时错误),并产生 OnComm 事件。
注意 在主机应用程序中捕获一个丢失的传输是特别重要的,例如一个公告板,因为呼叫者可以随时挂起(放弃传输)。
责任编辑:小草