说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

怎样得到本机有效串口?

编辑:说三道四文库 发布时间:2017-11-24 08:03
HTML文档下载 WORD文档下载 PDF文档下载
1、讲讲思路也行?
2、我知道好像利用Windows外部函数可以来判断,现在我不知道这两个外部函数的具体用法?有谁能提供API函数使用说明之类的电子文档(jy_1201@eyou.com)
3、或者有无其它好的办法?
procedure TForm1.Button1Click(Sender: TObject);
var
  reg : TRegistry;
  ts : TStrings;
  i : integer;

begin
  reg := TRegistry.Create;
  reg.RootKey := HKEY_LOCAL_MACHINE;
  reg.OpenKey('hardware\devicemap\serialcomm',false);
  ts := TStringList.Create;
  reg.GetValueNames(ts);
  for i := 0 to ts.Count -1 do begin
    Memo1.Lines.Add(reg.ReadString(ts.Strings[i]));
  end;
  ts.Free;
  reg.CloseKey;
  reg.free;

end;
呵呵,给你一个:
procedure TForm1.Button1Click(Sender: TObject);
var
  reg : TRegistry;
  ts : TStrings;
  i : integer;

begin
  reg := TRegistry.Create;
  reg.RootKey := HKEY_LOCAL_MACHINE;
  reg.OpenKey('hardware\devicemap\serialcomm',false);
  ts := TStringList.Create;
  reg.GetValueNames(ts);
  for i := 0 to ts.Count -1 do begin
    Memo1.Lines.Add(reg.ReadString(ts.Strings[i]));
  end;
  ts.Free;
  reg.CloseKey;
  reg.free;

end;
求别再侵犯儿童隐私!FTC狠罚Yelp和TinyCo 华为应用市场助力开发者 软硬结合造就强大生态系统 【CTO俱乐部看板研修班北京站现场速递】看板方法:渐进变革的过程 《近匠》不背单词,用“沉浸”征服英语学习 ETpl——强复用、灵活、高性能的JavaScript模板引擎 MDCC 2014大会日程概览发布 最新嘉宾议题揭秘 终于来了,微信企业号正式开启公测! 【问底】王帅:深入PHP内核(一)——弱类型变量原理探究 谷歌Kubernetes专访:未来BigTable开发只是课后习题 首届“最具价值CTO”评选来啦!我们在找你! 【CTO俱乐部走进顺丰总部】活动图文直播进行中 中国第一个云主机评测发布:天翼云性价比第一、青云质量第一 Ruby 2.1.3发布,降低内存消耗、修复众多Bug! OpenHW2014开源硬件总决赛鏖战西安 AMD力推异构计算 《坦克世界:闪电战》:PC转手游,不止免费! 【讲师】道里云毛文波:网络虚拟化与SDN实现Docker连通 性能测试:SequoiaDB vs. MongoDB vs. Cassandra vs. HBase 华云数据推运营型PaaS Plus平台,联合Tmax走出“去IOE”的云化之路 聚焦移动新势力 MDCC 2014免费展位团队名单公布 详解Google Authenticator工作原理 云计算的乐高玩具,Docker从根本上改变应用程序开发 【先锋】eSage缔造异构虚拟化管理技术,做数据中心核心思想执行者 Uplinq2014:亲身体验Vuforia与智能眼镜设备 MDCC 2014 移动开发者大会议程全面揭晓! 顺丰模式:物流行业“互联网化”的科技之路 移动应用云服务工具APICloud宣布完美适配iPhone6 从应用分发到能力开放 华为开发者联盟沙龙上的共赢理念 SOOMLA框架:移动游戏分分钟创建个虚拟商店 Facebook:如何让应用适合所有系统、带宽以及屏幕 Docker实践者不能错过2014 Container技术大会的九大理由!(讲师议题全面揭晓) 2014全球云计算大会中国站(CC China)精彩集锦 关于网络流量.(高分相谢) php中sql请教 迷失在struts流程中的人,有人能带我出去吗? 一堆简单问题 怎样用ASP判断复选框(checkbox )被选中呢??急~~~~~~~ 我想使得对话框显示在主程序的中央怎样实现?取空格函数是什么? 服务器一重启IIS就不能工作,需要删掉IIS,再重装才行,还原备份都没用,怎么办?(高分求解) PART1:WORD文挡处理问题 对象无效是怎么回事?急,谢谢,马上结贴 有关SQL数据库远程传输及服务器配置及设置影响的问题,敬请高手积极指教!!有请大力!!! 怎样通过DBNavigator实现对DBGrid 中的记录末添加记录? 啊,注册tucows,downloads.com都要收费的?是吗 怎样把任意一个文件读到oracle的blob里,急啊!! 公务贴(八月七日) 野种子 这样可以吗?请高手帮忙。 我要做一个软件,这个软件可以进行光盘(VCD,DVD)的刻录,请问哪里有源代码下载? MSMQ服务器如何安装??? 高分提问,请高手相助! 概念问题:Lun,scsi bus number,host adapter number,scsi id 这些含义如何 如何Copy有损毁的VCD(唐伯虎点秋香)? WebLogic7 的乱码问题??? 与的问题 有人给你送礼希望你能....你会如何? 我该选哪一个?(在线等) 请问如何在word里嵌入一个工具条 我的一台服务器安装的是Win2000 Server版,而客户端安装的是Win98,当通过客户端的Win98系统去访问服务器时,就会弹出一个要求输入网络密 两个问题请教,做过大项目的请来帮忙 傻问题大家帮帮忙 简单问题!请指点(急!在线等!) 讨论:是用全局变量,还是用发送消息? 关于jsp与javascript之间的问题,紧急!!!对高手的挑战 我想写一个窗体,要使它不在任务栏上 如何用php语法进行文件的直接下载,高手请进 怎样利用CFile类来完成创建多个文件夹? 请exee、jasminelai、smart2me、patricklee01() 、greenazcf进来拿分!!! 请各位帮个忙,FileAge()、raise是什么意思?虽然是简单希望各位帮忙!! 怎样做个SPY++查不到句柄的控件? 请教表格自适应的问题 知道并了解VCL底层运作机制的朋友切磋一下好吗? VB如何调用RAR? 控制台程序中字符串的定义问题 ====高分求助!!===== 請問如何設置table使之在dba studio 看不到但是通過sql/plus可以看到 一个关于表单的简单问题<select name=..>中怎样确定选定的是第几项 ==找错!!! 两行代码,错在哪儿??== 有谁知道SQL SERVER为什么会占用600多M的内存? VB如何调用RAR? ====高分求助!!===== 哪位大侠知道可以下载电子书籍的好网站~~~(当然是关于计算机的。。。) 수페주니엘 时势造英雄(要论点和论据) “时势造英雄”是什么观点 What time do we have to be at the gate?- Immediately passagers are already bording为啥用Immediately 而不用Since呀 sorry how can i get to the history museum 有啥错 对英语单词很熟悉了解的人士有和拼音“qian”同音的英语名词吗?意思要不错的或者很相似拼音“qian”的读音的 Sorry. How can I get to the History Museum? 改得头大 Li Gang takes an a_____ part in hobby group activities."_____"上填什么(首字母填空) Every student who ( ) in the same group takes part in his birthday party.A study B studies C are studying D have studied 那位大神知道这是什么花? 有大神知道这是什么花吗? 波兰曝光美国驻华沙使馆内的窃听设备(以色列释放第二批26名巴勒斯坦囚犯美国承诺停止监听盟国泰前总理阿披实面临谋杀指控强风暴袭击欧洲多国英窃听丑闻案开庭被告否认指控纽约手机可接收紧急警报糖库失火“糖浆瀑布”堵门巴西劫匪入室抢值钱漫画俄欲借力中国加速远东开发媒体评山大校长就职政法委:法学背景官【三八红旗手 红旗手】红梅同志先进事【三八红旗手 红旗手】林媛同志先进事【三八红旗手 红旗手】熊维英同志先进韩媒:韩国面临永久被禁止核再处理和铀湖人将亨利下放至发展联盟 找回状态就不停出入自己肉体 人死亡前一秒十种神养生警惕:吃完鸡蛋就喝茶 这样吃鸡蛋中国人民抗日战争纪念馆馆长:\"两个国防部回应军队体制编制改革:正在研究全国计划生育工作电视电话会议在京召开墨总统回应毒枭古斯曼被捕:引渡程序需
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘