如何检测一个串口是否已经被占用？用MSCOMM控件[2人参与]

当前位置：首页

开发技术指南» 文章正文

引言：

·影片跳转场景问题 »显示摘要«

摘要：我在一个影片里想跳转到当前场景指定的帧，我就用_root.gotoandstop 但这样每次只能跳到第一个场景的那一帧。而且在影片里这样的也不行， gotoandplay("场景 1", 1); 请教高手有什么办法？ ......

·如何不让delphi产生备份文件 »显示摘要«

摘要： delphi工程文件中的所有文件只要修改后都产生后缀为.~pas等等的备份，很讨厌，如何设置，使得不产生这类垃圾 ......

如何检测一个串口是否已经被占用

如何检测一个串口是否已经被占用？
用MSCOMM控件

NO.1 作者： dyx

On Error Resume Next

MSComm1.CommPort = 1 要打开的串口
MSComm1.PortOpen = True
判断状态
If MSComm1.PortOpen = True Then
msgbox "串口1未被占用"
MSComm1.PortOpen = False
Err.Clear
ElseIf Err.Number = 8005 Then 端口已打开
msgbox "串口1已被占用"
MSComm1.PortOpen = False
Err.Clear
End If

NO.2 作者： alicky

Private Function MsCommOpen(ComInfo As typComInfo) As String
On Error GoTo OpenErr
指定使用的COM口
MSComm1.CommPort = ComInfo.Port
波特，奇偶校验，数据位，停止位(例如："9600,N,8,1")
MSComm1.Settings = ComInfo.Baud & "," & ComInfo.CurBit & "," & ComInfo.DataBit & "," & ComInfo.StopBit
握手
MSComm1.Handshaking = 0
打开端口
MSComm1.PortOpen = True
MsCommOpen = "ok"
Exit Function
OpenErr:
MsCommOpen = Err.Description
End Function

·lnk2001错误 »显示摘要«

摘要： #include <windows.h> lresult callback wndproc(hwnd,uint,wparam,lparam); // register wnd int winapi winmain(hinstance hinstance,hinstance hprevinstance, pstr lpcmdline,int icmdshow) { s......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：