【文章內容簡介】 troller中的ctlrecsta字段內儲存自動生成的IO配置數(shù)據(jù)。 控制器1共配有AO口5個AI 口5個DO口40個DI 口3個PI 口1個加上數(shù)據(jù)頭共有55行數(shù)據(jù)，數(shù)據(jù)長度字符（0772）從第一行開始累加到最后一行生成一個完整的數(shù)據(jù)字符。 參數(shù)數(shù)據(jù)結構每一類型參數(shù)將生產(chǎn)一個長字符數(shù)據(jù)，其數(shù)據(jù)保存在表sysparametertypes的paramdata字段內，數(shù)據(jù)頭中包含登陸號、染機代號、控制器代號以及數(shù)據(jù)長度等信息。每一個參數(shù)都包含參數(shù)類型、序號、功能編號以及最低值和最高值。最高值不應超過65535。表42 參數(shù)據(jù)結構表登陸號染機代號染程代號控制器號數(shù)據(jù)長度AB CD01 010101參數(shù)類型號序號功能編號最低值最高值D0100 0100 00FF FFF0100 0100 00FF FFL0100 0100 00FF FFP0100 0100 00FF FFT0100 0100 00FF FF圖420 sysparametertypes表 如圖，表sysparametertypes中的paramdata字段內儲存自動生成的參數(shù)數(shù)據(jù)。 通信協(xié)議循環(huán)冗余碼校驗簡稱CRC，它是利用除法及余數(shù)的原理來作錯誤偵測（Error Detecting）的。實際應用時，發(fā)送裝置計算出CRC值并隨數(shù)據(jù)一同發(fā)送給接收裝置，接收裝置對收到的數(shù)據(jù)重新計算CRC并與收到的CRC相比較，若兩個CRC值不同，則說明數(shù)據(jù)通訊出現(xiàn)錯誤[11]。由于時間有限，本系統(tǒng)規(guī)定了較為簡單的CRC校驗碼。其生成形式即CRC等于命令字節(jié)與數(shù)據(jù)字節(jié)的和，要求輸入十六進制的字符，如果輸入不滿足要求將提示錯誤，點擊CRC后自動生成對應的CRC校驗碼，在傳輸過程中如果檢驗不對，則丟棄該數(shù)據(jù)幀幀。 手動輸入生成一數(shù)據(jù)的界面如下圖所示。圖421 手動輸入數(shù)據(jù)幀界面 自動發(fā)送時將提取該長字符串，按順序將字符裝載進下層每一數(shù)據(jù)幀中，并自動生成CRC碼。實現(xiàn)過程如下圖示。 圖422 數(shù)據(jù)傳輸上下層關系圖 圖423手機藍牙轉串口接收數(shù)據(jù)第5章 系統(tǒng)調試與總結在后期對軟件各個窗口的調試中發(fā)現(xiàn)了不少的錯誤，錯誤主要集中在按鍵的順序上，比如在發(fā)送數(shù)據(jù)之前沒有對串口進行設置，在生成IO配置數(shù)據(jù)前沒有對其進行預排。在手動發(fā)送數(shù)據(jù)前沒有按CRC按鍵生成數(shù)據(jù)幀，及保存按鍵中處在的錯誤等。解決辦法是在條件滿足前使按鍵無效，通過procedure setBtn(status: Boolean)實現(xiàn)。調試完成后基本解決了用戶操作過程中可能會出現(xiàn)的錯誤。但由于時間有限還有以下方面有待改進通信協(xié)議與檢驗碼本系統(tǒng)已經(jīng)通過藍牙轉串口的方式實現(xiàn)了基本的通信功能，即筆記本與帶藍牙設備的之間的發(fā)送和接收數(shù)據(jù)。但在數(shù)據(jù)的封裝和編排上，目前還只是極其簡單的對IO口配置數(shù)據(jù)及參數(shù)進行封裝的，由于經(jīng)驗不足，還有很多需要改進的地方。特別是底層的通訊協(xié)議，如何生成較為通用的校驗碼。數(shù)據(jù)庫及界面內容完善數(shù)據(jù)庫的有序管理對本系統(tǒng)維護至關重要，特別是與染機群組與染機有關數(shù)據(jù)表的處理上，染機群組與染機的區(qū)別沒有得到很好的體現(xiàn)?，F(xiàn)只有一組染機群組有完整的設定，其他染機群組還有待完善。界面設計中控件、窗口及按鍵的命名有待完善。染機對染機群組的繼承 本系統(tǒng)只能添加新的染機群組和新的染機，即在相應的數(shù)據(jù)表中增加記錄，但染機相應的功能參數(shù)還未能從染機群組里得到繼承。遠程訪問數(shù)據(jù)庫本系統(tǒng)只能連接本地的PostgreSQL數(shù)據(jù)庫，但是企業(yè)級的數(shù)據(jù)庫管理較多采用專用的服務器，通過網(wǎng)絡的方式將系統(tǒng)連接到數(shù)據(jù)庫也是有待改進的地方。參考文獻[1] 張建新. 基于工業(yè)以太網(wǎng)的染色設備監(jiān)控系統(tǒng)[J]. 紡織學報, 2005, 26(4): 109~112[2] 王純賢, 王治森, 褚學寧, 等. 分散網(wǎng)絡化制造環(huán)境下基于移動Agent和Web的生產(chǎn)監(jiān)控研究[J]. 制造業(yè)自動化, 2002, 24(2): 36~41[3] 郝平, 陳平生. 多智能體的車間染缸集群監(jiān)控系統(tǒng)[J]. 自動化儀表, 2010, 259(4): 25~33[4] 楊永剛. 間歇式染色機中央集成控制系統(tǒng)的研究與開發(fā)[D]. 杭州: 浙江理工大學機械與自動控制學院, 2011[5] 徐智文, 延青. 用Delphi開發(fā)監(jiān)控和管理系統(tǒng)的軟件[J]. 包鋼科技, 2008, 16(1): 11~14[6] 宋運通. 基于實時數(shù)據(jù)庫的工廠智能平臺研究開發(fā)[D]. 天津: 天津大學, 2009[7] 張乾. 基于Borland Delphi開發(fā)平臺的數(shù)據(jù)庫應用系統(tǒng)開發(fā)的原理與應用研究[D]. 重慶：重慶大學, 2009[8] 邵景峰, 李永剛, 任克儉等. 紡織廠生產(chǎn)信息監(jiān)控系統(tǒng)的設計[J]. 毛紡科技, 2010, 45(3): 67~69[9] 俞利國. 基于Linux的嵌入式間歇染色機控制器研究與開發(fā)[D]. 杭州: 浙江理工大學, 2012[10] . Agentbased information flow for process industries39。 supply chain modelling[J]. Computers and Chemical Engineering,2000,24(2)[11] 王麗納, 陳皓, 趙力, 鄒采榮. 基于串口通信的無線數(shù)據(jù)傳輸[A]. 江蘇省通信學會2004年學術年會論文集[C]. 2004. 225~228[12] 楊丹紅. Delphi與數(shù)據(jù)庫連接技巧與方法的探索[J]. 上海電力學院學報, 2009, 4(3): 8~9[13] 劉春波. 染色企業(yè)染色與配色管理系統(tǒng)的研究與開發(fā)[D]. 青島: 青島大學, 2009[14] 王靜, 趙懷林, 孫玉強. Delphi環(huán)境中的串口通信程序設計方法[J]. 微機發(fā)展, 2002,130(4): 26~28[15] Li Si Hui. Realization of RS485 Serial Communication Between Microputer and Multiple Inverters Based on Delphi[J]. Advanced Materials Research,2011,1289(268)[16] P BChen, C W MYuen, C KYeung. Limits of accuracy of dyeing process control and dyeing quality[J]. Coloration Technology, 2006, 120(3): 138~143致 謝 本次畢業(yè)設計以染色工藝設置與管理系統(tǒng)為課題，這對于我來說有很大的挑戰(zhàn)，因為在開始之前沒有很好的計算機基礎，只能從零開始學習界面編程和數(shù)據(jù)庫管理。前期付出了較多的時間學習開發(fā)工具和以及理解染機集中管理系統(tǒng)，才能實現(xiàn)和完善染色工藝管理系統(tǒng)的功能。在畢業(yè)設計的過程中，我深刻的體驗到要做好這個課題不僅需要熟練掌握開發(fā)工具，熟悉染色工藝的流程，更重要的在于與導師之間的溝通，每一次的溝通都使我對課題更加深入的理解，對系統(tǒng)實現(xiàn)的功能更加明確，少走了不少彎路。沒有老師的細心講解我很難對染程工藝有系統(tǒng)的了解。更不可能完成數(shù)據(jù)庫及系統(tǒng)界面的開發(fā)。畢業(yè)設計不僅是對前面所學知識的一種檢驗，而且也是對自己能力的一種提高。通過本次畢業(yè)設計，我體驗了軟件系統(tǒng)設計的全過程，在實踐中了解了軟件設計開發(fā)的步驟、流程以及思路，增長了在軟件開發(fā)方面的見識。很好地培養(yǎng)了我們的分析問題、解決問題的能力。同時獨立工作能力、合作能力也有了很好的提高。感謝張老師，在他的指導下，我從最初的一無所知，然后慢慢熟練，一步步完成了系統(tǒng)的功能。最終在規(guī)定的時間內完成了預定的設計要求，實現(xiàn)了預期的功能。感謝在我身邊支持我的同學們，在與你們討論中總能碰撞出思想的火花。同時還要感謝所有的老師，是你們的培養(yǎng)才有今天的我，是你們寶貴的意見才能使得系統(tǒng)有更好的改進。由于時間比較倉促，本論文難免有一些不足之處，懇請各位老師和學友批評和指正！附錄軟件主要代碼：功能定義主要代碼procedure 。var I,K:integer。funcbits:string。beginfor I := 1 to 11 doBegin with do begin Close。 。 (39。SELECT funcbits FROM public_ctl_mchgrp_definitions Where ((mgid=:p1)AND(funumber=:p2)) 39。)。 (39。p139。).Value:=39。10039。 (39。p239。).Value:=I。 Open。 funcbits:=fieldbyname(39。funcbits39。).Value。 end。 with do begin Close。 。 (39。Select check From public_syssubfunctionschn WHERE ((sbffunction=:p1) AND (fncitd=:p2)) order by checkid asc39。)。 (39。p139。).Value:=I。 (39。p239。).Value:=1。 open。 K:=1。 First。 while not Eof do begin with do begin Close。 。 (39。UPDATE public_syssubfunctionschn SET check=:p1 WHERE ((sbffunction=:p2) AND (sbfnumber=:p3))39。)。 (39。p139。).Value:=strtoint(funcbits[K])。 (39。p239。).Value:=I。 (39。p339。).Value:=K。 ExecSQL。 end。 inc(K)。 Next。 end。 end。End。end。參數(shù)下載代碼implementationuses Udm,Ufrmset。{$R *.dfm}procedure (status: Boolean)。begin :=status。:=status。end。procedure (Sender: TObject)。begin。end。procedure (Sender: TObject)。varI:integer。str:array of string。str2,ptid,pid,vallo,valhi,fun,sub:string。begin str2:=39。ABCD0101010139。 。 (str2)。 setparamdata(39。D39。)。setparamdata(39。F39。)。 setparamdata(39。L39。)。setparamdata(39。P39。)。 setparamdata(39。T39。)。k:=1。 downloadparamdata()。end。procedure (Sender: TObject)。begin if not then begin (Tfrmset,frmset)。 。 end else setBtn(true)。 :=39。串口已打開39。end。procedure (Sender: TObject。 var Action: TCloseAction)。begin 。end。procedure (Sender: TObject)。begin :=false。 setBtn(false)。 :=39。COM39。 :=39。139。end。function (ptid :String):string。varI:integer。 str:string。str2,pid,vallo,valhi,fun,sub:string。begin with do begin close。 。 (39。Select * From public_ctl_machine_parm Where ((mcid=:p1) and (ptid=:p2)) order by pid asc39。)。 (39。p139。).Value:=39。139。 (39。p239。).Value:=ptid。 open。 SetLength(str, recordcount)。 (ptid+inttostr(recordcount))。 I:=1。 First。 while not Eof do begin p