亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

蟲蟲首頁| 資源下載| 資源專輯| 精品軟件
登錄| 注冊

您現在的位置是:蟲蟲下載站 > 資源下載 > 嵌入式/單片機編程 > procedure senddata var i:integer commflg : Boolean begin commflg:=true for i:=1

procedure senddata var i:integer commflg : Boolean begin commflg:=true for i:=1

  • 資源大小:1576 K
  • 上傳時間: 2014-01-26
  • 上傳用戶:gjinli88
  • 資源積分:2 下載積分
  • 標      簽: commflg procedure senddata integer

資 源 簡 介

procedure senddata var i:integer commflg : Boolean begin commflg:=true for i:=1 to 8 do begin if not fcomm comml writecommdata(sendbutter,i) then begin Commflg=false break end end end (4) 接收數據 在編寫基于串口的計算機工業測控時,通常需要由下位機向PC機發送數據以使PC機了解系統的測試數據或下位機的運行狀態,并進而控制下位機的行為。利用Spcomm串口控件接收下位機發送的數據信息的示例代碼如下: //事件驅動方式接收數據程序 procedure TForm1.CommlReceiveData(Sender:Tobject Buffer:Pointer bufferLength:Word) var receivedata:array of byte begin sleep(100) //等待100ms,保證接收到所有數據 move(buffef ,receivedata,bufferlength) //將接收緩存區中的數據轉移到數組中 …… end (5) 關閉串口 在系統開發中,應注意在不使用串口時應及時關閉串口,釋放系統資源,否則可能會影響系統的其它應用。關閉串口的代碼如下: procedure TForm1.FormClose ( Sender TObj ect:var Action:TCIoseAction ) begin comml.StopComm end

相 關 資 源

主站蜘蛛池模板: 苗栗市| 浦县| 马尔康县| 濮阳市| 遵义市| 城步| 衡阳县| 灵石县| 资源县| 德化县| 茌平县| 文山县| 庆云县| 安康市| 新郑市| 梅河口市| 石景山区| 曲松县| 蒙自县| 四川省| 施甸县| 镇远县| 林周县| 庆阳市| 攀枝花市| 都兰县| 东安县| 扎赉特旗| 西青区| 绥芬河市| 漳州市| 深圳市| 吉木萨尔县| 西乌珠穆沁旗| 望谟县| 长乐市| 灵寿县| 陕西省| 华坪县| 台安县| 阿拉善盟|