武漢理工大學(xué)c課程設(shè)計(jì)報(bào)告書
《武漢理工大學(xué)c課程設(shè)計(jì)報(bào)告書》由會(huì)員分享,可在線閱讀,更多相關(guān)《武漢理工大學(xué)c課程設(shè)計(jì)報(bào)告書(28頁(yè)珍藏版)》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。
1、武漢理工大學(xué)《測(cè)控系統(tǒng)應(yīng)用軟件實(shí)訓(xùn)》課程設(shè)計(jì)說(shuō)明書 課程設(shè)計(jì)任務(wù)書 學(xué)生姓名: 李文瑤 專業(yè)班級(jí): 測(cè)控1103班 指導(dǎo)教師: 胡劍 韓雪 工作單位: 機(jī)電學(xué)院測(cè)控系 題 目: 測(cè)控系統(tǒng)應(yīng)用軟件實(shí)訓(xùn)——產(chǎn)品質(zhì)量監(jiān)測(cè)系統(tǒng)設(shè)計(jì) 初始條件: 日光燈試驗(yàn)臺(tái)是用來(lái)檢測(cè)點(diǎn)亮日光燈的整流器或逆變器是否合格的裝置,通過(guò)多次測(cè)量燈管兩端的電壓和電流,再通過(guò)分析,來(lái)驗(yàn)證整流器或逆變器工作是否正常。單個(gè)整流器或逆變器有不同功率之分,也有可以同時(shí)點(diǎn)亮日光燈個(gè)數(shù)多少之分。檢測(cè)一個(gè)
2、整流器或逆變器,下位機(jī)大概會(huì)產(chǎn)生30組左右的電壓和電流數(shù)據(jù)。 本實(shí)訓(xùn)的目標(biāo)是設(shè)計(jì)一個(gè)產(chǎn)品質(zhì)量監(jiān)測(cè)系統(tǒng),保存日光燈試驗(yàn)臺(tái)下位機(jī)產(chǎn)生的數(shù)據(jù)信息,并時(shí)行產(chǎn)品合格檢查、產(chǎn)品質(zhì)量查詢、分類統(tǒng)計(jì)和報(bào)表打印操作,以期使產(chǎn)品的質(zhì)量管理工作系統(tǒng)化、規(guī)范化、自動(dòng)化,從而提高生產(chǎn)效率。 設(shè)計(jì)功能要求: 1、儀器檢測(cè)結(jié)果的輸入,包括記錄號(hào)、檢修日期、儀器編號(hào)、儀器類型、儀器功率、儀器點(diǎn)亮日光燈個(gè)數(shù)、檢測(cè)人員、檢測(cè)記錄。除檢測(cè)人員和檢測(cè)記錄由工作人員在計(jì)算機(jī)上直接輸入外,其他項(xiàng)都通過(guò)串口讀入。 2、儀器檢測(cè)數(shù)據(jù)的輸入,包括記錄號(hào)、儀器編號(hào)、檢測(cè)電壓、檢測(cè)電流。一條儀器檢測(cè)結(jié)果對(duì)應(yīng)多條檢測(cè)數(shù)據(jù)。 3、儀器檢測(cè)數(shù)
3、據(jù)以圖形方式顯示變化趨勢(shì)。 4、儀器檢測(cè)信息的查詢、修改和刪除。 5、儀器類型和功率代碼管理。 6、儀器檢測(cè)信息的報(bào)表和打印處理。(選做) 7、密碼和權(quán)限管理,不同權(quán)限用戶具有不同的操作權(quán)力。(選做) 系統(tǒng)功能模塊設(shè)計(jì): 對(duì)上述各項(xiàng)功能進(jìn)行集中分塊,按結(jié)構(gòu)化程序設(shè)計(jì)的要求,得到如圖1所示的系統(tǒng)功能模塊圖。 要求完成的主要任務(wù): (包括課程設(shè)計(jì)工作量及其技術(shù)要求,以及說(shuō)明書撰寫等具體要求) 1.合理進(jìn)行數(shù)據(jù)庫(kù)設(shè)計(jì),數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)包括以下部分: 1)儀器檢測(cè)結(jié)果信息表,保存檢測(cè)結(jié)果記錄,包括:記錄號(hào)、檢測(cè)日期、儀器編號(hào)、儀器類型、儀器功率、儀器額定點(diǎn)亮日光燈個(gè)數(shù)、儀器溫升
4、、檢測(cè)時(shí)間間隔、檢測(cè)人員、檢測(cè)記錄。 2)儀器檢測(cè)數(shù)據(jù)信息表,保存檢測(cè)數(shù)據(jù)記錄,包括:記錄號(hào)、儀器編號(hào)、檢測(cè)電壓、檢測(cè)電流。 3)儀器類型信息表:記錄號(hào)、儀器類型。 4)儀器功率信息表:記錄號(hào)、儀器功率。 5)記錄號(hào)計(jì)數(shù)數(shù)據(jù)表,用于保存其他表格所需的記錄號(hào),包括:記錄號(hào)名稱、記錄號(hào)計(jì)數(shù)值。 6) 用戶信息表:工號(hào)、用戶名、密碼、權(quán)限。(選用) 圖1 系統(tǒng)功能模塊圖 2.進(jìn)行相應(yīng)的功能模塊設(shè)計(jì),包括: 1)串口通信設(shè)計(jì);(學(xué)習(xí)) 2)數(shù)據(jù)模塊設(shè)計(jì); 3)系統(tǒng)主窗體設(shè)計(jì); 4)檢測(cè)數(shù)據(jù)分析設(shè)計(jì); 5)檢測(cè)結(jié)果查詢?cè)O(shè)計(jì); 6)
5、報(bào)表打印設(shè)計(jì);(選做) 7) 安全管理設(shè)計(jì)。(選做) 3.設(shè)計(jì)并繪制各個(gè)模塊與函數(shù)的軟件流程圖,流程圖要模塊化并具有可讀性(根據(jù)流程圖知道程序功能實(shí)現(xiàn)過(guò)程);編制模塊化源程序; 4.編寫并調(diào)試完整的程序代碼 (所有自定義的單元文件名、控件名、函數(shù)名、變量名不能與示例程序同名); 5. 按學(xué)校課程設(shè)計(jì)說(shuō)明書撰寫規(guī)范提交一份課程設(shè)計(jì)說(shuō)明書(6000字左右),設(shè)計(jì)說(shuō)明書應(yīng)詳細(xì)說(shuō)明設(shè)計(jì)思路、工作流程和軟件設(shè)計(jì)與實(shí)現(xiàn)界面。 時(shí)間安排: 序 號(hào) 內(nèi) 容 所 用 時(shí) 間 1 布置課程設(shè)計(jì)任務(wù),查閱資料,總體方案設(shè)計(jì) 1天 2 設(shè)計(jì)軟件
6、流程圖 1天 3 數(shù)據(jù)庫(kù)設(shè)計(jì) 1天 4 軟件編寫 4天 5 撰寫設(shè)計(jì)說(shuō)明書 2天 6 答辯 1天 合 計(jì) 10天 指導(dǎo)教師簽名: 年 月 日 系主任(或責(zé)任教師)簽名: 年 月 日 目錄 1. 緒論 4 2. 整體模塊設(shè)計(jì) 4 3. 代碼管理模塊
7、 5 3.1類型代碼管理 5 3.2功率代碼管理 5 4. 檢測(cè)模塊 6 5. 4.1開始檢測(cè) 6 4.2停止檢測(cè) 8 5.
8、查詢模塊 9 5.1結(jié)果查詢 9 5.2工位查詢 19 6.數(shù)據(jù)表瀏覽模塊 20 7.數(shù)據(jù)修改模塊 22 8.打印報(bào)表模塊
9、24 9.幫助模塊 25 10.總結(jié)與體會(huì) 27 11.參考文獻(xiàn) 28 1.緒論 自工業(yè)革命以來(lái),人類已經(jīng)越來(lái)越意識(shí)到機(jī)器性工作的可代替性是多么的重要。也正是由于這一點(diǎn),自動(dòng)化制造業(yè)得到了飛速的發(fā)展,到如今已經(jīng)達(dá)到一個(gè)非常成熟的形態(tài)。而作為當(dāng)代一名當(dāng)代的中國(guó)大學(xué)生,尤其是像我們這樣的與制造業(yè)有關(guān)的工科專業(yè)學(xué)生,在這樣的時(shí)代大潮中自然不能落于人后。在
10、自身專業(yè)知識(shí)學(xué)習(xí)過(guò)程中要全力以赴,抓住任何機(jī)會(huì)充實(shí)自己。 而恰好學(xué)校安排了測(cè)控系統(tǒng)軟件設(shè)計(jì)這一課程讓我們學(xué)習(xí)和鍛煉,更要珍惜這樣的機(jī)會(huì)。主題是制作一個(gè)質(zhì)量檢測(cè)軟件,利用日光燈試驗(yàn)臺(tái)來(lái)檢測(cè)點(diǎn)亮日光燈的整流器或逆變器是否合格,并且通過(guò)多次測(cè)量燈管兩端的電壓和電流,再通過(guò)分析,來(lái)驗(yàn)證整流器或逆變器工作是否正常。單個(gè)整流器或逆變器有不同功率之分,也有可以同時(shí)點(diǎn)亮日光燈個(gè)數(shù)多少之分。檢測(cè)一個(gè)整流器或逆變器,下位機(jī)大概會(huì)產(chǎn)生30組左右的電壓和電流數(shù)據(jù)。 總結(jié)之,本實(shí)訓(xùn)的目標(biāo)是設(shè)計(jì)一個(gè)產(chǎn)品質(zhì)量監(jiān)測(cè)系統(tǒng),保存日光燈試驗(yàn)臺(tái)下位機(jī)產(chǎn)生的數(shù)據(jù)信息,并時(shí)行產(chǎn)品合格檢查、產(chǎn)品質(zhì)量查詢、分類統(tǒng)計(jì)和報(bào)表打印操作,以期使
11、產(chǎn)品的質(zhì)量管理工作系統(tǒng)化、規(guī)范化、自動(dòng)化,從而體現(xiàn)自動(dòng)化制造業(yè)帶來(lái)的高效率和收益。 產(chǎn)品質(zhì)量監(jiān)測(cè)系統(tǒng) 安全管理模塊 代碼管理模塊 檢測(cè)模塊 查詢模塊 打印預(yù)覽模塊 密碼與權(quán)限管理 退出系統(tǒng) 類型代碼 功率代碼 開始檢測(cè) 停止檢測(cè) 結(jié)果查詢 工位查詢 數(shù)據(jù)表瀏覽模塊 數(shù)據(jù)修改模塊 2.整體模塊設(shè)計(jì) 圖1 程序總體設(shè)計(jì)結(jié)構(gòu)圖 3. 代碼管理模塊 3.1類型代碼管理 (1)程序代碼 void __fastcall TF_Main::M_TypeClick(TObject *Sender) {
12、//類型代碼編輯 F_Assist->ADOT_Count->First();//設(shè)定記錄號(hào)計(jì)數(shù)數(shù)據(jù)表當(dāng)前活動(dòng)記錄是第一條記錄 F_Assist->ADOT_Count->MoveBy(2);//下移兩條記錄至計(jì)數(shù)表中的儀器類型 F_Assist->DBLookupListBox1->ListField="";//先賦空值以免系統(tǒng)拋出異常 F_Assist->DBLookupListBox1->KeyField="";//先賦空值以免系統(tǒng)拋出異常 F_Assist->DBLookupListBox1->ListSource=DataModule1->DS_Type
13、;//賦儀器類型表 F_Assist->DBLookupListBox1->KeyField="Type_ID";//賦類型記錄號(hào)字段 F_Assist->DBLookupListBox1->ListField="Type_Name";//賦類型名稱字段 F_Assist->Label2->Caption="儀器類型代碼表"; F_Assist->ShowModal(); //打開輔助資料窗體 } (2)運(yùn)行結(jié)果 圖2 儀器類型代碼界面 3.2功率代碼管理 (1)程序代碼 void __fastcall Ttcw::M_PowerClick(TO
14、bject *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è)定記錄號(hào)計(jì)數(shù)數(shù)據(jù)表當(dāng)前活動(dòng)記錄是第一條記錄 F_Assist->ADOT_Count
15、->MoveBy(2);//下移兩條記錄至計(jì)數(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";//賦功率記錄號(hào)字段 F_Assist->DB
16、LookupListBox1->ListField="Power_Name";//賦功率名稱字段 F_Assist->Label2->Caption="儀器功率代碼表"; F_Assist->Show(); //打開輔助資料窗體 } (2)運(yùn)行結(jié)果 圖3 儀器功率代碼界面 4.檢測(cè)模塊 4.1開始檢測(cè) (1)流程圖 圖4 流程圖 (2)程序代碼 void __fastcall Ttcw:M_StartClick(TObject *Sender) { //打開串口,開啟JudgeTimer定時(shí)器定時(shí)測(cè)控串口 MainMenu->Items->Ite
17、ms[2]->Enabled=false;//使開始檢測(cè)菜單項(xiàng)非能 MainMenu->Items->Items[3]->Enabled=True;//停止檢測(cè)菜單項(xiàng)使能 if(Com1->PortOpen==True)//如果串口已打開,則關(guān)閉之 Com1->PortOpen=false; Com1->PortOpen=True; //打開串口 Com1->InBufferCount=0;//消除輸入緩沖區(qū)的內(nèi)容 Com1->OutBufferCount=0;//消除輸出緩沖區(qū)的內(nèi)容 if(!Com1->PortOpen) //判斷串口初始化是否失敗并
18、顯示 ShowMessage("串口初始化失敗"); JudgeTimer->Enabled=true; //開啟串口監(jiān)聽定時(shí)器 RE_Mess->Lines->Add("串口初始化成功,正在監(jiān)聽");//在RichEdit控件顯示串口狀態(tài) RE_Mess->Lines->Add("用戶可以開始檢測(cè)數(shù)據(jù)"); } (3)運(yùn)行結(jié)果 圖5 開始檢測(cè)后界面 4.2停止檢測(cè) (1)程序代碼 void __fastcall Ttcw::M_PauseClick(TObject *Sender) { //關(guān)閉串口,關(guān)閉JudgeTimer定時(shí)器定時(shí)測(cè)控串口 Ma
19、inMenu->Items->Items[2]->Enabled=True;//開始檢測(cè)菜單項(xiàng)使能 MainMenu->Items->Items[3]->Enabled=false;//停止檢測(cè)菜單項(xiàng)非能 JudgeTimer->Enabled=false; //關(guān)閉串口監(jiān)聽定時(shí)器 Com1->PortOpen=false; //關(guān)閉串口 RE_Mess->Lines->Add("串口已關(guān)閉,與下位機(jī)通信中斷");//在RichEdit控件顯示串口狀態(tài) } (2)運(yùn)行結(jié)果 圖6 停止檢測(cè)后界面 5.查詢模塊 5.1結(jié)果查詢 (1)程序代碼以及對(duì)應(yīng)程序結(jié)果 #
20、include
21、---- __fastcall TF_Query::TF_Query(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TF_Query::CB_TimeClick(TObject *Sender) { //判斷時(shí)間查詢復(fù)選框是否選中,以決定各單選按鈕是否能使用 if(CB_Time->Checked) { //若時(shí)間框選中,則各單選按鈕被激
22、活 RadioButton1->Enabled= true ; // RadioButton2->Enabled= true ; // RadioButton3->Enabled= true ; // } else {//否則,各單選按鈕處于失效狀態(tài) RadioButton1->Enabled= false ; // RadioButton2->Enabled= false ; // RadioButton3->Enabled= false; // } } //--------------------------
23、------------------------------------------------- void __fastcall TF_Query::CB_CodeClick(TObject *Sender) {//判斷編號(hào)查詢復(fù)選框是否被選中 if(CB_Code->Checked) { M_Code->Enabled=true ;//memo控件被激活 Label2->Enabled=true;//標(biāo)簽控件被激活 } else { //memo與標(biāo)簽控件失效 M_Code->Enabled=false; Label2->Enable
24、d=false; } } //--------------------------------------------------------------------------- 圖7 時(shí)間設(shè)定查詢界面 圖8時(shí)間設(shè)定查詢結(jié)果 //--------------------------------------------------------------------------- void __fastcall TF_Query::CB_TypeClick(TObject *Sender) { //判斷類型查詢是否選中 if(CB_Type->Checked)
25、 E_Type->Enabled=true; else E_Type->Enabled=false; } 圖9按類型查詢界面 圖10類型查詢結(jié)果 void __fastcall TF_Query::CB_PowerClick(TObject *Sender) { //判斷功率查詢是否選中 if(CB_Power->Checked) E_Power->Enabled=true; else E_Power->Enabled=false; }//-----------------------------------------------
26、---------------------------- 圖11按功率查詢界面 圖12功率查詢結(jié)果 void __fastcall TF_Query::CB_NumClick(TObject *Sender) { //判斷管數(shù)查詢是否選中 if(CB_Num->Checked) { E_Num->Enabled=true; UpDown->Enabled=true; } else { E_Num->Enabled=false; UpDown->Enabled=false; }} 圖13 按管數(shù)查詢界面 圖1
27、4 按管數(shù)查詢結(jié)果 void __fastcall TF_Query::B_CancelClick(TObject *Sender) { DataModule1->AQ_Record->Close();//關(guān)閉檢測(cè)記錄數(shù)據(jù)源 DataModule1->AQ_Record->SQL->Clear();//清除SQL語(yǔ)句 DataModule1->AQ_Record->SQL->Add("SELECT * FROM Industry_Record"); DataModule1->AQ_Data->Close();//關(guān)閉檢測(cè)數(shù)據(jù)數(shù)據(jù)源 DataModule1->AQ_D
28、ata->SQL->Clear();//清除SQL語(yǔ)句 DataModule1->AQ_Data->SQL->Add("SELECT * FROM Industry_Record,Industry_Data"); DataModule1->AQ_Record->Open();//執(zhí)行SQL語(yǔ)句,打開檢測(cè)記錄表 DataModule1->AQ_Data->Open();//執(zhí)行SQL語(yǔ)句,打開檢測(cè)數(shù)據(jù)表 F_Query->Close();//關(guān)閉檢測(cè)數(shù)據(jù)查看窗口 } //---------------------------------------------------
29、------------------------ void __fastcall TF_Query::B_QueryClick(TObject *Sender) {//查詢按鈕單擊事件 if(!CB_Time->Checked&&!CB_Type->Checked&&!CB_Power->Checked &&!CB_Num->Checked&&!CB_Code->Checked) //若沒(méi)有查詢條件 { Application->MessageBoxA("沒(méi)有查詢條件,請(qǐng)選擇或輸入","查詢出錯(cuò)",MB_OKCANCEL); return; }
30、 String str1="Industry_Record.Record_Type=" + E_Type->Text + "", str2="Record_Type=" + E_Type->Text + "", str3="Industry_Record.Record_Power=" + E_Power->Text + "", str4="Record_Power=" + E_Power->Text + ""; DataModule1->AQ_Record->Close();//關(guān)閉檢測(cè)記錄數(shù)據(jù)源 DataModul
31、e1->AQ_Record->SQL->Clear();//清除SQL語(yǔ)句 DataModule1->AQ_Record->SQL->Add("SELECT * FROM Industry_Record WHERE "); //增加一條SQL語(yǔ)句,從檢測(cè)記錄表中提取數(shù)據(jù)記錄 DataModule1->AQ_Data->Close();//關(guān)閉檢測(cè)數(shù)據(jù)數(shù)據(jù)源 DataModule1->AQ_Data->SQL->Clear();//清除SQL語(yǔ)句 DataModule1->AQ_Data->SQL->Add("SELECT * FROM Industry_Record
32、,Industry_Data WHERE Industry_Record.Record_SNumber=Industry_Data.Data_SNumber AND "); //增加一條SQL語(yǔ)句,從檢測(cè)記錄表、檢測(cè)數(shù)據(jù)表中提取數(shù)據(jù)記錄 //時(shí)間查詢 if(CB_Time->Checked) { DataModule1->AQ_Record->SQL->Add(" Record_Date BETWEEN :timel1 AND :timel2"); DataModule1->AQ_Data->SQL->Add(" Record_Date BETWEEN
33、:timer1 AND :timer2"); //timel1、2,timer1、2是在SQL語(yǔ)句中自定義的變量 if(RadioButton1->Checked) //當(dāng)天查詢 { DataModule1->AQ_Record->Parameters->ParamByName("timel1")->Value= StrToDateTime(DateToStr(Now())+" 00:00:00"); DataModule1->AQ_Record->Parameters->ParamByName("timel2")->Val
34、ue= 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
35、:59"); } if(RadioButton2->Checked) //本周查詢 { TDateTime *DT=new TDateTime(); *DT=Now(); int convert[]={0,6,0,1,2,3,4,5};//國(guó)內(nèi)外一周的起止不一樣 TDateTime Monday=DT->operator-(convert[DT->DayOfWeek()]); //DayofWeek()取得今天是一周內(nèi)的第幾天,再進(jìn)行當(dāng)前星期一的日期推算 DataModule1->AQ_Record->
36、Parameters->ParamByName("timel1")->Value= StrToDateTime(DateToStr(Monday)+" 00:00:00"); DataModule1->AQ_Record->Parameters->ParamByName("timel2")->Value= StrToDateTime(DateToStr(Now())+" 23:59:59"); DataModule1->AQ_Data->Parameters->ParamByName("timer1")->Value=
37、 StrToDateTime(DateToStr(Monday)+" 00:00:00"); DataModule1->AQ_Data->Parameters->ParamByName("timer2")->Value= StrToDateTime(DateToStr(Now())+" 23:59:59"); } if(RadioButton3->Checked) //本月查詢 { unsigned short i,j,k; Now().DecodeDate(&i,&j,&k);//提取當(dāng)前的年月日,分別存入變
38、量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())+" 23:59:59"); DataModule1->AQ_Data->Pa
39、rameters->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)
40、 {//如果前面已經(jīng)添加了時(shí)間查詢,則需要加AND條件同時(shí)成立運(yùn)算符 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->Che
41、cked) {//如果前面已經(jīng)添加了時(shí)間查詢或類型查詢,則需要加AND條件同時(shí)成立運(yùn)算符 DataModule1->AQ_Record->SQL->Add(" AND "); DataModule1->AQ_Data->SQL->Add(" AND "); } DataModule1->AQ_Record->SQL->Add(str3); DataModule1->AQ_Data->SQL->Add(str4); } //編號(hào)查詢 if(CB_Code->Checked) { if(M_Code->Text.IsE
42、mpty()) { //如果無(wú)編號(hào) Application->MessageBoxA("請(qǐng)輸入編號(hào)","查詢出錯(cuò)",MB_OK); M_Code->SetFocus();//焦點(diǎn)至編號(hào)輸入框 return; } if(CB_Time->Checked||CB_Type->Checked||CB_Power->Checked) { //如果前面已經(jīng)添加了其他查詢,則需要加AND條件同時(shí)成立運(yùn)算符 DataModule1->AQ_Record->SQL->Add(" AND "); DataModule1->
43、AQ_Data->SQL->Add(" AND ");
}
DataModule1->AQ_Record->SQL->Add("(");
DataModule1->AQ_Data->SQL->Add("("); //可能包含多個(gè)編號(hào),需用括號(hào)括起來(lái)
for(int i=0;i
44、SNumber=%s%s%s", ARRAYOFCONST(("",M_Code->Lines->Strings[i],"")))); //利用format函數(shù)進(jìn)行參數(shù)賦值 DataModule1->AQ_Data->SQL->Add(Format("Data_SNumber=%s%s%s", ARRAYOFCONST(("",M_Code->Lines->Strings[i],"")))); //利用format函數(shù)進(jìn)行參數(shù)賦值 if(i!=M_Code->Lines->Count-1) {
45、 DataModule1->AQ_Record->SQL->Add(" OR "); DataModule1->AQ_Data->SQL->Add(" OR "); } else { DataModule1->AQ_Record->SQL->Add(" )"); DataModule1->AQ_Data->SQL->Add(" ) "); } } } 圖15多編號(hào)查詢界面 圖16 多編號(hào)查詢結(jié)果 //管數(shù)查詢 if(CB_Num->Checked) { if
46、(CB_Time->Checked||CB_Type->Checked||CB_Power->Checked||CB_Code->Checked) { //如果前面已經(jīng)添加了其他查詢,則需要加AND條件同時(shí)成立運(yùn)算符 DataModule1->AQ_Record->SQL->Add(" AND "); DataModule1->AQ_Data->SQL->Add(" AND "); } DataModule1->AQ_Record->SQL->Add(" Record_LNumber=:lightl1"); DataModule1->
47、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語(yǔ)句,打開檢測(cè)記錄表 DataModule1->AQ_Data->Open();/
48、/執(zhí)行SQL語(yǔ)句,打開檢測(cè)數(shù)據(jù)表 Close();//關(guān)閉查詢窗口 DataModule1->AQ_RecordRecord_Date->DisplayFormat="yyyy-mm-dd"; //定義檢測(cè)記錄表中檢測(cè)日期顯示格式 ((TDateTimeField *)(DataModule1->AQ_Data->FieldByName("Record_Date")))->DisplayFormat="yyyy-mm-dd"; //定義檢測(cè)數(shù)據(jù)表中檢測(cè)日期顯示格式 } (2) 運(yùn)行結(jié)果分析:經(jīng)過(guò)實(shí)際操作發(fā)現(xiàn)各個(gè)功能均正常,并且各函數(shù)對(duì)應(yīng)的功能劃分比較清晰。 5.2工
49、位查詢 (1)程序代碼 void __fastcall TF_Main::M_LabNumberClick(TObject *Sender) { //對(duì)指定工位的檢測(cè)裝置進(jìn)行數(shù)據(jù)獲取 F_LabNo->ShowModal();//打開工位號(hào)輸入窗口? if(F_LabNo->ModalResult==mrOk) { //如果窗體操作結(jié)果是用戶確定按鈕 //通過(guò)串口發(fā)送用戶所要獲取的指定工位的請(qǐng)求數(shù)據(jù) char buff[4]; buff[0]=0x02; buff[1]=0x70+F_LabNo->E_Num->Text.To
50、Int();
buff[2]=0x03;
buff[3]=0x31;
SendData(StrPas(buff));
//在狀態(tài)欄顯示
RE_Mess->Lines->Add(F_LabNo->E_Num->Text+"號(hào)工位查詢請(qǐng)求已發(fā)送");
}
}
(2)運(yùn)行結(jié)果
圖17 程序工位查詢界面
圖18 工位號(hào)查詢結(jié)果
6.數(shù)據(jù)表瀏覽模塊
(1)程序代碼
#include
51、e "Print.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TF_Data *F_Data; //--------------------------------------------------------------------------- __fastcall TF_Data::TF_Data(TComponent* Owner)
52、: TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TF_Data::FormCreate(TObject *Sender) { //窗體創(chuàng)建事件 DataModule1->DS_Data->Enabled=true; //檢測(cè)數(shù)據(jù)表使能 DataModule1->DS_Record->Enabled=true;//? //檢測(cè)記錄表使能 } //---------------------
53、------------------------------------------------------ void __fastcall TF_Data::BB_ConfirmClick(TObject *Sender) { DataModule1->AQ_Record->Post();//遞交檢測(cè)記錄表數(shù)據(jù) ? } //--------------------------------------------------------------------------- void __fastcall TF_Data::BB_CancelClick(TObject *
54、Sender) { DataModule1->AQ_Record->Cancel();//取消檢測(cè)記錄表數(shù)據(jù)更新? } //--------------------------------------------------------------------------- void __fastcall TF_Data::BB_PrintClick(TObject *Sender) { F_Print->QuickRep1->Preview() ;//顯示報(bào)表預(yù)覽? } void __fastcall TF_Data::BB_QuitClick(TObject
55、 *Sender) { F_Data->Close();//關(guān)閉檢測(cè)數(shù)據(jù)查看窗體 ? } void __fastcall TF_Data::BitBtn1Click(TObject *Sender) { DataModule1->AT_Data->Post() ;//遞交檢測(cè)數(shù)據(jù)表的數(shù)據(jù)更新? } void __fastcall TF_Data::BitBtn2Click(TObject *Sender) { DataModule1->AT_Data->Cancel();//取消檢測(cè)數(shù)據(jù)表的數(shù)據(jù)更新? } void __fastcall TF_Data::Bi
56、tBtn3Click(TObject *Sender) { DataModule1->AT_Data->Append() ;//追加檢測(cè)數(shù)據(jù)表的數(shù)據(jù)? } void __fastcall TF_Data::BitBtn4Click(TObject *Sender) { DataModule1->AT_Data-> Delete();//刪除檢測(cè)數(shù)據(jù)表中的一條記錄 } (2)運(yùn)行結(jié)果 圖19 檢測(cè)數(shù)據(jù)查看界面 7.數(shù)據(jù)修改模塊 (1)程序代碼 void __fastcall Ttcw::BitBtn3Click(TObject *Sender) { //增
57、加檢測(cè)記錄表中的一條記錄,數(shù)據(jù)輸入完后,點(diǎn)”提交“增加,點(diǎn)”取消“則不增加 DataModule1->AQ_Record->Append();//使檢測(cè)記錄表進(jìn)入追加記錄狀態(tài) } void __fastcall Ttcw::BitBtn4Click(TObject *Sender) { //刪除檢測(cè)記錄表中的一條記錄,需同時(shí)刪除檢測(cè)數(shù)據(jù)表中的對(duì)應(yīng)的記錄 int Record_No; DataModule1->AT_Data->Open(); Record_No=DataModule1->AQ_Data->RecordCount;//取得當(dāng)前檢測(cè)記錄表中的總記錄數(shù) Da
58、taModule1->AT_Data->Last();//設(shè)定當(dāng)前記錄為最后一條記錄
for(int i=0; i
59、}
void __fastcall Ttcw::BitBtn2Click(TObject *Sender)
{
DataModule1->AQ_Record->Cancel();
//取消數(shù)據(jù)提交
}
(2)運(yùn)行結(jié)果
圖20 數(shù)據(jù)的更改
圖21數(shù)據(jù)的刪除
8.打印報(bào)表模塊
(1)程序代碼
#include
60、------------------ #pragma package(smart_init) #pragma resource "*.dfm" TF_Print *F_Print; //--------------------------------------------------------------------------- __fastcall TF_Print::TF_Print(TComponent* Owner) : TForm(Owner) { } //------------------------------------------
61、---------------------------------
(2)運(yùn)行結(jié)果:
圖22打印報(bào)表運(yùn)行結(jié)果
9.幫助模塊
(1)程序代碼
#include
62、elp; //--------------------------------------------------------------------------- __fastcall TF_help::TF_help(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TF_help::Button1Click(TObject *Sender) {
63、 Label2->Caption="版本1.0" ; } (2)運(yùn)行結(jié)果 圖23程序幫助界面1 圖24程序幫助界面 10.總結(jié)與體會(huì) 這次測(cè)控系統(tǒng)軟件設(shè)計(jì)課程讓我花費(fèi)了非常多的時(shí)間:一方面是查閱各種相關(guān)的書籍資料,以此補(bǔ)充自己略顯單薄的理論知識(shí);另外一方面也是最重要的部分,就是理論結(jié)合實(shí)際,動(dòng)手編制軟件,這個(gè)過(guò)程尤其艱難。同時(shí),我也體會(huì)到了將理論知識(shí)運(yùn)用到實(shí)際是非常困難的,它需要考慮到多方面的因素,同時(shí)也會(huì)有對(duì)很多方面知識(shí)有一定把握的要求。所以,鑒于難度非常大,老師也降低了難度,將一部分代碼發(fā)給了我們,但是畢竟是第一次做這樣規(guī)模的軟件設(shè)計(jì),頓時(shí)感覺(jué)到很大的挑戰(zhàn)性。盡
64、管如此,總部能因此而放棄,所以不論怎樣也會(huì)堅(jiān)持做完。在這個(gè)艱難制作的過(guò)程中認(rèn)識(shí)到了自己有很多的不足,在以后的學(xué)習(xí)生活中我要努力的學(xué)習(xí)新的知識(shí)并且盡量找機(jī)會(huì)去練習(xí),只有理論結(jié)合實(shí)踐的學(xué)習(xí)我們才能夠在以后的工作中得心應(yīng)手。另外,還有一點(diǎn)非常重要,這次的設(shè)計(jì)任務(wù)完成過(guò)程中碰到了許多疑惑,老師們非常耐心詳細(xì)的給我做了解答,在此我非常敬佩老師的敬業(yè)態(tài)度和細(xì)心的教導(dǎo)! 11.參考文獻(xiàn) 1. 鄭莉 董淵 何江舟.C++語(yǔ)言程序設(shè)計(jì)(第四版) . 清華大學(xué)出版社,2010年 2. 譚浩強(qiáng).C++程序設(shè)計(jì).北京:清華大學(xué)出版社,2004年 3. 陸衛(wèi)忠 劉文亮.C++Builder6程序設(shè)計(jì)教程(第二版).科學(xué)出版社,2009年 4. 楊愛民.數(shù)據(jù)庫(kù)技術(shù)實(shí)踐教程.浙江大學(xué)出版社,2008年 5. ??藸枺ㄗ髡撸?劉忠田 袁兆山(譯者).C編程思想(兩卷合訂本)機(jī)械工業(yè)出版社,2005年 28
- 溫馨提示:
1: 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
2: 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3.本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 裝配圖網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2020高考化學(xué)熱門專題:原理綜合透題型析課件
- 現(xiàn)代中國(guó)的教育說(shuō)課稿課件
- 蒸餾和熔點(diǎn)沸點(diǎn)的測(cè)定和溫度計(jì)的校正
- 臨時(shí)起搏器的護(hù)理
- 恒成實(shí)業(yè)網(wǎng)絡(luò)推廣方案
- 勿為小惡優(yōu)秀課件-粵教版
- 人教版初中地理七年級(jí)上冊(cè)人口與人種課件7
- 誡子書課件文檔
- 軟件測(cè)試計(jì)劃書與測(cè)試用例編寫課件
- 人教版五年級(jí)數(shù)學(xué)上冊(cè)課件3小數(shù)除法第2課時(shí)除數(shù)是整數(shù)的小數(shù)除法課件
- 太白酒2002年全國(guó)推廣營(yíng)銷企劃案
- 滬教版小學(xué)語(yǔ)文三年級(jí)上冊(cè)《小狗杜克》課件1
- 我們的情感世界課件7-人教版
- 擔(dān)保產(chǎn)品案例講解及其風(fēng)險(xiǎn)控制設(shè)計(jì)(含法律相關(guān)規(guī)范)
- 【部編版】四年級(jí)語(yǔ)文上冊(cè)《2.走月亮》ppt課件