文档库 最新最全的文档下载
当前位置:文档库 › MSComm控件使用详1

MSComm控件使用详1

MSComm控件使用详1
MSComm控件使用详1

MSComm控件使用详解

MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm 控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在V C、VB、Delphi等语言中均可使用。 Microsoft Communications Control(以下简称MSCo mm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。

1.MSComm控件两种处理通讯的方式

MSComm控件提供下列两种处理通讯的方式:事件驱动方式和查询方式。

1.1 事件驱动方式

事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。在许多情况下,在事件发生时需要得到通知,例如,在串口接收缓冲区中有字符,或者 Carrier Detect (CD) 或 Re quest To Send (RTS) 线上一个字符到达或一个变化发生时。在这些情况下,可以利用 MSC omm 控件的 OnComm 事件捕获并处理这些通讯事件。OnComm 事件还可以检查和处理通讯错误。所有通讯事件和通讯错误的列表,参阅 CommEvent 属性。在编程过程中,就可以在OnComm事件处理函数中加入自己的处理代码。这种方法的优点是程序响应及时,可靠性高。每个MSComm 控件对应着一个串行端口。如果应用程序需要访问多个串行端口,必须使用多个 MSComm 控件。

1.2 查询方式

查询方式实质上还是事件驱动,但在有些情况下,这种方式显得更为便捷。在程序的每个关键功能之后,可以通过检查 CommEvent 属性的值来查询事件和错误。如果应用程序较小,并且是自保持的,这种方法可能是更可取的。例如,如果写一个简单的电话拨号程序,则没有必要对每接收一个字符都产生事件,因为唯一等待接收的字符是调制解调器的“确定”响应。

2.MSComm 控件的常用属性

MSComm控件有很多重要的属性,但首先必须熟悉几个属性。

CommPort 设置并返回通讯端口号。

Settings 以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位。

PortOpen 设置并返回通讯端口的状态。也可以打开和关闭端口。

Input 从接收缓冲区返回和删除字符。

Output 向传输缓冲区写一个字符串。

下面分别描述:

CommPort 属性

设置并返回通讯端口号。

语法

https://www.wendangku.net/doc/526550501.html,mPort[ = value ]

CommPort 属性语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

value 一整型值,说明端口号。

说明

在设计时,value 可以设置成从 1 到 16 的任何数(缺省值为 1)。但是如果用 PortOpen 属性打开一个并不存在的端口时,MSComm 控件会产生错误 68(设备无效)。

警告必须在打开端口之前设置 CommPort 属性。

数据类型

Integer

Settings 属性

设置并返回波特率、奇偶校验、数据位、停止位参数。

语法

object.Settings[ = value]

Settings 属性语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

value 字符串表达式,说明通讯端口的设置值,如下所述。

说明

当端口打开时,如果 value 非法,则 MSComm 控件产生错误 380(非法属性值)。Value 由四个设置值组成,有如下的格式:

"BBBB,P,D,S"

BBBB 为波特率,P 为奇偶校验,D 为数据位数,S 为停止位数。value 的缺省值是:"9600,N,8,1"

下表列出合法的波特率:

设置值

110

300

600

1200

2400

9600(缺省)

14400

19200

28800

38400

56000

128000

256000

下表说明合法的奇偶校验值。

设置值描述

E 偶数 (Even)

M 标记 (Mark)

N 缺省 (Default)

None

O 奇数 (Odd)

S 空格 (Space)

下表列出合法的数据位值。

设置值

4

5

6

7

8 (缺省)

下表列出合法的停止位值。

?2006-7-27 16:38

?回复

?2楼

设置值

1 (缺省)

1.5

2

数据类型

String

Settings 示例

下面的例子设置控件端口通讯,波特率 9600,无奇偶校验检查,8 个数据位,

1 个停止位:

MSComm1.Settings = "9600,N,8,1"

PortOpen 属性

设置并返回通讯端口的状态(开或关)。在设计时无效。

语法

object.PortOpen[ = value]

PortOpen 属性语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

value 布尔表达式,说明通讯端口的状态。

设置值

value 设置值是:

设置值描述

True 端口开

False 端口关

说明

设置 PortOpen 属性为 True 打开端口。设置为 False 关闭端口并清除接收和传输缓冲区。当应用程序终止时,MSComm 控件自动关闭串行端口。

在打开端口之前,确定 CommPort 属性设置为一个合法的端口号。如果 Comm Port 属性设置为一个非法的端口号,则当打开该端口时,MSComm 控件产生错误 68(设备无效)。

另外,串行端口设备必须支持 Settings 属性当前的设置值。如果 Settings 属性包含硬件不支持的通讯设置值,那么硬件可能不会正常工作。

如果在端口打开之前,DTREnable 或 RTSEnable 属性设置为 True,当关闭端口时,该属性设置为 False。否则,DTR 和 RTS 线保持其先前的状态。

数据类型

Boolean

PortOpen 属性示例

下例以波特率 9600 打开 1 号通讯端口,没有奇偶检查,8 个数据位,1 个停止位。

MSComm1.Settings = "9600,n,8,1"

https://www.wendangku.net/doc/526550501.html,mPort = 1

MSComm1.PortOpen = True

Input 属性

返回并删除接收缓冲区中的数据流。该属性在设计时无效,在运行时为只读。

语法

object.Input

Input 属性语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

说明

InputLen 属性确定被 Input 属性读取的字符数。设置 InputLen 为 0,则 Input 属性读取缓冲区中全部的内容。

InputMode 属性确定用 Input 属性读取的数据类型。如果设置 InputMode 为 co mInputModeText,Input 属性通过一个 Variant 返回文本数据。如果设置 Input Mode 为 comInputModeBinary,Input 属性通过一个 Variant .返回一二进制数据的数组。

数据类型

Variant

Input 属性示例

该例子说明如何从接收缓冲区读取数据。

Private Sub Command1_Click()

Dim InString as String

' 读取所有可用数据。

MSComm1.InputLen = 0

' 检查数据。

If MSComm1.InBufferCount Then

' Read data.

InString = MSComm1.Input

End If

End Sub

Output 属性

往传输缓冲区写数据流。该属性在设计时无效,在运行时为只读。

语法

object.Output [ = value ]

Output 属性语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

value 要写到传输缓冲区中的一个字符串。

说明

Output 属性可以传输文本数据或二进制数据。用 Output 属性传输文本数据,必须定义一个包含一个字符串的 Variant。发送二进制数据,必须传递一个包含字节数组的 Variant 到 Output 属性。

正常情况下,如果发送一个 ANSI 字符串到应用程序,可以以文本数据的形式发送。如果发送包含嵌入控制字符、Null 字符等等的数据,要以二进制形式发送。

数据类型

Variant

Output 属性示例

下面的例子说明如何将用户键入的每一个字符送到串行端口:

Private Sub Form_KeyPress (KeyAscii As Integer)

Dim Buffer as Variant

' 设置并打开窗口

https://www.wendangku.net/doc/526550501.html,mPort = 1

MSComm1.PortOpen = True

Buffer = Chr$(KeyAscii)

MSComm1.Output = Buffer

End Sub

OnComm 事件

无论何时当 CommEvent 属性的值变化时,就产生 OnComm 事件,标志发生了一个通讯事件或一个错误。

语法

Private Sub object_OnComm ()

?2006-7-27 16:38

?回复

?

?kakaronlei

?

3楼

OnComm 事件语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

说明

CommEvent 属性包含实际错误或产生 OnComm 事件的数码。注意,设置 Rthreshold 或 Sthreshold 属性为 0,分别使捕获 comEvReceive 和 comEvSend 事件无效。

OnComm 事件示例

下例说明如何处理通讯错误和事件。可以在相关的 Case 语句之后插入代码来处理特定的错误或事件。

Private Sub MSComm_OnComm ()

Select Case https://www.wendangku.net/doc/526550501.html,mEvent

' Handle each event or error by placing

' code below each case statement

' 错误

Case comEventBreak ' 收到 Break。

Case comEventCDTO ' CD (RLSD) 超时。

Case comEventCTSTO ' CTS Timeout。

Case comEventDSRTO ' DSR Timeout。

Case comEventFrame ' Framing Error

Case comEventOverrun '数据丢失。

Case comEventRxOver '接收缓冲区溢出。

Case comEventRxParity ' Parity 错误。

Case comEventTxFull '传输缓冲区已满。

Case comEventDCB '获取 DCB 时意外错误

' 事件

Case comEvCD ' CD 线状态变化。

Case comEvCTS ' CTS 线状态变化。

Case comEvDSR ' DSR 线状态变化。

Case comEvRing ' Ring Indicator 变化。

Case comEvReceive ' 收到 RThreshold # ofchars.

Case comEvSend ' 传输缓冲区有 Sthreshold 个字

符 '

Case comEvEof ' 输入数据流中发现 EOF 字符

End Select

End Sub

CommEvent 属性

返回最近的通讯事件或错误。该属性在设计时无效,在运行时为只读。

语法

https://www.wendangku.net/doc/526550501.html,mEvent

CommEvent 属性语法包括下列部分:

部分描述

object 对象表达式,其值是“应用于”列表中的对象。

说明

只要有通讯错误或事件发生时都会产生 OnComm 事件,Co mmEvent 属性存有该错误或事件的数值代码。要确定引发 O nComm 事件的确切的错误或事件,请参阅 CommEvent 属性。

CommEvent 属性返回下列值之一来表示不同的通讯错误或事件。这些常数可以在该控件的对象库中找到。通讯错误包括下列设置值:

常数值描述

comEventBreak 1001 接收到一个中断信号。comEventCTSTO 1002 Clear To Send 超时。在系统规定时间内传输一个字符时,Clear To Send 线为低电平。comEventDSRTO 1003 Data Set Ready 超时。在系统规定时间内传输一个字符时,Data Set Ready 线为低电平。comEventFrame 1004 帧错误。硬件检测到一帧错误。comEventOverrun 1006 端口超速。没有在下一个字符到达之前从硬件读取字符,该字符丢失。

comEventCDTO 1007 载波检测超时。在系统规定时间内传输一个字符时,Carrier Detect 线为低电平。Carrier Detect 也称为 Receive Line Signal Detect (RLSD)。comEventRxOver 1008 接受缓冲区溢出。接收缓冲区没有空间。

comEventRxParity 1009 奇偶校验。硬件检测到奇偶校验错误

comEventTxFull 1010 传输缓冲区已满。传输字符时传输缓冲区已满

comEventDCB 1011 检索端口的设备控制块 (DCB) 时的意外错误

通讯事件包括下列设置值:

常数值描述

comEvSend 1 在传输缓冲区中有比 Sthreshold 数少的字符。

comEvReceive 2 收到 Rthreshold 个字符。该事件将持续产

生直到用 Input 属性从接收缓冲区中删除数据。

comEvCTS 3 Clear To Send 线的状态发生变化。

comEvDSR 4 Data Set Ready 线的状态发生变化。该事件只

在 DST 从 1 变到 0 时才发生。

comEvCD 5 Carrier Detect 线的状态发生变化。

comEvRing 6 检测到振铃信号。一些 UART(通用异步接

收—传输)可能不支持该事件。

comEvEOF 7 收到文件结束(ASCII 字符为 26)字符。

?2006-7-27 16:38

?回复

?

?kakaronlei

?

4楼

数据类型

Integer

MSComm 控件示例

下面这个简单的例子演示了用调制解调器进行基本的串行通讯:

Private Sub Form_Load ()

' 保存输入子串的缓冲区

Dim Instring As String

' 使用 COM1。

https://www.wendangku.net/doc/526550501.html,mPort = 1

' 9600 波特,无奇偶校验,8 位数据,一个停止位。

MSComm1.Settings = "9600,N,8,1"

' 当输入占用时,

' 告诉控件读入整个缓冲区。

MSComm1.InputLen = 0

' 打开端口。

MSComm1.PortOpen = True

' 将 attention 命令送到调制解调器。

' Chr$函数:返回 String,其中包含有与指定的字符代码相关的字符。

MSComm1.Output = "ATV1Q0" & Chr$(13) ' 确保

' 调制解调器以"OK"响应。

' 等待数据返回到串行端口。

Do

DoEvents

Buffer$ = Buffer$ & MSComm1.Input

Loop Until InStr(Buffer$, "OK" & vbCRLF)

' 从串行端口读 "OK" 响应。

' 关闭串行端口。

MSComm1.PortOpen = False

End Sub

注意 MSComm 控件可以采用轮询或事件驱动的方法从端口获取数据。这个简单的例子使用了轮询方法。

实例1:计算机拨号

在一些实际应用中经常需要使用计算机拨号。下面这个例子利用MSComm控件操作Modem进行拨号,实现串口通信。实现步骤:

1.建窗体

添加一个MSComm控件,用来建立与串口的连接;

添加一个Text控件,Name属性为Txttel,用来输入电话号码;

添加3个CommandButton控件,Name属性分别为DialButt on、CancellButton、QuitButton,分别用来实现拨号、中止拨号、中止程序;

添加一个Label控件,用来显示所有与拨号有关的信息。窗体见图1。

2.设置MSComm控件属性

InBufferSize=1024;’ InBufferSize 是指整个接收缓冲区的大小。缺省值是 1024 字节。

Inputlen=0;’ InputLen 属性的缺省值是 0。设置 InputL en 为 0 时,使用 Input 将使 MSComm 控件读取接收缓冲区中全部的内容。

InputMode=0;’0---(缺省)数据通过 Input 属性以文本形式取回。

1--数据通过 Input 属性以二进制形式取回Rthreshold=2;’当接收字符后,若 Rthreshold 属性设置为 0(缺省值)则不产生 OnComm 事件。

RTSEnable=True;’当 RTSEnable 设置为 True,端口打开时,Request To Send 线设置为高电平,端口关闭时,设置为低电平。

Settings=“9600,N,8,1”;

Sthreshold=0。’若设置 Sthreshold 属性为 0(缺省值),数据传输事件不会产生 OnComm 事件。若设置 Sthreshol

d 属性为 1,当传输缓冲区完全空时,MSComm 控件产生 O nComm 事件。

因为每一台计算机的串口使用状态都不会一样。为使程序具有通用性,在窗体的Load方法中首先进行串口测试,找到第一个可用串口后再进行设置。

3.程序功能

程序根据输入的电话号码进行拨号,Modem正常拨号后,

提示用户摘机,准备通话。

图1 电话拨号实例

4.主要方法与事件代码

'设置可用串口

Private Sub Form_Load()

On Error GoTo error_open

For i = 1 To 4

https://www.wendangku.net/doc/526550501.html,mPort = 1

MSComm1.PortOpen = True

'设置可用的第一个串口

On Error GoTo 0

Exit Sub

error_resume:

Next

error_open:

Resume error_resume

End Sub

Private Sub DialButton_Click()

Dim Number$, Temp$

Number$ = Trim$(Txttel.Text) ’返回 Variant (String),其中

包含指定字符串的拷贝,没有前导空白 (LTrim)、尾随空

白 (RTrim) 或前导和尾随空白 (Trim)。

If Number$ = “" Then

MsgBox “请输入电话号码"

Txttel.SetFocus

Exit Sub

End If

DialButton.Enabled = False

QuitButton.Enabled = False

DialString$ =“ATDT”+ Number$ +“;”+ vbCr

?2006-7-27 16:38

?回复

?

?kakaronlei

5楼

'清除接收缓冲区

MSComm1.InBufferCount =0

'拨电话号码

MSComm1.Output = DialString$

Lblmessage.Caption = “正在拨号码-”+Number$

DialButton.Enabled = True

QuitButton.Enabled = True

End Sub

Private Sub MSComm1_OnComm()

Select Case https://www.wendangku.net/doc/526550501.html,mEvent

Case comEvReceive

'读取串口数据

COMBUF=COMBUF + MSComm1.Input

lc = InStr(1, COMBUF, “OK”)

If lc = 0 Then Exit Sub

'Modem已正常拨号,返回OK

Lblmessage.Caption = “请您摘下电话机,准备通话”

Case comEvSend

End Select

End Sub

Private Sub CancelButton_Click()

'断开与调制解调器的连接

MSComm1.Output = “ATH”+ vbCr

End Sub

实例2:实现来电显示

在一些实际应用中,需要显示并保存来电号码,并根据电话

号码显示相应资料,比如小区物业管理和110报警等系统。

实现步骤:

1.创建窗体

添加一个MSComm控件,用来建立与串口的连接;

添加4个Option控件,用来确定使用的串口号;

添加4个Label控件,用来显示来电号码及日期时间;

添加一个ProgressBar控件,用来显示电话振铃次数;

为方便调试程序,添加一个Text控件Text 5,用来显示Mo

dem传来的所有信息。窗体见图2。

图2 来电显示窗体

2.设置MSComm控件属性

InBufferSize=1024;

Inputlen=0;

InputMode=0;

Rthreshold=1;

RTSEnable=True;

Settings=“9600,N,8,1";

Sthreshold=0。

3.程序功能

程序首先初始化Modem,然后等待来电。当有来电时,MS

Comm产生OnComm事件。Modem送出的信息格式为“DA TE = 月日回车换行TIME = 时分回车换行NMBR = 电话号码回车换行”。在OnComm事件处理程序中对读入信息进行截取,截取电话号码后,以该电话号码为关键字,查询并显示数据库中有关信息。

4.主要方法与事件代码

'通用声明部分

Const DEBFLG = 1

Public COMX, BEEPNO, HANGUP,PNLOC As Integer Public COMBUF, COMLIN As String

Private Sub Form_Load()

'检测串行口

Dim I, C As Integer

COMX = 0

COMBUF = “”

COMLIN = “”

BEEPNO = 0

HANGUP = 0

'正常运行程序,关闭右侧Text5

If DEBFLG= 0 Then

Form1.Width = Form1.Width - Text5.Width

Text5.Enabled = False

Text5.Visible = False

End If

On Error GoTo ERROR_FORM_LOAD

'检测可用串口

For C = 1 To 4

If MSComm1.PortOpen Then MSComm1.PortOpen = False https://www.wendangku.net/doc/526550501.html,mPort = C

If Not MSComm1.PortOpen Then

MSComm1.PortOpen = True

If MSComm1.PortOpen Then MSComm1.PortOpen = False If COMX = 0 Then COMX = C

FORM_LOAD_1:

Next C

If COMX = 0 Then End

On Error GoTo 0

Option1(COMX - 1).Value = True

Exit Sub

ERROR_FORM_LOAD:

Option1(C - 1).Enabled = False

Resume FORM_LOAD_1

End Sub

'选择串行口

Private Sub Option1_Click(Index As Integer)

COMX = Index + 1

Call INIT_MODEM

End Sub

'初试化Modem

Private Sub INIT_MODEM()

If MSComm1.PortOpen Then MSComm1.PortOpen = False https://www.wendangku.net/doc/526550501.html,mPort = COMX

If Not MSComm1.PortOpen Then MSComm1.

PortOpen = True

MSComm1.Output = “AT#CID=1”+ vbCr

'检查Modem命令是否完成

Call CHK_MODEM

MSComm1.Output = “ATS0=0”+ vbCr

End Sub

'检查Modem命令是否完成

Private Sub CHK_MODEM()

Dim T As Single

Dim L As Integer

T = Timer

Do

COMBUF = COMBUF + MSComm1.Input

L = InStr(1, COMBUF,“OK”)

Loop Until L <> 0 Or Timer - T > 1

If L = 0 Then

Line1.Visible = True

Line2.Visible = True

Form1.Show

MsgBox “MODEM未联机”,vbOKOnly+vbCritical,“测试M ODEM”

Else

Line1.Visible = False

Line2.Visible = False

End If

End Sub

'串行口接收事件处理

Private Sub MSComm1_OnComm()

Dim CH, ST As String

Dim LC As Integer

Select Case https://www.wendangku.net/doc/526550501.html,mEvent

'接收到Rthreshold个字符

Case comEvReceive

COMBUF = COMBUF + MSComm1.Input

'读取串口数据

Do

LC = InStr(1, COMBUF, Chr(10))

If LC = 0 Then Exit Do

COMLIN = Left(COMBUF, LC)

COMBUF = Mid(COMBUF, LC + 1)

CH = Left(COMLIN, 1)

If “” < CH And CH < Chr(127) And DEBFLG = 1 Then Text5.Text = Text5.Text + COMLIN

Text5.SelStart = Len(Text5.Text)

End If

'截取来电号码,并显示

If InStr(1, COMLIN“NMBR=”)<> 0 Then

ST = Mid(COMLIN, 8)

Text2.Text=“”+Left$(ST,Len (ST) -2) +“”

Form1.WindowState = 0

Timer1.Enabled = True

Call BEEP_NO

'截取来电日期,并显示

ElseIf InStr(1, COMLIN, “DATE = ”) <> 0 Then

Text3.Text = Str(Year(DATE)) +“.”+ Mid(COMLI

N, 8, 2) +“.”+ Mid(COMLIN, 10, 2) +“”

'截取来电时间,并显示

ElseIf InStr(1, COMLIN, “TIME = ”) <> 0 Then

Text4.Text = “”+ Mid(COMLIN, 8, 2) +“:”+ Mid(COML IN, 10, 2)

'检测振铃个数

ElseIf InStr(1, COMLIN, “RING”) <> 0 Then

Call BEEP_NO

If HANGUP = 1 Or BEEPNO = 15 Then Call HANG_UP

'检测是否停止振铃

ElseIf Left(COMLIN, 3) = “000” Then

BEEPNO = 0

Timer1.Enabled = False

Form1.WindowState = 1

ProgressBar1.Value = 0

Frame3.Caption = “振铃数”

End If

Loop

'其他事件处理

Case comEvCTS

Case comEvDSR

Case comEvCD

Case comEvRing

Case comEventBreak

Call INIT_MODEM

Case Else

MsgBox “串口接收事件号:”& https://www.wendangku.net/doc/526550501.html,mEven t &“”, vbOKOnly +

vbCritical, “测试串行口”

End Select

End Sub

mscomm控件的使用和安装

一、引言 目前,在用计算机进行数据传输时,常用的是串行通信方式。用C++Builder来编写串行通信程序时,可以调用Windows API函数,也可以利用VB中的MSComm控件。利用API函数编写实际应用程序时,往往要考虑多线程的问题,这样编出来的程序不但十分庞大,而且结构比较复杂,继承性差,维护困难。但是使用串行通信控件就相对简单一些,而且功能强大,性能安全可靠。本文就简单的介绍一下在C++ Builder中利用MSComm 控件进行编程。 二、MSComm控件的常用属性和事件 MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。 事件驱动方式 在使用事件驱动法设计程序时,每当有新字符到达,或端口状态改变,或发生错误时,MSComm控件将解发OnComm事件,而应用程序在捕获该事件后,通过检查MSComm控件的CommEvent属性可以获知所发生的事件或错误,从而采取相应的操作。这种方法的优点是程序响应及时,可靠性高。 查询方式 查询方式实质上还是事件驱动,但在有些情况下,这种方式显得更为便捷。在程序的每个关键功能之后,可以通过检查CommEvent 属性的值来查询事件和错误。如果应用程序较小,并且是自保持的,这种方法可能是更可取的。 1.MSComm 控件的常用属性 CommPort属性:设置或返回通讯端口号,可以设置为1到16之间的任何值,本系统采用缺省值2; Settings属性:以字符串形式设置或返回波特率、奇偶校验、数据位和停止位,本系统采用缺省值"9600,n,8,1"; PortOpen属性:设置或返回通讯口的状态以及打开和关闭端口,可通过把该属性设置为true或者false来打开或者关闭端口; InBufferSize和OutBufferSize属性:分别设置接收和发送缓冲区分配的内存数量,单位为字节,缺省值分别为1024byte和512byte; InputLen属性:确定希望从接收缓冲区移出的字符数量,当InputLen=0时,一次把接收缓冲区的字符全部移出;

使用VB中的MSComm控件实现串口通信

使用VB中的MSComm控件实现RS-232串口通信 实验准备:需要准备一些与串口通信有关的设备,如(外置式)调制解调器、计算机串口与调制解调器的连接线、一根DTE到DTE的无调制解调器连接线(接法见本章有关习题的参考答案),在实验前检查计算机的两个串口是否能够正常工作。 实验环境:Windows 95/98操作系统,Microsoft VB 5.0以上程序设计环境。对例题中涉及调制解调器的内容,采用计算机与调制解调器连接的方式;对在例题中 VB (1 (CD) (2 来查询事件和错误。如果应用程序较小,并且是自保持的,这种方法可能是更可取的。例如,如果写一个简单的电话拨号程序,则没有必要对每接收一个字符都产生事件,因为唯一等待接收的字符是调制解调器的“OK”响应。 每个使用的MSComm控件都对应着一个串行端口。如果应用程序需要访问多个串行端口,必须使用多个MSComm控件。可以在Windows“控制面板”中改变端口地址和 中断地址。

下面这个简单的例子采用了轮询方法演示了用调制解调器进行基本的串行通讯: Private Sub Form_Load() Dim Instring As String '保存输入子串的缓冲区 https://www.wendangku.net/doc/526550501.html,mPort=3 '使用COM3。 MSComm1.Settings="2400,N,8,1" '2400波特率,无奇偶校验,8位数据位,一位停止位 下面我们将讲述一下MSComm控件的所有属性,其中前5个是最基本的,必须首先 掌握。 ⑴MsComm控件属性 1)CommPort,设置并返回通讯端口号。语法为: https://www.wendangku.net/doc/526550501.html,mPort[=value]

VB控件Mscomm控件与PLC进行RSModbus通讯源码

V B控件M s c o m m控件与P L C进行 R S M o d b u s通讯源码集团企业公司编码:(LL3698-KKI1269-TM2483-LUI12689-ITT289-

V B控件M s c o m m控件与P L C进行R S485(M o d b u s)通讯源码本人用的是ModbusRTU通讯模式,通过计算机串口转RS485与外围设备通行通讯,读写外围设备指定地址里的数据,从而达到自动化控制远端设备。 DimHiByteAsByte DimLoByteAsByte DimCRC16LoAsByte DimCRC16HiAsByte DimReturnData(1)AsByte DimKAsInteger DimCmdLenthAsInteger PrivateSubCommand1_Click() K=Text9.Text'写6个字节 Text13.Text="" '===========数组赋值输入代码 =============================================================== ======================== '<<算法一>> DimWriteStr()AsByte DimuAsInteger ReDimWriteStr(K+2)

Foru=0ToK WriteStr(u)=Val("&H"&Text1(u).Text) Next '<<算法二>> DimCRC_2()AsByte DimvAsInteger ReDimCRC_2(K) Forv=0ToK CRC_2(v)=Val("&H"&Text1(v).Text) Next '============================================================== ==================================== CallCRC161(CRC_2()) CallCRC16(WriteStr(),K) MSComm1.InBufferCount=0 '==========显示发送代码 =============================================================== ========================= DimmAsInteger Form=0To23 Ifm<=KThen Text8(m).Text=Hex(WriteStr(m))

C#串口通信:MSComm控件使用详解

C#串口通信:MSComm控件使用详解 目次 MSComm 控件两种处理通讯的方式 CommPort 属性 RThreshold 属性 CTSHolding 属性 SThreshold 属性 CDHolding 属性 DSRHolding 属性 Settings 属性 InputLen 属性 EOFEnable 属性 Handshake 常数 OnComm 常数 InputMode 常数 错误消息 MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在VC、VB、Delphi 等语言中均可使用。Microsoft Communications Control(以下简称MSComm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。 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 向传输缓冲区写一个字符串。 下面分别描述:

Mscomm控件属性、方法及事件

Mscomm控件 1、引用Mscomm控件 Mscomm控件不是普通的工具箱控件,在VB中首先要引用Mscomm控件,而后才能使用用它。 引用Mscomm控件很简单:选择“工程”主菜单,在“工程”菜单上选择“部件”命令,弹出如图所示的部件对话框,在控件属性页上选定“Microsoft Comm Control 6.0”控件,单击“确定”按钮后,Mscomm就添加到控件面板上。 2、Mscomm控件信息处理 Mscomm控件拥有功能完善的串口数据的发送和接收功能,Mscomm控件提供了两种处理方式。 ●事件驱动方式:由Mscomm控件的OnComm事件自动捕获并处理通信错误及事件; ●查询方式:通过定时查询Mscomm控件CommEvent属性的值来判断事件和错误。 在PC机串行端口通信时,使用了十几条线进行信号传输。利用Mscomm控件开发串口通信软件,需了解以下5条线的代号及作用,这5条线的高低电平状态分别对应Mscomm 控件的相应属性的True/False值: ●DRT线:用于传输PC机发往串口Modem等设备的信号,该信号表示PC机是否已准备好; ●RTS线:用于传输PC机发往串口Modem等设备的信号,该信号表示PC机是否允许Modem发数据; ●DSR线:用于传输串口Modem等设备发往PC机的信号,该信号表示串口Modem 等设备是否已做好操作准备;

●CTS线:用于传输串口Modem等设备发往PC机的信号,该信号表示Modem是否允许发送数据; ●CD线:用于传输串口Modem等设备发往PC机的信号,该信号表示Modem已经和远方的设备建立了连接。 Mscomm控件的通信功能实现,实际上是调用了API函数,而API函数是由Comm.drv 解释并传给设备驱动程序执行的,对于VB程序开发者只需要知道MSComm控件的属性和事件的用法即可以实现对串口的操作。 3、Mscomm控件的属性 (1)CommPort属性 该属性用于设置或返回连接的串口编号,Windows将会利用该串口和外界通信。CommPort属性值用1、2……表示串口COM1、COM2...,其取值范围为1~6,缺省值为1。MSComm控件支持的最大串口号是16,系统会通知出错,并返回前一次设定的值。 (2) Settings属性 该属性用于设置或返回通信参数,属性值用字符串表示,主要设定波特率、奇偶检验、数据位数,停止位等4个参数。组成格式为: “BBBB,P,D,S” 其中BBBB为波特率,P为奇偶校验,D为数据位数,S为停止位数。默认值为“19200,N,8,1”,表示传输速率19200bit/s,无奇偶校验位,8位数据位,1位停止位。 波特率的合法值可以是110、300、600、1200、2400、4800、9600(默认)、14400、19200、28800、38400、56000、57600、115200、128000、256000。 奇偶校验的值可以设置为如下表所示的值之一。 奇偶校验设定值 数据位的值可以是4、5、6、7、8(默认值)。 停止位的值可以是1(默认值)、1.5、2。 只有当通信的双方的Settings属性值都一样,通信连接才有效。 (3) Handshaking属性 该属性用于设置或返回硬件握手协议,即PC机与通信设备(如Modem)之间为了控制流速而约定的内部协议,属性值可以设置为如下表中的值。

MSComm控件使用详解

MSComm控件使用详解 2008-04-06 19:15:39| 分类:Windows编程|举报|字号订阅 MSComm控件使用详解 MSComm控件的常用属性 1.MSComm1.Settings:=’9600,n,8,1’; //设置波特率,校验位,数据位,停止位 Settings属性: 设置串口的波特率,校验位,数据位,停止位, ’9600,n,8,1’表示波特率为9600,无奇偶校验,数据位为8为,1位停止位 MSComm1.InBufferSize:=1024; // 接受缓冲区大小 InBufferSize 属性:接收缓冲区的大小,默认值为1024,也可以自己设定,比如, MSComm1.InBufferSize:=2000,则接收缓冲区的大小为2000字节 MSComm1.OutBufferSize:=1024; // 发送缓冲区大小 OutBufferSize属性:发送缓冲区的大小,默认值为1024,也可以自己设定,比如, MSComm1.OutBufferSize:=2000,则发送缓冲区的大小为2000字节 MSComm1.InBufferCount:=0; //清空接受缓冲区 InBufferCount属性:当前接收缓冲区接收到的数据的长度, count:=MSComm1.InBufferCount, 则count值就是接收缓冲区接收到的数据的长度,对InBufferCount 赋值MSComm1.InBufferCount:=0,可以清空接受缓冲区 MSComm1.OutBufferCount:=0; //清空发送缓冲区 OutBufferCount属性:当前发送缓冲区中数据的长度,对OutBufferCount 赋值MSComm1. OutBufferCount:=0,可以清空发送缓冲区 MSComm1.InputMode:=comInputModeText;// 以文本方式取回数据 MSComm1.InputMode:=comInputModeBinary; //设置接收数据模式为二进制形式 InputMode属性:串口接收数据的模式, comInputModeText(0)表示以文本(ASCII)方式取回数据, comInputModeBinary(1)表示以二进制方式取回数据 comInputModeText, comInputModeBinary为预定义常量,分别表示0,1 RcvByte:=MSComm1.Input Input属性:通过Input属性可以读取串口中接收到的数据,RcvByte:=MSComm1.Input表示读取串口接收到的数据,其中RcvByte的数据类型为: array of Byte 或array of Variant.在读取之前先设置RcvByte的长度:SetLength(RcvByte,len),如果一次读取所有数据,则SetLength(RcvByte, MSComm1.InBufferCount) MSComm1.Output:= OutputDat Output属性:通过Output属性可以发送数据, MSComm1.Output:=OutputDat,则将OutputDat中

VC的MSCOMM控件

MFC之MSCOMM 2010年11月19日星期五 在mfc中进行串口通讯最简单的方法莫过于在对话框中使用MSCOMM控件了,MSComm通信控件提供了一系列标准通信命令的接口,它允许建立串口连接,可以连接到其他通信设备(如Modem).还可以发送命令、进行数据交换以及监视和响应在通信过程中可能发生的各种错误和事件,从而可以用它创建全双工、事件驱动的、高效实用的通信程序。 一、用MSComm控件通信 1.串口通信基础知识 一般悦来,计算机都有一个或多个串行端口,它们依次为com1、Com2、…,这些串口还提供了外部设备与pC进行数据传输和通信的通道。这些串口在CPU和外设之间充当解释器的角色。当字符数据从CPU发送给外设时,这些字符数据将被转换成串行比特流数据;当接收数据时,比特流数据被转换为字符数据传递给CPU,再进一步说,在操作系统方面,Windows用通信驱动程序(COMM.DRV)调用API函数发送和接收数据,当用通信控件或声明调用API函数时,它门由COMM. DRV解释并传递给设备驱动程序,作为一个程序员,要编写通信程序.只需知道通信控件提供给Windows通信AP1函数的接口即可.换句话说,只需设定和监视通信控件的属性和事件即可。 2.使用Mscomm控件 在开始使用MSComm控件之前。需要先了解其属性、事件或错误 属性描述 CommPort 设置或返回通信端口号 Settings 以字符串的形式设置或返回波特率、奇偶校验、数据位和停止位 PortOpen 设置或返回通信端口的状态。也可以打开和关闭端口 Input 返回和删除接收缓冲区中的字符 Output 将字符串写入发送缓冲区 CommEvent属性为通信事件或错误返回下列值之一。在该控件的对象库中也可以找到这些常量。 常量值描述 ComEventBreak 1001 收到了断开信号 ComEventCTSTO 1002 Clear To Send Timeout。在发送字符时,在系统指定的事1件内,CTS(Clear To end)线是低电平 ComEventDSRTO 1003 Data Set Ready Timeout。在发送字符时,在系统指定的事件内,DSR(Data Set Ready)线是低电平 ComEventFrame 1004 数据帧错误。硬件检测到一个数据帧错误 ComEventOverrun 1006 端口溢出。硬件中的字符尚未读,下一个字符又到达,并且丢失ComEventCDTO 1007 Carrier Detect Time。在发送字符时,在系统指定的事件内,CD (Carrier Detect)线是低电平。CD 也称为RLSD(Receive Line Singal Detect,接收线信号检测)ComEventRxOver 1008 接收缓冲区溢出。在接收缓冲区中没有空间 ComEventRxParity 1009 奇偶校验错。硬件检测到奇偶校验错误7 ComEventTxFull 1010 发送缓冲区满。在对发送字符排队时,发送缓冲区满ComEventDCB 1011 检取端口DCB(Device Control Blick)时发生了没有预料到的错误 通信事件包含了下面的设置: 常量值描述 ComEvSend 1 发送缓冲区中的字符数比Sthreshold值低 ComEvReceive 2 接收到了Rthreshold个字符。持续产生该事件,直到使用了Input属性删除了接收缓冲区中的数据 ComEvCTS 3 CTS(Clear To Send)线改变 ComEvDSR 4 DSR(Data Set Ready)线改变。当DSR从1到0改变时,该事件发生ComEvCD 5 CD(Carrier Detect)线改变ComEvRing6检测到响铃信号。一些URAT (Universal AsynchronousReciver--Transmitters,通用异步收发器)不支持该事件

MSComm控件实现串口通信的方法

MSComm控件实现串口通信的方法 碧峰晨曦 摘要:详细介绍了MSComm控件,并在VC++6.0中利用MSComm控件开发了基于对话框的串口通信实例。 关键词:串口通信,MSComm,VC++ 图书编号:TP311 0.引言 串口通信具有实现简单、价格低廉、通信稳定、数据传输可靠等优点,因而广泛应用于各种工业控制系统中。MSComm控件是微软公司开发的专门用于串口通信的控件。该控件为开发串口通信程序提供了更加快捷、容易的方法。在VC++中,对控件属性的操作都是通过特定的函数来实现的,这些函数都是CMSComm类的成员函数。当声明了一个CMSComm类对象后,就可以通过如下格式调用成员函数来访问控件属性了: <对象名>.<成员函数名>(<参数表>)或<对象名>-><成员函数名>(<参数表>) 1.MSComm控件属性及事件 1.1 MSComm控件属性 MSComm控件有许多属性,最主要的几个属性如下: 1)CommPort:设置该属性值可以获取当前程序使用的串口编号。 2)Setting:设置或者获取串行通信的通信参数(包括波特率、奇偶校验类型、数据位数及停止位数等)。 3)PortOpen:设置该属性可以打开或关闭串口。 4)Input:从接收缓冲区中返回并删除数据。 5)Output:向串口通信输出缓冲区写入数据。 6)CommEvent:当MSComm控件在运行时发生错误或产生各种事件时,向程序返回错误或事件类型。 1.2 MSComm控件的事件 该控件只有一个事件,即OnComm事件。当CommEvent属性值发生变化时就会触发OnComm事件。根据CommEvent属性值来分别执行各种情况下的处理程序。

MSComm控件使用详1

MSComm控件使用详解 MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm 控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在V C、VB、Delphi等语言中均可使用。 Microsoft Communications Control(以下简称MSCo mm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。 1.MSComm控件两种处理通讯的方式 MSComm控件提供下列两种处理通讯的方式:事件驱动方式和查询方式。 1.1 事件驱动方式 事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。在许多情况下,在事件发生时需要得到通知,例如,在串口接收缓冲区中有字符,或者 Carrier Detect (CD) 或 Re quest To Send (RTS) 线上一个字符到达或一个变化发生时。在这些情况下,可以利用 MSC omm 控件的 OnComm 事件捕获并处理这些通讯事件。OnComm 事件还可以检查和处理通讯错误。所有通讯事件和通讯错误的列表,参阅 CommEvent 属性。在编程过程中,就可以在OnComm事件处理函数中加入自己的处理代码。这种方法的优点是程序响应及时,可靠性高。每个MSComm 控件对应着一个串行端口。如果应用程序需要访问多个串行端口,必须使用多个 MSComm 控件。 1.2 查询方式 查询方式实质上还是事件驱动,但在有些情况下,这种方式显得更为便捷。在程序的每个关键功能之后,可以通过检查 CommEvent 属性的值来查询事件和错误。如果应用程序较小,并且是自保持的,这种方法可能是更可取的。例如,如果写一个简单的电话拨号程序,则没有必要对每接收一个字符都产生事件,因为唯一等待接收的字符是调制解调器的“确定”响应。 2.MSComm 控件的常用属性 MSComm控件有很多重要的属性,但首先必须熟悉几个属性。 CommPort 设置并返回通讯端口号。 Settings 以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位。 PortOpen 设置并返回通讯端口的状态。也可以打开和关闭端口。 Input 从接收缓冲区返回和删除字符。 Output 向传输缓冲区写一个字符串。 下面分别描述: CommPort 属性 设置并返回通讯端口号。 语法 https://www.wendangku.net/doc/526550501.html,mPort[ = value ] CommPort 属性语法包括下列部分: 部分描述 object 对象表达式,其值是“应用于”列表中的对象。

最新delphi中使用mscomm控件

delphi中使用mscomm控件 Mscomm是微软一个强大的串口通讯的控件,其强大,简单的特点今我们不舍,在delphi 中我们也可以使用它。下面这些代码是针对发送和接收为16进制处理的。 var senddata:array[1..10] of char; reData:array of Variant; sendstr:string; restr:string; i:longint; begin https://www.wendangku.net/doc/526550501.html,mPort := 1; //指定端口 mscomm1.Settings := ‘9600,N,8,1‘; //其它参数 mscomm1.InBufferSize := 1024; //接收缓冲区 mscomm1.OutBufferSize := 1024; //发送缓冲区 mscomm1.InputMode := comInputModeBinary; //接收模式 mscomm1.InputLen := 0; //一次读取所有数据 mscomm1.SThreshold := 0; //一次发送所有数据 mscomm1.InBufferCount := 0; //清空读取缓冲区 mscomm1.OutBufferCount := 0; //清空发送缓冲区 mscomm1.PortOpen:=true; //打开端口 MSComm1.RThreshold := 16; //设置接收多少字节开产生oncomm事件senddata[1]:=chr($06); //要发送的数据 senddata[2]:=chr($03); senddata[3]:=chr($00); senddata[4]:=chr($03); senddata[5]:=chr($10); sendstr:=‘‘; for i:=1 to 5 do sendstr:=sendstr + senddata[i]; mscomm1.output:=sendstr; //发送数据 i:=0; bzw:=false;

MSComm控件的用法和函数说明

MSComm控件进行串口编程步骤: 1. 在建立的程序工程中插入MSComm控件。 2. 添加MSComm控件ID 的控制变量(或者对象)。 3. 对串口进行初始化,设置MSComm控件的属性。 4. 添加串口事件的消息处理函数OnComm()函数,在函数中根据应用需要,编写数据处理代码 5. 编写串口发送等其他代码。 6. 关闭串口。 +MSComm控件 常用属性: https://www.wendangku.net/doc/526550501.html,mPort:设置并返回通信端口号 2.Settings:以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位 3.PortOpen:设置并返回通信端口的状态。也可以打开和关闭端口 4.Input:从接收缓冲区返回和删除字符 5.Output:向传输缓冲区写一个字符 6.InputLen:设置并返回Input属性从接收缓冲区读取的字符数。 7.InBufferSize:设置或返回输入缓冲区的大小。 8.OutBufferSize:设置或返回输入缓冲区的大小。 9.InBufferCount:设置或返回输入缓冲区内等待读取的字节个数。 10.OutBufferCount:设置或返回输入缓冲区内等待读取的字节个数。 对MSComm控件通过Get/Set函数对来获取或设置控件的属性,每个属性均有与之对应的Get/Set函数 对。 用法说明 https://www.wendangku.net/doc/526550501.html,mPort:设置并返回通信端口号 Void CMSComm::SetCommPort(short n); 设置串口号

Short CMSComm::GetCommPort(); 查询当前串口号 说明:n可以设置成1到16中的任何数(缺省值为1)。但是,如果用PortOpen属性打开一个并不存在的端口是,MSComm控件会产生错误68(设备无效); 必须在打开端口之前设置CommPort属性。 2.Settings:以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位 Void CMSComm::SetSettings(LPCTSTR lpszNewValue); CString CMSComm::GetSettings(); 说明:当端口打开时,如果设置值lpszNewValue非法,则MSComm控件产生错误380(非法属性值)。 Value 由四个设置值组成,有如下格式:“BBBB,P,D,S” BBBB:波特率P: 奇偶校验,D:数据位数,S:停止位数 Value的缺省值:“9600,N,8,1”。 3.PortOpen:用于打开或关闭串口,或者返回串口的开、关状态 Void CMSComm::SetPortOpen(BOOL bNewValue); BOOL CMSComm::GetPortOpen(); 说明:bNewValue值设置为TRUE,则打开串口;bNewValue值设置为FALSE,则关闭串口。编程时可以再程序中打开或关闭串口,当程序终止,MSComm控件自动关闭串口。 4.InPut:从接收缓冲区内读出数据 VARIANT CMSComm::GetInPut(); 说明:返回数据类型为VARIANT型变量,该属性在串口没有打开时不能用,在运行时是只读的。 InPutMode=0时(检取数据为文本方式),变量中含String型数据。 InPutMode=1时(检取数据位二进制方式),变量中含Byte型数据。 5.OutPut:向发送缓冲区写数据,或返回发送缓冲区当前的数据 Void CMSComm::SetOutPut(const VARIANT& newValue); VARIANT CMSComm::GetOutPort(); 说明:变量类型为VARIANT,该属性在串口未打开时不可用。OutPut可以发送文本或二进制数据,当发送文本类型数据时,将字符型数据放入VARIANT型变量中;发送二进制数据时(按字节发送),将字节型数据放入VARIANT型变量中。若数据中包含了内嵌控制字符。空字符等,必须将其作为二进制数据发送。

VB串口通讯控件MSComm详解

VB串口通讯控件MSComm详解 MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm 控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在VC、VB、Delphi等语言中均可使用。Microsoft Communications Control(以下简称MSComm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。 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属性设置并返回通讯端口号。 语法https://www.wendangku.net/doc/526550501.html,mPort[value ] (value 一整型值,说明端口号。) 说明在设计时,value 可以设置成从1 到16 的任何数(缺省值为1)。但是如果用

串口通信-MSComm控件使用详解

串口通信-MSComm控件使用详解 2012-11-13 09:35 6988人阅读评论(0) 收藏举报控件编程 Delphi编程(13) MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在VC、VB、Delphi等语言中均可使用。Microsoft Communications Control(以下简称MSComm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。 1.MSComm控件两种处理通讯的方式 1.1 事件驱动方式 事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。在许多情况下,在事件发生时需要得到通知,例如,在串口接收缓冲区中有字符,或者 Carrier Detect (CD) 或 Request To Send (RTS) 线上一个字符到达或一个变化发生时。在这些情况下,可以利用 MSComm 控件的 OnComm 事件捕获并处理这些通讯事件。OnComm 事件还可以检查和处理通讯错误。所有通讯事件和通讯错误的列表,参阅 CommEvent 属性。在编程过程中,就可以在OnComm事件处理函数中加入自己的处理代码。这种方法的优点是程序响应及时,可靠性高。每个MSComm 控件对应着一个串行端口。如果应用程序需要访问多个串行端口,必须使用多个 MSComm 控件。 1.2 查询方式 查询方式实质上还是事件驱动,但在有些情况下,这种方式显得更为便捷。在程序的每个关键功能之后,可以通过检查 CommEvent 属性的值来查询事件和错误。如果应用程序较小,并且是自保持的,这种方法可能是更可取的。例如,如果写一个简单的电话拨号程序,则没有必要对每接收一个字符都产生事件,因为唯一等待接收的字符是调制解调器的“确定”响应。 2.MSComm控件的常用属性 ngs:=’9600,n,8,1’; //设置波特率 ,校验位,数据位,停止位 Settings属性:设置串口的波特率 ,校验位,数据位,停止位, ’9600,n,8,1’表示波特率为9600,无奇偶校验,数据位为8为,1位停止位 ferSize:=1024; // 接受缓冲区大小 InBufferSize 属性:接收缓冲区的大小,默认值为1024,也可以自己设定,比如, ferSize:=2000,则接收缓冲区的大小为2000字节 fferSize:=1024; // 发送缓冲区大小 OutBufferSize属性:发送缓冲区的大小,默认值为1024,也可以自己设定。 ferCount:=0; //清空接受缓冲区 InBufferCount属性:当前接收缓冲区接收到的数据的长度,count:=ferCount, 则count值就是接收缓冲区接收到的数据的长度,对InBufferCount 赋值ferCount:=0,可以清空接 受缓冲区 fferCount:=0; //清空发送缓冲区 OutBufferCount属性:当前发送缓冲区中数据的长度,对OutBufferCount 赋值 MSComm1. OutBufferCount:=0,可以清空发送缓冲区

MSComm控件的属性

MSComm控件的属性 (必须要熟悉的几个——CommPort:设置并返回通信端口号;Setting:以字符串的形式设置并返回数据传输速率、奇偶校验、数据比特、停止比特;PortOpen:设置并返回通信端口的状态,也可以打开和关闭端口;Input:从接收缓冲区返回和删除字符;Output:向传输缓冲区定一个字符串) 1)CommPort属性 void SetCommPort(short nNewValue); short GetCommPort(); 这一属性设置并返回连接的串行端口号,Windows将会利用该串口和外界通信。在设计时,nNewValue可以设置成从1~16的任何数(默认值为1)。但是如果用PortOpen属性打开一个并不存在的端口时,MSComm控件会产生错误68(设备无效)。 注意:必须在打开端口之前设置CommPort属性。 2)Settings属性 void Settings(LPCTSTR lpszNewV alue); String GetSettings(); 该属性用于设置并返回数据传输速率、奇偶校验、数据比特、停止比特参数。当端口打开时,如果value非法,则MSComm控件产生错误380(非法属性值)。其中lpszNewValue用字符串表示,由四个设置值组成,有如下的组成格式: “BBBB,P,D,S” BBBB为数据传输速率,P为奇偶校验,D为数据比特,S为停止比特。Value的默认值是:“9600,N,8,1”,数据传输速率合法值可以是110、300、600、1200、2400、4800、9600、14400、19200、28800、38400、56000、57600、115200、12800、25600。 奇偶校验值可以是设置为下表的任一值。 设定值描述 E 偶校验(EVEN) M 标号校验(MARK) N 无校验(NONE) O 奇校验(ODD) S 空格校验(SPACE) 数据比特数可以是4、5、6、7、8。 停止比特数可以是1、1.5、2。 注意:只有当通信的双方的Settings属性值都一样时,通信连接才能生效。 3)Handshaking属性 这一属性用于设置或者返回硬件握手协议,也就是PC和通信设备之间为了控制流速而设定的内部协议。属性值可以设置为下表中的任一个。 设定值值描述 ComNone 0 默认值,无握手协议 comXOnXOff 1 XON/XOFF握手 ComRTS 2 RTS/CTS握手 comRtsXOnXOff 3 RTS/CTS和XON/XOFF握手皆可 4)RThreshold属性 void SetRThreshold(short nNewValue); short GetRThreshold(); 在MSComm控件设置CommEvent属性为comEvReceive并产生OnComm之前,RThreshold 属性设置并返回的要接收的字符数。这里nNewValue是short型参数,说明在产生OnComm 事件之前要接收的字符数。 当接收字符后,若RThreshold属性设置为0(默认值)则不会产生OnComm事件。否则,该属

SerialPort与MSComm 详解

VB,C# MSComm控件的用法与详细介绍 MSComm 是控件 MSComm 控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。MSComm控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API 函数,而且在VC、VB、Delphi与C#等语言中均可使用。Microsoft Communications Control(以下简称MSComm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说,它提供了两种处理通信问题的方法:一是事件驱动(Event-driven)方法,一是查询法。 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 向传输缓冲区写一个字符串。 下面分别描述:

vb MSCOMM控件用法

Visual Basic5.0( 以下简称VB) 以其简单易学、32 位面向对象的程序设计等特点,倍受广大计算机开发者的青睐,已广泛地应用于各个领域;在实时监测系统中串行端口通信是一项基础功能,因此我们使用VB5 编写了实时水库水文自动监测系统的后台机软件。本文就Windows 95 环境中采用VB5 设计串行端口通信程序进行讨论并给出实例。 一般用VB 开发串行通信程序有两种方法: 一是利用Windows 的通信API 函数; 另一种是采用VB 标准控件Mscomm 来实现。 Windows 95 的通信API Windows 95 中的串口通信API 函数不同于Windows3.x 中的OpenComm、CloseComm、ReadComm、WriteComm,而是采用硬件与文件通用的函数CreateFile、ReadFile、WriteFile、CloseHandle,该类函数更具有一般性,并且可以用EscapeCommFunction 函数实现底层硬件操作,比如:SETXOFF、CLRDTR 等。 利用API 编写串口通信程序较为复杂,需要掌握大量通信知识,其优点是可实现的功能更丰富、应用面更广泛,更适合于编写较为复杂的低层次通信程序。采用这种方法编写串行端口通信程序一般可分为以下几个过程: 1. 初始化串行端口 首先用CreateFile 函数打开指定串口,置参数中访问类型为GENERIC_READ |GENERIC_WRITE、共享模式为0、创建标志为OPEN_EXISTING、模板句柄为NULL。 2. 配置串口 Windows 95 的串口配置比Windows 3.x 较为复杂,但其功能更强大,对一般程序可使用CommConfigDialog 函数以对话框方式设置波特率、数据位、奇偶校验、停止位和流控制方式,并且可以恢复缺省值。 3. 超时控制 为了防止意外情况使串口读写无休止地等待,Windows 95 提供了超时设置,这是由COMMTIMEOUTS 结构定义的,通过调用GetCcommTimeOuts 函数获得当前的设置,用SetCommTimeOuts 函数来完成设置。 4. 数据传输 读写串行端口与读写文件采用的函数相同,即ReadFile、WriteFile,读写操

相关文档