【正文】 機(jī)發(fā)送命令幀，下位機(jī)接收?qǐng)?zhí)行命令幀。 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 23串 口 接 到 一 幀 數(shù)據(jù)格 式 是 否 正 確執(zhí) 行 相 應(yīng) 的 命 令命 令 執(zhí) 行 成 功否發(fā) 送 應(yīng) 答 表 示 接收 成 功等 待 接 收 下 一 幀命 令是是否否 圖 54 下位機(jī)發(fā)送命令∕接收回應(yīng)流程圖 通信格式的設(shè)計(jì) 通信協(xié)議中的數(shù)據(jù)格式大多是基于幀的，即將所要發(fā)送數(shù)據(jù)／命令的頭尾加入修飾性的字符，形成一個(gè)幀發(fā)送出去；接收時(shí)將所接收到的幀去掉所加入的頭尾即可取出數(shù)據(jù) 1命令。實(shí)踐中大家通常采用的數(shù)據(jù)／命令幀的格式有兩種，如表 5表 52所示。 表 51 數(shù)據(jù)∕命令幀格式 1 幀 起 始 字 符 數(shù) 據(jù) 、 命 令 校 驗(yàn) 字 幀 停 止 字 符 表 52 數(shù)據(jù)∕命令幀格式 2 幀 起 始 字 符 字 符 長(zhǎng) 度 數(shù) 據(jù) ∕ 命 令 校 驗(yàn) 字 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 24 通信程序的開發(fā) SPComm控件通過(guò)串口傳輸和接收數(shù)據(jù)，為應(yīng)用程序提供串行通信功能。該控件串行通信功能的實(shí)現(xiàn)實(shí)際上是調(diào)用了 WindOWS的 API函數(shù)，再由 Comm． dry解釋并傳送給設(shè)備驅(qū)動(dòng)程序。跟所有其它的 ActiveX控件一樣， SPComm． OCX定了一系列的屬性和接口。在 Delphi中，用戶用設(shè)置屬性值和編寫方法就可以進(jìn)行操作。 SPComm控件提供了兩種串行口消息處理的方法：一種是查詢方式，另外一種是事件驅(qū)動(dòng)方式。對(duì)于較簡(jiǎn)單的通信任務(wù)，可通過(guò)查詢串行 12的 CommEvent屬性來(lái)了解最近發(fā)生的事件或錯(cuò)誤并進(jìn)行相應(yīng)的處理。對(duì)較復(fù)雜的通信任務(wù)，就應(yīng)用事件驅(qū)動(dòng)接口，它只響應(yīng) OnComm事件對(duì)己發(fā)生的事件或錯(cuò)誤進(jìn)行處理，與 CommEvent屬性密切相關(guān)。在 Delphi中實(shí)現(xiàn)事件驅(qū)動(dòng)方法時(shí)，要控件的變量，以后針對(duì)此對(duì)象操作即可。 事件驅(qū)動(dòng)通信是處理串行端 12交互作用的一種非常有效的方法。在許多情況下，在事件發(fā)生時(shí)需要得到通知，例如，在串口接收緩沖區(qū)中有字符，或者 CD或 RTS線上一個(gè)字符到達(dá)或一個(gè)事件發(fā)生時(shí)。在這些情況下，可以利用 SPComm控件的 OnComm事件捕獲并處理這 些事件。 OnComm事件還可以檢查和處理通信錯(cuò)誤。在編程過(guò)程中，就可以在 OnComm事件處理函數(shù)中加入自己的處理代碼。這種方法的優(yōu)點(diǎn)是程序響應(yīng)及時(shí)，可靠性高。每個(gè)的設(shè)計(jì)實(shí)現(xiàn) SPComm控件對(duì)應(yīng)著一個(gè)串行端口，如果應(yīng)用程序需要訪問(wèn)多個(gè)串行端口，必須使用多個(gè) SPComm控件。在 PC機(jī)串行端口通信時(shí)，使用了十幾條線進(jìn)行信號(hào)傳輸。 利用 SPComm控件開發(fā)串口通信軟件，需要了解以下線的名稱及其作用，這些線的高低電平狀態(tài)分別對(duì)應(yīng) SPComm控件相應(yīng)屬性的 True和 False值。 上位機(jī)程序的開發(fā)設(shè)計(jì) 本系統(tǒng)流程 圖如圖 55 所示： 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 25登 錄 模 塊手 動(dòng) 輸 入 用 戶 名驗(yàn) 證 用 戶 權(quán) 限系 統(tǒng) 主 界 面外 部 執(zhí) 行 機(jī) 構(gòu) 模塊歷 史 數(shù) 據(jù) 查 詢 模塊用 戶 設(shè) 置 模 塊否是數(shù) 據(jù) 顯 示 模 塊 圖 55 系統(tǒng)流程圖 系統(tǒng)登錄模塊 軟件運(yùn)行之后，首先就是進(jìn)入用戶登錄窗體，本界面實(shí)現(xiàn)的功能是用戶輸入用戶名和密碼，根據(jù)不同的用戶登錄選擇不同的操作主界面功能，并進(jìn)入系統(tǒng)進(jìn)行相應(yīng)操作。 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 26 圖 56 用戶登錄模塊截圖 下面對(duì)重要的控件的屬性加以說(shuō)明： 表 53 TTable 控件屬性 屬性 值 Name Table1 DatabaseName Shuju TableName Denglu Active Ture 表 54 TQuery 控件屬性 控件屬性 設(shè)置值 Name Query1 DatabaseName Sjk Active False 系統(tǒng) 主界面模塊 該界面是本軟件中最重要的部分。溫室環(huán)境的監(jiān)測(cè)，環(huán)境參數(shù)的設(shè)置輸出以及溫健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 27室內(nèi)各個(gè)設(shè)備的運(yùn)行狀況都要在這里實(shí)現(xiàn)。其運(yùn)行界面如圖 57 所示。 圖 57 系統(tǒng)主界面截圖 用戶設(shè)置 模塊 用戶設(shè)定窗體主要是便于管理員和用戶隨時(shí)修改登錄密碼和增減用戶名并相應(yīng)修改管理權(quán)限的功能。但在修改之前需要輸入原先的密碼，然后才能進(jìn)行修改。新的密碼需要輸入兩次，如果兩次輸入的新密碼不一樣，則系統(tǒng)會(huì)彈出對(duì)話框提示密碼沒(méi)有修改成功。用戶可以重新輸入新密碼。用戶設(shè)置窗體只有以管理員登錄的用戶才有權(quán)利修改，否則彈出該窗體的按鈕是灰色的不能實(shí)現(xiàn)如上操作。 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 28 圖 58用戶設(shè)定模塊截圖 歷史數(shù)據(jù)查詢 模塊 歷史數(shù)據(jù)查詢頁(yè)設(shè)計(jì)功能有 :按日期時(shí)間順序?qū)v史數(shù)據(jù)的查詢、打印，對(duì)所查詢到的記錄產(chǎn)生報(bào)表并以文本格式輸出。其運(yùn)行界面如圖 59所示，報(bào)表界面如圖 510所示。 具體實(shí)現(xiàn)代碼如下： Procedure TForm4． setmaxminO； Currentmaxdata： =fieldlist． fields[i]． asfloat； Currentmindata： =fieldlist． fields[i]． asfloat； While not(eof)do begin If fieldlist． Fields[i]． asfloatcurrentmindata then begin Currentmindata： =fieldlist． fields[i]． asfloat； Currentmindate： =fieldlist． fields[O]． asdatetime If fieldlist． fields[i]． asfloatcurrentmaxdata then begin Currentmaxdata： =fieldlist． fields[i]． asfloat； Currentmaxdate： =fieldlist． fields[0]． asdatetime； 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 29 圖 9 歷史數(shù)據(jù)查詢界面 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 30 圖 10溫室環(huán)境監(jiān)測(cè)系統(tǒng)報(bào)表 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 31結(jié)論 本文通過(guò)對(duì)國(guó)內(nèi)外溫室環(huán)境控制現(xiàn)狀分析，指出了溫室環(huán)境監(jiān)測(cè)智能化是發(fā)展的必然趨勢(shì)。根據(jù)溫室內(nèi)作物生長(zhǎng)的需要，對(duì)溫室環(huán)境因子進(jìn)行實(shí)時(shí)監(jiān)測(cè)控制，主要完成了 溫、濕度及光線狀況環(huán)境監(jiān)測(cè)系統(tǒng)的上位機(jī)軟件的設(shè)計(jì) ， 本設(shè)計(jì)可實(shí)時(shí)測(cè)量某一具體空間中任意一點(diǎn)的溫度、濕度數(shù)據(jù)以及光線狀況，能在小型終端設(shè)備的 LCD上顯示，還能通過(guò)串口通信在微機(jī)上實(shí)現(xiàn)實(shí)時(shí)數(shù)據(jù)的顯示、分析和圖形打印等功能。 但由于時(shí)間和個(gè)人能力有限， 該設(shè)計(jì)難免有許多不完善之處，敬請(qǐng)更正。 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 32致謝 無(wú)論是做畢業(yè)設(shè)計(jì)還是寫論文對(duì)我來(lái)說(shuō)都是第一次，我對(duì)串口通信的了解只是一些基本知識(shí)，而缺乏真正的實(shí)踐經(jīng)驗(yàn)。能順利的完成這次畢業(yè)設(shè)計(jì)并寫出這篇論文，我要十分感謝我的指導(dǎo)老師程老師。程老師在我遇到挫折與困難時(shí)總是能給我足夠的信心與動(dòng)力和一些建設(shè)性的指導(dǎo)意見，使我終于完成了這個(gè)對(duì)我來(lái)說(shuō)蔚為艱巨的任務(wù)。程老師嚴(yán)謹(jǐn)認(rèn)真的治學(xué)態(tài)度、淵博的知識(shí)、深厚的專業(yè)功底、敏銳的洞察力、求真務(wù)實(shí)的科研精神，及謙虛熱情的待人風(fēng)格使我受益匪淺。從這次的畢 業(yè)設(shè)計(jì)中我學(xué)會(huì)了怎樣去獨(dú)立的思考和完成一項(xiàng)任務(wù)，以及怎樣去面對(duì)和了解我所未知的東西，從何下手，怎樣解決。首先，要分析這個(gè)任務(wù)的目的跟要求；然后去收集跟它有關(guān)的資料，進(jìn)行整理和消化，全面和深入的了解這些資料并整理出大概的思路，系統(tǒng)的整理出任務(wù)的流程圖和提綱；最后再按照流程圖和提綱去完成這個(gè)任務(wù)。這樣就能獨(dú)立并很好的完成一項(xiàng)任務(wù)了。我想，這次的經(jīng)歷必將給我今后的工作帶來(lái)很大的幫助和難得的經(jīng)驗(yàn)。由于時(shí)間倉(cāng)促，本設(shè)計(jì)難免有考慮不完善之處，敬請(qǐng)指正。 謝謝！ 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 33參 考 文 獻(xiàn) [1]黃興海 ．智能網(wǎng)絡(luò)犁環(huán)境溫濕度監(jiān)測(cè)系統(tǒng)系統(tǒng)集成方案．電子質(zhì)量 2021年第 3期． [2]林振強(qiáng)．基于網(wǎng)絡(luò)技術(shù)的實(shí)驗(yàn)室溫、濕度監(jiān)測(cè)系統(tǒng)．化學(xué)分析計(jì)量． 2021． 04 [3]郭慶．基于 RS485總線的環(huán)境監(jiān)控系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)．國(guó)外電子測(cè)量技術(shù)． 2021． 07 [4]劉愛(ài)榮．多通道溫．濕度循環(huán)檢測(cè)儀．河南科學(xué)． 2021— 02 [5]錢君． Delphi5 串 12通信編程 .機(jī)械工業(yè)出版社． 2021 ,P121132 [6]Ray Liscbner． Delphi技術(shù)手冊(cè)．中國(guó)電力出版社． P6688 [7]李海兵，楊曉亮 .Access 2021 數(shù)據(jù)庫(kù)管理從入門到精通 .中國(guó)青年出版社 [8]蔣培，肖江等． 1氐消耗無(wú)線溫濕度監(jiān)測(cè)系統(tǒng)設(shè)計(jì)．木材加工機(jī)械． 2021年 4期． [9]王樹曉濕度計(jì)算機(jī)監(jiān)測(cè)系統(tǒng)開發(fā)與應(yīng)用．北京紡織． 2021— 02 [10]張毅剛，新編 MCS51單片機(jī)應(yīng)用設(shè)計(jì)，哈爾濱工業(yè)大學(xué)出版社， 2021,P145155 [11]張培仁，基于 C語(yǔ)言編程 MSC51單片機(jī)原理與應(yīng)用，清華大學(xué)出版社， 2021,P134156 [12]沈紅衛(wèi)，單片機(jī)應(yīng)用系統(tǒng)設(shè)計(jì)實(shí)例與分析，北京航空航天大學(xué)出版社， 2021 [13]李長(zhǎng)林， Visual C++ 串口通信技術(shù)與典型實(shí)例，清華大學(xué)出版社， 2021,P132166 [14]周亞玲 ,蘇治中 .delphi 開發(fā)實(shí)用編程 200例 .中國(guó)鐵道出版社， 2021,P1536 [15]曹巖 .delphi 程序設(shè)計(jì)實(shí)用教程 .化學(xué)工業(yè)出版社， 2021,P2588 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 34附錄 主要程序 : (1).初始化按鈕代碼： Procedure TFoml． FormCreate(Sender： TObject)； Begin MSComm． CommPort： =1： ／／ COM 1為選擇端口 MSComm． Setting： =’9600， n， 8， 1’； ／／波特率 9600，數(shù)據(jù) 8位 ,無(wú)奇偶校驗(yàn)，停止 1位 MSComm． InBufferCount： =0； ／／清空接收緩沖區(qū) MSComm． InputLen： =O； ／／讀取整個(gè)緩沖區(qū)內(nèi)容 MSComm． InBufferSize： =4096； ／／接收緩沖區(qū) 4096個(gè)字節(jié) MSComm． RThreshold： =1000； ／／每次接收到 1000個(gè)字節(jié)即產(chǎn)生 OnComm事件 MSComm． OutBufferCount： =O： ／／清空發(fā)送緩沖區(qū) MSComm． OutBufferSize： =512； ／／發(fā)送緩沖區(qū) 512個(gè)字節(jié) MSComm． SThreshold： =l； ／／每次發(fā)送緩沖區(qū)字節(jié)數(shù)少于 1個(gè)即產(chǎn)生 OnComm事件 If not MSComm． PortOpen then ／／打開串口 MSComm． PortOpen： =True； End； (2)發(fā)送數(shù)據(jù)按鈕代碼： procedure senddata； vali： integer； eommflg： Boolean； begin 健雄職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計(jì)（論文） 35mflg： =true； for i： =l to 8 do begin if not fm ml writemdata(sendbutter， i)then begin Commflg=false； break； end； end； end； (3)接收數(shù)據(jù)按鈕代碼： procedure TForm1. Comm1ReceiveData (Sender: TObject。 Buffer:Pointer。 BufferLength:Word)。 var I,j:integer。 mRevstr:shortstring。 begin viewstring:=″″。 SetLength(CommRevStr,BufferLength)。 //設(shè)置字符串長(zhǎng)度與