在RS232中有4个脚位可用来回应讯号给电脑分別为CTS,DSR,RING,RLSD当未接上设备时,脚位的电太皆为低电压,讯号传回OFF,很多设备都利用此四个脚位与电脑沟通,所以检查脚位电压就知道改COM上是否有设备存在 MS_CTS_ON,MS_DSR_ON,MS_RING_ON,MS_RLSD_ON procedure TForm1.Button1Click(Sender: TObject); var cc:TCommConfig; hComm:THandle; Com:String; lS:dword; begin Com:=''''COM2''''; hComm:=CreateFile(Pchar(Com),Generic_read or Generic_write,0,nil,open_existing,0,0); if GetCommModemStatus(hcomm,lS) then begin if(ls and MS_CTS_ON)=MS_CTS_ON then begin Button1.Caption:=''''CTSON'''' end; end; closeHandle(hcomm); end; (作者 anykey) end. 2.检查Handle所得到的值 procedure TForm1.Button1Click(Sender: TObject); var cc:TCommConfig; hComm:THandle; Com:String; lS:dword; begin Com:=''''COM2''''; hComm:=CreateFile(Pchar(Com),Generic_read or Generic_write,0,nil,open_existing,0,0); if(hComm=invalid_Handle_value) then begin showmessage(''''通讯口错误); end; closeHandle(hcomm); end;(作者 anykey)
没有相关教程
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
