《武漢理工大學c課程設計報告書》由會員分享，可在線閱讀，更多相關《武漢理工大學c課程設計報告書（28頁珍藏版）》請在裝配圖網上搜索。

1、武漢理工大學測控系統(tǒng)應用軟件實訓課程設計說明書課程設計任務書學生姓名： 李文瑤 專業(yè)班級： 測控1103班 指導教師： 胡劍 韓雪 工作單位： 機電學院測控系 題 目: 測控系統(tǒng)應用軟件實訓產品質量監(jiān)測系統(tǒng)設計 初始條件：日光燈試驗臺是用來檢測點亮日光燈的整流器或逆變器是否合格的裝置，通過多次測量燈管兩端的電壓和電流，再通過分析，來驗證整流器或逆變器工作是否正常。單個整流器或逆變器有不同功率之分，也有可以同時點亮日光燈個數(shù)多少之分。檢測一個整流器或逆變器，下位機大概會產生30組左右的電壓和電流數(shù)據。本實訓的目標是設計一個產品質量監(jiān)測系統(tǒng)，保存日光燈試驗臺下位機產生的數(shù)據信息，并時行產品合格檢查

2、、產品質量查詢、分類統(tǒng)計和報表打印操作，以期使產品的質量管理工作系統(tǒng)化、規(guī)范化、自動化，從而提高生產效率。設計功能要求：1、儀器檢測結果的輸入，包括記錄號、檢修日期、儀器編號、儀器類型、儀器功率、儀器點亮日光燈個數(shù)、檢測人員、檢測記錄。除檢測人員和檢測記錄由工作人員在計算機上直接輸入外，其他項都通過串口讀入。2、儀器檢測數(shù)據的輸入，包括記錄號、儀器編號、檢測電壓、檢測電流。一條儀器檢測結果對應多條檢測數(shù)據。3、儀器檢測數(shù)據以圖形方式顯示變化趨勢。4、儀器檢測信息的查詢、修改和刪除。5、儀器類型和功率代碼管理。6、儀器檢測信息的報表和打印處理。（選做）7、密碼和權限管理，不同權限用戶具有不同的操

3、作權力。（選做）系統(tǒng)功能模塊設計：對上述各項功能進行集中分塊，按結構化程序設計的要求，得到如圖1所示的系統(tǒng)功能模塊圖。要求完成的主要任務: （包括課程設計工作量及其技術要求，以及說明書撰寫等具體要求）1.合理進行數(shù)據庫設計，數(shù)據項和數(shù)據結構包括以下部分： 1）儀器檢測結果信息表，保存檢測結果記錄，包括：記錄號、檢測日期、儀器編號、儀器類型、儀器功率、儀器額定點亮日光燈個數(shù)、儀器溫升、檢測時間間隔、檢測人員、檢測記錄。 2）儀器檢測數(shù)據信息表，保存檢測數(shù)據記錄，包括：記錄號、儀器編號、檢測電壓、檢測電流。 3）儀器類型信息表：記錄號、儀器類型。 4）儀器功率信息表：記錄號、儀器功率。 5）記錄號

4、計數(shù)數(shù)據表，用于保存其他表格所需的記錄號，包括：記錄號名稱、記錄號計數(shù)值。 6) 用戶信息表：工號、用戶名、密碼、權限。（選用）圖1 系統(tǒng)功能模塊圖2.進行相應的功能模塊設計，包括： 1）串口通信設計；(學習) 2）數(shù)據模塊設計； 3）系統(tǒng)主窗體設計； 4）檢測數(shù)據分析設計； 5）檢測結果查詢設計； 6）報表打印設計；（選做） 7) 安全管理設計。（選做）3.設計并繪制各個模塊與函數(shù)的軟件流程圖，流程圖要模塊化并具有可讀性(根據流程圖知道程序功能實現(xiàn)過程)；編制模塊化源程序； 4.編寫并調試完整的程序代碼 （所有自定義的單元文件名、控件名、函數(shù)名、變量名不能與示例程序同名）； 5. 按學校課程

5、設計說明書撰寫規(guī)范提交一份課程設計說明書（6000字左右），設計說明書應詳細說明設計思路、工作流程和軟件設計與實現(xiàn)界面。時間安排： 序 號 內 容所 用 時 間1布置課程設計任務，查閱資料，總體方案設計1天2設計軟件流程圖1天3數(shù)據庫設計1天4軟件編寫4天5撰寫設計說明書2天6答辯1天 合 計10天指導教師簽名： 年 月 日系主任（或責任教師）簽名： 年 月 日目錄1. 緒論 42. 整體模塊設計 4 3. 代碼管理模塊 53.1類型代碼管理 53.2功率代碼管理 54. 檢測模塊 65. 4.1開始檢測 64.2停止檢測 85.查詢模塊 95.1結果查詢 9 5.2工位查詢 196.數(shù)據表瀏

6、覽模塊 207.數(shù)據修改模塊 228.打印報表模塊 249.幫助模塊 2510.總結與體會 2711.參考文獻 281.緒論 自工業(yè)革命以來，人類已經越來越意識到機器性工作的可代替性是多么的重要。也正是由于這一點，自動化制造業(yè)得到了飛速的發(fā)展，到如今已經達到一個非常成熟的形態(tài)。而作為當代一名當代的中國大學生，尤其是像我們這樣的與制造業(yè)有關的工科專業(yè)學生，在這樣的時代大潮中自然不能落于人后。在自身專業(yè)知識學習過程中要全力以赴，抓住任何機會充實自己。而恰好學校安排了測控系統(tǒng)軟件設計這一課程讓我們學習和鍛煉，更要珍惜這樣的機會。主題是制作一個質量檢測軟件，利用日光燈試驗臺來檢測點亮日光燈的整流器或逆

7、變器是否合格，并且通過多次測量燈管兩端的電壓和電流，再通過分析，來驗證整流器或逆變器工作是否正常。單個整流器或逆變器有不同功率之分，也有可以同時點亮日光燈個數(shù)多少之分。檢測一個整流器或逆變器，下位機大概會產生30組左右的電壓和電流數(shù)據。總結之，本實訓的目標是設計一個產品質量監(jiān)測系統(tǒng)，保存日光燈試驗臺下位機產生的數(shù)據信息，并時行產品合格檢查、產品質量查詢、分類統(tǒng)計和報表打印操作，以期使產品的質量管理工作系統(tǒng)化、規(guī)范化、自動化，從而體現(xiàn)自動化制造業(yè)帶來的高效率和收益。產品質量監(jiān)測系統(tǒng)安全管理模塊 代碼管理模塊檢測模塊查詢模塊打印預覽模塊密碼與權限管理退出系統(tǒng)類型代碼功率代碼開始檢測停止檢測結果查詢

8、工位查詢數(shù)據表瀏覽模塊數(shù)據修改模塊2.整體模塊設計圖1 程序總體設計結構圖3. 代碼管理模塊3.1類型代碼管理(1）程序代碼void _fastcall TF_Main:M_TypeClick(TObject *Sender) /類型代碼編輯 F_Assist-ADOT_Count-First();/設定記錄號計數(shù)數(shù)據表當前活動記錄是第一條記錄 F_Assist-ADOT_Count-MoveBy(2);/下移兩條記錄至計數(shù)表中的儀器類型 F_Assist-DBLookupListBox1-ListField=;/先賦空值以免系統(tǒng)拋出異常 F_Assist-DBLookupListBox1-K

9、eyField=;/先賦空值以免系統(tǒng)拋出異常 F_Assist-DBLookupListBox1-ListSource=DataModule1-DS_Type;/賦儀器類型表 F_Assist-DBLookupListBox1-KeyField=Type_ID;/賦類型記錄號字段 F_Assist-DBLookupListBox1-ListField=Type_Name;/賦類型名稱字段 F_Assist-Label2-Caption=儀器類型代碼表; F_Assist-ShowModal(); /打開輔助資料窗體 (2）運行結果圖2 儀器類型代碼界面3.2功率代碼管理(1）程序代碼void

10、_fastcall Ttcw:M_PowerClick(TObject *Sender) x=2; F_Assist-ADOT_Count-TableName=Industry_Power;/功率代碼編輯 F_Assist-ADOT_Count-Open(); F_Assist-ADOT_Count-Edit(); DataModule1-AT_Power-Open(); DataModule1-AT_Power-Edit(); F_Assist-ADOT_Count-First();/設定記錄號計數(shù)數(shù)據表當前活動記錄是第一條記錄 F_Assist-ADOT_Count-MoveBy(2);/

11、下移兩條記錄至計數(shù)表中的儀器功率 F_Assist-DBLookupListBox1-ListField=;/先賦空值以免系統(tǒng)拋出異常 F_Assist-DBLookupListBox1-KeyField=;/先賦空值以免系統(tǒng)拋出異常 F_Assist-DBLookupListBox1-ListSource=DataModule1-DS_Power;/賦儀器功率代碼表 F_Assist-DBLookupListBox1-KeyField=Power_ID;/賦功率記錄號字段 F_Assist-DBLookupListBox1-ListField=Power_Name;/賦功率名稱字段 F_As

12、sist-Label2-Caption=儀器功率代碼表; F_Assist-Show(); /打開輔助資料窗體(2）運行結果圖3 儀器功率代碼界面4.檢測模塊4.1開始檢測(1）流程圖圖4 流程圖(2）程序代碼void _fastcall Ttcw:M_StartClick(TObject *Sender) /打開串口，開啟JudgeTimer定時器定時測控串口 MainMenu-Items-Items2-Enabled=false;/使開始檢測菜單項非能 MainMenu-Items-Items3-Enabled=True;/停止檢測菜單項使能 if(Com1-PortOpen=True)/

13、如果串口已打開，則關閉之 Com1-PortOpen=false; Com1-PortOpen=True; /打開串口 Com1-InBufferCount=0;/消除輸入緩沖區(qū)的內容 Com1-OutBufferCount=0;/消除輸出緩沖區(qū)的內容 if(!Com1-PortOpen) /判斷串口初始化是否失敗并顯示 ShowMessage(串口初始化失敗); JudgeTimer-Enabled=true; /開啟串口監(jiān)聽定時器 RE_Mess-Lines-Add(串口初始化成功，正在監(jiān)聽);/在RichEdit控件顯示串口狀態(tài) RE_Mess-Lines-Add(用戶可以開始檢測數(shù)據)

14、;(3）運行結果圖5 開始檢測后界面4.2停止檢測(1）程序代碼void _fastcall Ttcw:M_PauseClick(TObject *Sender)/關閉串口，關閉JudgeTimer定時器定時測控串口 MainMenu-Items-Items2-Enabled=True;/開始檢測菜單項使能 MainMenu-Items-Items3-Enabled=false;/停止檢測菜單項非能 JudgeTimer-Enabled=false; /關閉串口監(jiān)聽定時器 Com1-PortOpen=false; /關閉串口 RE_Mess-Lines-Add(串口已關閉，與下位機通信中斷);

15、/在RichEdit控件顯示串口狀態(tài)（2）運行結果圖6 停止檢測后界面5.查詢模塊5.1結果查詢（1）程序代碼以及對應程序結果#include #pragma hdrstop#include Query.h#include DM.h/-#pragma package(smart_init)#pragma resource *.dfmTF_Query *F_Query;/-_fastcall TF_Query:TF_Query(TComponent* Owner) : TForm(Owner)/-void _fastcall TF_Query:CB_TimeClick(TObject *Send

16、er) /判斷時間查詢復選框是否選中，以決定各單選按鈕是否能使用 if(CB_Time-Checked) /若時間框選中，則各單選按鈕被激活 RadioButton1-Enabled= true ; / RadioButton2-Enabled= true ; / RadioButton3-Enabled= true ; / else /否則，各單選按鈕處于失效狀態(tài) RadioButton1-Enabled= false ; / RadioButton2-Enabled= false ; / RadioButton3-Enabled= false; / /-void _fastcall TF_

17、Query:CB_CodeClick(TObject *Sender)/判斷編號查詢復選框是否被選中 if(CB_Code-Checked) M_Code-Enabled=true ;/memo控件被激活 Label2-Enabled=true;/標簽控件被激活 else /memo與標簽控件失效 M_Code-Enabled=false; Label2-Enabled=false; /-圖7 時間設定查詢界面圖8時間設定查詢結果/-void _fastcall TF_Query:CB_TypeClick(TObject *Sender) /判斷類型查詢是否選中 if(CB_Type-Chec

18、ked) E_Type-Enabled=true; else E_Type-Enabled=false;圖9按類型查詢界面圖10類型查詢結果void _fastcall TF_Query:CB_PowerClick(TObject *Sender)/判斷功率查詢是否選中 if(CB_Power-Checked) E_Power-Enabled=true; else E_Power-Enabled=false;/-圖11按功率查詢界面圖12功率查詢結果void _fastcall TF_Query:CB_NumClick(TObject *Sender) /判斷管數(shù)查詢是否選中 if(CB_Nu

19、m-Checked) E_Num-Enabled=true; UpDown-Enabled=true; else E_Num-Enabled=false; UpDown-Enabled=false; 圖13 按管數(shù)查詢界面圖14 按管數(shù)查詢結果void _fastcall TF_Query:B_CancelClick(TObject *Sender) DataModule1-AQ_Record-Close();/關閉檢測記錄數(shù)據源 DataModule1-AQ_Record-SQL-Clear();/清除SQL語句 DataModule1-AQ_Record-SQL-Add(SELECT *

20、FROM Industry_Record); DataModule1-AQ_Data-Close();/關閉檢測數(shù)據數(shù)據源 DataModule1-AQ_Data-SQL-Clear();/清除SQL語句 DataModule1-AQ_Data-SQL-Add(SELECT * FROM Industry_Record,Industry_Data); DataModule1-AQ_Record-Open();/執(zhí)行SQL語句，打開檢測記錄表 DataModule1-AQ_Data-Open();/執(zhí)行SQL語句，打開檢測數(shù)據表 F_Query-Close();/關閉檢測數(shù)據查看窗口/- voi

21、d _fastcall TF_Query:B_QueryClick(TObject *Sender)/查詢按鈕單擊事件 if(!CB_Time-Checked&!CB_Type-Checked&!CB_Power-Checked &!CB_Num-Checked&!CB_Code-Checked) /若沒有查詢條件 Application-MessageBoxA(沒有查詢條件，請選擇或輸入,查詢出錯,MB_OKCANCEL); return; String str1=Industry_Record.Record_Type= + E_Type-Text + , str2=Record_Type=

22、 + E_Type-Text + , str3=Industry_Record.Record_Power= + E_Power-Text + , str4=Record_Power= + E_Power-Text + ; DataModule1-AQ_Record-Close();/關閉檢測記錄數(shù)據源 DataModule1-AQ_Record-SQL-Clear();/清除SQL語句 DataModule1-AQ_Record-SQL-Add(SELECT * FROM Industry_Record WHERE ); /增加一條SQL語句，從檢測記錄表中提取數(shù)據記錄 DataModule1

23、-AQ_Data-Close();/關閉檢測數(shù)據數(shù)據源 DataModule1-AQ_Data-SQL-Clear();/清除SQL語句 DataModule1-AQ_Data-SQL-Add(SELECT * FROM Industry_Record,Industry_Data WHERE Industry_Record.Record_SNumber=Industry_Data.Data_SNumber AND ); /增加一條SQL語句，從檢測記錄表、檢測數(shù)據表中提取數(shù)據記錄 /時間查詢 if(CB_Time-Checked) DataModule1-AQ_Record-SQL-Add(

24、Record_Date BETWEEN :timel1 AND :timel2); DataModule1-AQ_Data-SQL-Add( Record_Date BETWEEN :timer1 AND :timer2); /timel1、2,timer1、2是在SQL語句中自定義的變量 if(RadioButton1-Checked) /當天查詢 DataModule1-AQ_Record-Parameters-ParamByName(timel1)-Value= StrToDateTime(DateToStr(Now()+ 00:00:00); DataModule1-AQ_Record

25、-Parameters-ParamByName(timel2)-Value= StrToDateTime(DateToStr(Now()+ 23:59:59); DataModule1-AQ_Data-Parameters-ParamByName(timer1)-Value= StrToDateTime(DateToStr(Now()+ 00:00:00); DataModule1-AQ_Data-Parameters-ParamByName(timer2)-Value= StrToDateTime(DateToStr(Now()+ 23:59:59); if(RadioButton2-Che

26、cked) /本周查詢 TDateTime *DT=new TDateTime(); *DT=Now(); int convert=0,6,0,1,2,3,4,5;/國內外一周的起止不一樣 TDateTime Monday=DT-operator-(convertDT-DayOfWeek(); /DayofWeek()取得今天是一周內的第幾天，再進行當前星期一的日期推算 DataModule1-AQ_Record-Parameters-ParamByName(timel1)-Value= StrToDateTime(DateToStr(Monday)+ 00:00:00); DataModul

27、e1-AQ_Record-Parameters-ParamByName(timel2)-Value= StrToDateTime(DateToStr(Now()+ 23:59:59); DataModule1-AQ_Data-Parameters-ParamByName(timer1)-Value= StrToDateTime(DateToStr(Monday)+ 00:00:00); DataModule1-AQ_Data-Parameters-ParamByName(timer2)-Value= StrToDateTime(DateToStr(Now()+ 23:59:59); if(Ra

28、dioButton3-Checked) /本月查詢 unsigned short i,j,k; Now().DecodeDate(&i,&j,&k);/提取當前的年月日，分別存入變量i,j,k DataModule1-AQ_Record-Parameters-ParamByName(timel1)-Value= StrToDateTime(IntToStr(i)+-+IntToStr(j)+-01 00:00:00); DataModule1-AQ_Record-Parameters-ParamByName(timel2)-Value= StrToDateTime(DateToStr(Now(

29、)+ 23:59:59); DataModule1-AQ_Data-Parameters-ParamByName(timer1)-Value= StrToDateTime(IntToStr(i)+-+IntToStr(j)+-01 00:00:00); DataModule1-AQ_Data-Parameters-ParamByName(timer2)-Value= StrToDateTime(DateToStr(Now()+ 23:59:59); /類型查詢 if(CB_Type-Checked) if(CB_Time-Checked) /如果前面已經添加了時間查詢，則需要加AND條件同時成

30、立運算符 DataModule1-AQ_Record-SQL-Add( AND ); DataModule1-AQ_Data-SQL-Add( AND ); DataModule1-AQ_Record-SQL-Add(str1); DataModule1-AQ_Data-SQL-Add(str2); /功率查詢 if(CB_Power-Checked) if(CB_Time-Checked|CB_Type-Checked) /如果前面已經添加了時間查詢或類型查詢，則需要加AND條件同時成立運算符 DataModule1-AQ_Record-SQL-Add( AND ); DataModule1

31、-AQ_Data-SQL-Add( AND ); DataModule1-AQ_Record-SQL-Add(str3); DataModule1-AQ_Data-SQL-Add(str4); /編號查詢 if(CB_Code-Checked) if(M_Code-Text.IsEmpty() /如果無編號 Application-MessageBoxA(請輸入編號,查詢出錯,MB_OK); M_Code-SetFocus();/焦點至編號輸入框 return; if(CB_Time-Checked|CB_Type-Checked|CB_Power-Checked) /如果前面已經添加了其他查

32、詢，則需要加AND條件同時成立運算符 DataModule1-AQ_Record-SQL-Add( AND ); DataModule1-AQ_Data-SQL-Add( AND ); DataModule1-AQ_Record-SQL-Add(); DataModule1-AQ_Data-SQL-Add(); /可能包含多個編號，需用括號括起來 for(int i=0;iLines-Count;i+) if(M_Code-Lines-Stringsi.IsEmpty()continue; DataModule1-AQ_Record-SQL-Add(Format(Record_SNumber=

33、%s%s%s, ARRAYOFCONST(,M_Code-Lines-Stringsi,); /利用format函數(shù)進行參數(shù)賦值 DataModule1-AQ_Data-SQL-Add(Format(Data_SNumber=%s%s%s, ARRAYOFCONST(,M_Code-Lines-Stringsi,); /利用format函數(shù)進行參數(shù)賦值 if(i!=M_Code-Lines-Count-1) DataModule1-AQ_Record-SQL-Add( OR ); DataModule1-AQ_Data-SQL-Add( OR ); else DataModule1-AQ_Re

34、cord-SQL-Add( ); DataModule1-AQ_Data-SQL-Add( ) ); 圖15多編號查詢界面圖16 多編號查詢結果 /管數(shù)查詢 if(CB_Num-Checked) if(CB_Time-Checked|CB_Type-Checked|CB_Power-Checked|CB_Code-Checked) /如果前面已經添加了其他查詢，則需要加AND條件同時成立運算符 DataModule1-AQ_Record-SQL-Add( AND ); DataModule1-AQ_Data-SQL-Add( AND ); DataModule1-AQ_Record-SQL-A

35、dd( Record_LNumber=:lightl1); DataModule1-AQ_Record-Parameters-ParamByName(lightl1)-Value=E_Num-Text; DataModule1-AQ_Data-SQL-Add( Record_LNumber=:lightr1); DataModule1-AQ_Data-Parameters-ParamByName(lightr1)-Value=E_Num-Text; DataModule1-AQ_Record-Open();/執(zhí)行SQL語句，打開檢測記錄表 DataModule1-AQ_Data-Open();

36、/執(zhí)行SQL語句，打開檢測數(shù)據表 Close();/關閉查詢窗口 DataModule1-AQ_RecordRecord_Date-DisplayFormat=yyyy-mm-dd; /定義檢測記錄表中檢測日期顯示格式 (TDateTimeField *)(DataModule1-AQ_Data-FieldByName(Record_Date)-DisplayFormat=yyyy-mm-dd; /定義檢測數(shù)據表中檢測日期顯示格式（2） 運行結果分析：經過實際操作發(fā)現(xiàn)各個功能均正常，并且各函數(shù)對應的功能劃分比較清晰。5.2工位查詢(1）程序代碼void _fastcall TF_Main:M_

37、LabNumberClick(TObject *Sender) /對指定工位的檢測裝置進行數(shù)據獲取 F_LabNo-ShowModal();/打開工位號輸入窗口? if(F_LabNo-ModalResult=mrOk) /如果窗體操作結果是用戶確定按鈕 /通過串口發(fā)送用戶所要獲取的指定工位的請求數(shù)據 char buff4; buff0=0x02; buff1=0x70+F_LabNo-E_Num-Text.ToInt(); buff2=0x03; buff3=0x31; SendData(StrPas(buff); /在狀態(tài)欄顯示 RE_Mess-Lines-Add(F_LabNo-E_Nu

38、m-Text+號工位查詢請求已發(fā)送); （2）運行結果圖17 程序工位查詢界面圖18 工位號查詢結果6.數(shù)據表瀏覽模塊(1）程序代碼#include #pragma hdrstop#include Data.h#include DM.h#include Print.h/-#pragma package(smart_init)#pragma resource *.dfmTF_Data *F_Data;/-_fastcall TF_Data:TF_Data(TComponent* Owner) : TForm(Owner)/-void _fastcall TF_Data:FormCreate(TO

39、bject *Sender) /窗體創(chuàng)建事件 DataModule1-DS_Data-Enabled=true; /檢測數(shù)據表使能 DataModule1-DS_Record-Enabled=true;/? /檢測記錄表使能/-void _fastcall TF_Data:BB_ConfirmClick(TObject *Sender) DataModule1-AQ_Record-Post();/遞交檢測記錄表數(shù)據 ?/-void _fastcall TF_Data:BB_CancelClick(TObject *Sender) DataModule1-AQ_Record-Cancel();/

40、取消檢測記錄表數(shù)據更新?/-void _fastcall TF_Data:BB_PrintClick(TObject *Sender)F_Print-QuickRep1-Preview() ;/顯示報表預覽?void _fastcall TF_Data:BB_QuitClick(TObject *Sender) F_Data-Close();/關閉檢測數(shù)據查看窗體 ?void _fastcall TF_Data:BitBtn1Click(TObject *Sender) DataModule1-AT_Data-Post() ;/遞交檢測數(shù)據表的數(shù)據更新?void _fastcall TF_Da

41、ta:BitBtn2Click(TObject *Sender) DataModule1-AT_Data-Cancel();/取消檢測數(shù)據表的數(shù)據更新?void _fastcall TF_Data:BitBtn3Click(TObject *Sender) DataModule1-AT_Data-Append() ;/追加檢測數(shù)據表的數(shù)據?void _fastcall TF_Data:BitBtn4Click(TObject *Sender) DataModule1-AT_Data- Delete();/刪除檢測數(shù)據表中的一條記錄 (2）運行結果圖19 檢測數(shù)據查看界面7.數(shù)據修改模塊(1）程

42、序代碼void _fastcall Ttcw:BitBtn3Click(TObject *Sender)/增加檢測記錄表中的一條記錄，數(shù)據輸入完后，點”提交“增加，點”取消“則不增加 DataModule1-AQ_Record-Append();/使檢測記錄表進入追加記錄狀態(tài)void _fastcall Ttcw:BitBtn4Click(TObject *Sender)/刪除檢測記錄表中的一條記錄，需同時刪除檢測數(shù)據表中的對應的記錄 int Record_No; DataModule1-AT_Data-Open(); Record_No=DataModule1-AQ_Data-RecordC

43、ount;/取得當前檢測記錄表中的總記錄數(shù) DataModule1-AT_Data-Last();/設定當前記錄為最后一條記錄 for(int i=0; iAT_Data-Delete(); DataModule1-AQ_Record-Delete() ;/刪除檢測記錄表中的一條記錄void _fastcall Ttcw:BitBtn1Click(TObject *Sender) DataModule1-AQ_Record-Post();/提交數(shù)據void _fastcall Ttcw:BitBtn2Click(TObject *Sender) DataModule1-AQ_Record-Ca

44、ncel();/取消數(shù)據提交(2）運行結果圖20 數(shù)據的更改圖21數(shù)據的刪除8.打印報表模塊(1）程序代碼#include #pragma hdrstop#include Print.h#include DM.h/-#pragma package(smart_init)#pragma resource *.dfmTF_Print *F_Print;/-_fastcall TF_Print:TF_Print(TComponent* Owner) : TForm(Owner)/-(2）運行結果：圖22打印報表運行結果9.幫助模塊(1）程序代碼#include #pragma hdrstop#inc

45、lude help.h#include main.h/-#pragma package(smart_init)#pragma resource *.dfmTF_help *F_help;/-_fastcall TF_help:TF_help(TComponent* Owner) : TForm(Owner)/-void _fastcall TF_help:Button1Click(TObject *Sender) Label2-Caption=版本1.0 ; (2）運行結果圖23程序幫助界面1圖24程序幫助界面10.總結與體會這次測控系統(tǒng)軟件設計課程讓我花費了非常多的時間：一方面是查閱各種相關

46、的書籍資料，以此補充自己略顯單薄的理論知識；另外一方面也是最重要的部分，就是理論結合實際，動手編制軟件，這個過程尤其艱難。同時，我也體會到了將理論知識運用到實際是非常困難的，它需要考慮到多方面的因素，同時也會有對很多方面知識有一定把握的要求。所以，鑒于難度非常大，老師也降低了難度，將一部分代碼發(fā)給了我們，但是畢竟是第一次做這樣規(guī)模的軟件設計，頓時感覺到很大的挑戰(zhàn)性。盡管如此，總部能因此而放棄，所以不論怎樣也會堅持做完。在這個艱難制作的過程中認識到了自己有很多的不足，在以后的學習生活中我要努力的學習新的知識并且盡量找機會去練習，只有理論結合實踐的學習我們才能夠在以后的工作中得心應手。另外，還有一點非常重要，這次的設計任務完成過程中碰到了許多疑惑，老師們非常耐心詳細的給我做了解答，在此我非常敬佩老師的敬業(yè)態(tài)度和細心的教導！11.參考文獻1. 鄭莉 董淵 何江舟.C+語言程序設計(第四版) . 清華大學出版社,2010年2. 譚浩強.C+程序設計.北京:清華大學出版社,2004年3. 陸衛(wèi)忠 劉文亮.C+Builder6程序設計教程（第二版）.科學出版社,2009年4. 楊愛民.數(shù)據庫技術實踐教程.浙江大學出版社，2008年5. 埃克爾（作者） 劉忠田 袁兆山（譯者）.C編程思想（兩卷合訂本）機械工業(yè)出版社,2005年28