delphi 自动获取串口
发布时间:2020-12-15 09:46:13 所属栏目:大数据 来源:网络整理
导读:delphi 自动获取串口 ? https://blog.csdn.net/Nevermore_anger/article/details/79012875 ? ?版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/Nevermore_anger/article/details/79012875 如果PC端串口x存在且没有被占用,我们
delphi 自动获取串口
?版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/Nevermore_anger/article/details/79012875
如果PC端串口x存在且没有被占用,我们用TMScomm控件可以顺利打开并且关闭串口x,如果该端口x被占用或者不存在则会出现错误。利用这个原理,通过try强行打开串口x获取可用串口。具体代码如下: i:integer; combobox1.items.clear;for i := 1 to 32 do ?//一般PC端串口都小于32?? begin? ? try? ? ? MSComm1.CommPort := i;? ? ? if MSComm1.PortOpen = false then? ? ? begin? ? ? ? MSComm1.PortOpen := true;? ? ? end;? ? ? MSComm1.PortOpen := false;? ? ? ComboBox1.Items.Add(inttostr(i));? ? except? ? end;? end; (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |