版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、<p><b> 畢業(yè)設(shè)計(jì)(論文)</b></p><p> (DELPHI)數(shù)據(jù)庫(kù)管理系統(tǒng)</p><p><b> 目 錄</b></p><p><b> 第一部分 引言</b></p><p> ------------------------
2、------------------任務(wù)或問題:</p><p> ------------------------------------------實(shí)際背景:</p><p> ------------------------------------------我的工作</p><p> ----------------------------------
3、--------特色(創(chuàng)新)</p><p> 第二部分 畢業(yè)設(shè)計(jì)課題</p><p> ------------------------------------------設(shè)計(jì)課題</p><p> ------------------------------------------設(shè)計(jì)時(shí)間</p><p> -----------
4、-------------------------------設(shè)計(jì)人員及任務(wù)</p><p> ------------------------------------------指導(dǎo)老師</p><p> ------------------------------------------設(shè)計(jì)內(nèi)容</p><p> 第三部分 系統(tǒng)方案論證</p>
5、<p> 3.1------------------------------------------軟件定義</p><p> 3.2---------------------------------------------------------體系結(jié)構(gòu)規(guī)劃</p><p> 第四部分 畢業(yè)設(shè)計(jì)內(nèi)容</p><p> 4.1---------
6、----------------------------------功能模塊分析</p><p> 4.2-------------------------------------------模塊1功能實(shí)現(xiàn)</p><p> 4.3-------------------------------------------模塊2功能實(shí)現(xiàn)</p><p> 4.4--
7、-----------------------------------------模塊3功能實(shí)現(xiàn)</p><p> 4.5-------------------------------------------模塊4功能實(shí)現(xiàn)</p><p> 4.6-------------------------------------------模塊5功能實(shí)現(xiàn)</p><p>
8、; 4.7-------------------------------------------數(shù)據(jù)庫(kù)分析</p><p> 4.8-------------------------------------------系統(tǒng)界面實(shí)現(xiàn)</p><p> 第五部分 畢業(yè)設(shè)計(jì)心得體會(huì)</p><p><b> 第六部分 附錄</b></p
9、><p> 6.1-------------------------------------------代碼部分</p><p><b> 參考文獻(xiàn)</b></p><p><b> 摘要</b></p><p> 本次畢業(yè)設(shè)計(jì)任務(wù)是通過開發(fā)一個(gè)數(shù)據(jù)庫(kù)校醫(yī)院門診收費(fèi)管理系統(tǒng),學(xué)習(xí)用delphi開
10、發(fā)分布式多層數(shù)據(jù)庫(kù)系統(tǒng)。采用Delphi7.0和MS Server2000等軟件為開發(fā)工具;通過對(duì)計(jì)算機(jī)硬件和軟件解決方案的論證;對(duì)應(yīng)用領(lǐng)域進(jìn)行調(diào)查分析;參考各種資料和進(jìn)行數(shù)據(jù)庫(kù)編程實(shí)踐。在我指導(dǎo)老師的幫助下,已經(jīng)基本上成功地實(shí)現(xiàn)了設(shè)計(jì)任務(wù)書的要求。使得設(shè)計(jì)的數(shù)據(jù)庫(kù)系統(tǒng)能夠?qū)崿F(xiàn)一般數(shù)據(jù)庫(kù)的管理。我們研究了數(shù)據(jù)庫(kù)的查詢優(yōu)化問題。</p><p><b> 第一部分 引 言</b></
11、p><p><b> 1.1任務(wù)或問題:</b></p><p> 開發(fā)一個(gè)醫(yī)院門診收費(fèi)管理系統(tǒng),可以實(shí)現(xiàn)動(dòng)態(tài)的連接應(yīng)用程序服務(wù)器,只要對(duì)配置文件進(jìn)行配置,就可以像網(wǎng)上鄰居一樣選擇所要連接的應(yīng)用程序服務(wù)器。并能實(shí)現(xiàn)門診收費(fèi),劃價(jià);藥品管理,住院管理;</p><p> 醫(yī)務(wù)人員管理及各種查詢,報(bào)表等功能。</p><p&g
12、t;<b> 1.2實(shí)際背景:</b></p><p> 隨著社會(huì)發(fā)展,人類的生產(chǎn)、生活越來越離不開信息。誰擁有了更多更有效的信息,誰就將在競(jìng)爭(zhēng)中處于有利地位。信息產(chǎn)業(yè)正在成為一個(gè)國(guó)家的支柱。數(shù)據(jù)作為信息的載體,其管理工具數(shù)據(jù)庫(kù)對(duì)于信息技術(shù)的重要性,正日益得到人們的重視。只有擁有了先進(jìn)的數(shù)據(jù)庫(kù)技術(shù),才能有效地管理好浩如煙海的數(shù)據(jù),并從中提取出對(duì)自己有用的信息來加以利用。</p>
13、;<p> 90年代,人們開發(fā)MIS系統(tǒng)大都采用客戶機(jī)/服務(wù)器結(jié)構(gòu),客戶機(jī)/服務(wù)器結(jié)構(gòu)既是硬件結(jié)構(gòu)又是軟件結(jié)構(gòu)。即數(shù)據(jù)放在服務(wù)器上,程序在客戶機(jī)上。進(jìn)行數(shù)據(jù)訪問時(shí),由客戶機(jī)提出請(qǐng)求(一般是SQL語句),服務(wù)器執(zhí)行并給出結(jié)果??蛻魴C(jī)/服務(wù)器對(duì)于優(yōu)化了網(wǎng)絡(luò),提高了系統(tǒng)的利用率??蛻魴C(jī)/服務(wù)器體系結(jié)構(gòu)的發(fā)展經(jīng)歷了從二級(jí)體系結(jié)構(gòu)模式到三級(jí)體系結(jié)構(gòu)模式。</p><p> 我校醫(yī)院目前仍然是人工手動(dòng)計(jì)算,
14、整理,查詢醫(yī)院門診,藥房,病房等各項(xiàng)工作,執(zhí)行效率非常低,不方便,給醫(yī)務(wù)人員帶來了不少麻煩;現(xiàn)在已是21世紀(jì),為了跟上時(shí)代的發(fā)展,實(shí)現(xiàn)信息網(wǎng)絡(luò)化,有我建議,石家莊職業(yè)技術(shù)學(xué)院校醫(yī)院院長(zhǎng)( ) 決定并批準(zhǔn)開發(fā)此項(xiàng)系統(tǒng).</p><p> 在校學(xué)習(xí)期間,我們電子與信息技術(shù)專業(yè)沒有開過(DELPHI 程序設(shè)計(jì)課程,SQL SERVER 數(shù)據(jù)庫(kù))等相關(guān)技術(shù)性學(xué)科,所以我是在學(xué)習(xí)階段邊學(xué)習(xí)邊開發(fā).(有難度).<
15、;/p><p><b> 1.3我的工作</b></p><p> 設(shè)計(jì)系統(tǒng)框架,設(shè)計(jì)數(shù)據(jù)庫(kù),編寫代碼,測(cè)試數(shù)據(jù)等。</p><p> 對(duì)整個(gè)軟件進(jìn)行全面分析,制作,完成等.</p><p><b> 1.4特色(創(chuàng)新)</b></p><p> 數(shù)據(jù)庫(kù)連接不需要手動(dòng)連
16、接,采用智能連接方式。</p><p> 第二部分 畢業(yè)設(shè)計(jì)課題</p><p><b> 設(shè)計(jì)課題</b></p><p> 石家莊職業(yè)技術(shù)學(xué)院校醫(yī)院門診收費(fèi)管理系統(tǒng).</p><p><b> 設(shè)計(jì)時(shí)間</b></p><p> 二○○五年5月至二○○五年5月底
17、</p><p><b> 設(shè)計(jì)人員及任務(wù)</b></p><p> 莫建坡-------整個(gè)軟件:分析,制作及完成.</p><p><b> 指導(dǎo)老師</b></p><p><b> 吳健老師</b></p><p><b>
18、設(shè)計(jì)內(nèi)容</b></p><p> 利用Delphi7.0和MS Server2000為主要開發(fā)工具,以Windows server2000為開發(fā)平臺(tái)。設(shè)計(jì)出醫(yī)院門診收費(fèi)管理系統(tǒng)??梢詫?shí)現(xiàn)數(shù)據(jù)庫(kù)連接不需要手動(dòng)連接,采用智能連接方式; 醫(yī)院門診收費(fèi)管理系統(tǒng)</p><p> 應(yīng)實(shí)現(xiàn): 門診收費(fèi),劃價(jià);藥品管理,住院管理; 醫(yī)務(wù)人員管理及各種查詢,報(bào)表等功能。</p>
19、;<p> 第三部分 系統(tǒng)方案論證</p><p><b> 3.1軟件定義 </b></p><p> 數(shù)據(jù)庫(kù)設(shè)計(jì)所要的解決的問題是:對(duì)于一個(gè)給定的應(yīng)用領(lǐng)域,設(shè)計(jì)優(yōu)化的數(shù)據(jù)庫(kù)邏輯和物理結(jié)構(gòu),使之滿足用戶的信息管理要求和數(shù)據(jù)操作要求,有效地支持各種應(yīng)用系統(tǒng)的開發(fā)和運(yùn)行。數(shù)據(jù)庫(kù)設(shè)計(jì)的目標(biāo)是為用戶和各種應(yīng)用系統(tǒng)提供一個(gè)高效的運(yùn)行環(huán)境。而數(shù)據(jù)庫(kù)的設(shè)計(jì)可
20、以視為如下的優(yōu)化問題。</p><p> 計(jì)算機(jī)的軟硬件環(huán)境;</p><p> 數(shù)據(jù)庫(kù)管理系統(tǒng)的能力;</p><p> 用戶的操作要求與信息要求;</p><p> 完整性和安全性約束。</p><p> 3.2 體系結(jié)構(gòu)規(guī)劃</p><p> 本次設(shè)計(jì)的系統(tǒng)采用″客戶/服務(wù)器″
21、體系,為了便于理解,我們先從二層″客戶/服務(wù)器″體系結(jié)構(gòu)來闡述:</p><p> 客戶/服務(wù)器是在網(wǎng)絡(luò)基礎(chǔ)上,以數(shù)據(jù)庫(kù)管理為后援,以計(jì)算機(jī)為網(wǎng)上工作站的一種系統(tǒng)結(jié)構(gòu)。該結(jié)構(gòu)的關(guān)鍵在把網(wǎng)絡(luò)環(huán)境上的數(shù)據(jù)庫(kù)存取和應(yīng)用程序一分為二,分別由網(wǎng)上的數(shù)據(jù)庫(kù)服務(wù)器和網(wǎng)上客戶來執(zhí)行。雖然本系統(tǒng)客戶/服務(wù)器是建立在LAN的基礎(chǔ)上,但它比以往的文件服務(wù)系統(tǒng)有了很大的改進(jìn)。首先,它消除了不必要的網(wǎng)絡(luò)傳輸負(fù)擔(dān);其次,它可以使作為數(shù)據(jù)庫(kù)
22、服務(wù)器的計(jì)算機(jī)被高度優(yōu)化,以適應(yīng)數(shù)據(jù)處理的需要??蛻?服務(wù)器已經(jīng)能夠應(yīng)用于復(fù)雜的網(wǎng)絡(luò)上,并使之能夠更有效地進(jìn)行選擇、檢索、索引排序等數(shù)據(jù)處理。作為一種高級(jí)的分布式計(jì)算機(jī)環(huán)境、客戶/服務(wù)器有足夠的能力把處理后的結(jié)果(不是整個(gè)文件)通過網(wǎng)絡(luò)傳輸出去,并根據(jù)用戶需求靈活地配置各種大、中、小型計(jì)算機(jī)系統(tǒng)。</p><p><b> 3.3 系統(tǒng)設(shè)計(jì)</b></p><p>
23、<b> 數(shù)據(jù)流圖</b></p><p> 管理要求 查詢要求</p><p> 管理結(jié)果 查詢結(jié)果</p><p><b> (頂層數(shù)據(jù)流圖)</b></p><p><b>
24、 數(shù)據(jù)庫(kù)設(shè)計(jì)過程</b></p><p> 數(shù)據(jù)庫(kù)的設(shè)計(jì)過程如下圖所示。在數(shù)據(jù)庫(kù)設(shè)計(jì)過程中,需求分析和概念設(shè)計(jì)可以獨(dú)立于任何數(shù)據(jù)庫(kù)管理系統(tǒng)進(jìn)行。邏輯設(shè)計(jì)和物理設(shè)計(jì)與具體的數(shù)據(jù)庫(kù)管理系統(tǒng)密切相關(guān)。由于需求分析比較重要。我們?cè)谠O(shè)計(jì)的時(shí)候,花了比較多的時(shí)間。在獲得這些資料之后,進(jìn)行分析。從中提取有用的部分。分析各種用戶的權(quán)限。</p><p><b> 需求分析說明書
25、</b></p><p><b> 概念數(shù)據(jù)庫(kù)模式</b></p><p> 獨(dú)立于數(shù)據(jù) (高級(jí)數(shù)據(jù)模型)</p><p><b> 庫(kù)管理系統(tǒng)</b></p><p><b> 與數(shù)據(jù)庫(kù)管</b></p>&
26、lt;p><b> 理系統(tǒng)相關(guān)</b></p><p><b> 邏輯數(shù)據(jù)庫(kù)模式</b></p><p><b> ?。ㄌ囟〝?shù)據(jù)模型)</b></p><p><b> 物理數(shù)據(jù)庫(kù)模式</b></p><p> ?。ㄌ囟ǖ奈锢泶鎯?chǔ)結(jié)構(gòu)和存取方式
27、)</p><p><b> 圖:數(shù)據(jù)庫(kù)設(shè)計(jì)過程</b></p><p><b> 系統(tǒng)模塊圖:</b></p><p> 第四部分 畢業(yè)設(shè)計(jì)內(nèi)容</p><p> 4.1-------------------------------------------功能模塊分析</p>
28、<p> 門診收費(fèi)管理模塊圖:</p><p><b> 藥品管理模塊圖:</b></p><p><b> 住院管理模塊圖:</b></p><p> 醫(yī)務(wù)人員管理模塊圖:</p><p> 輔助資料管理模塊圖:</p><p><b>
29、系統(tǒng)設(shè)置模塊圖:</b></p><p><b> 帳目管理模塊:</b></p><p> 4.2-------------------------------------------模塊1功能實(shí)現(xiàn)</p><p><b> 門診收費(fèi)管理:</b></p><p> 門診收費(fèi)管
30、理主要完成:病人掛號(hào),藥品收費(fèi),劃價(jià),等功能管理,并且能夠?qū)λ幏克幤愤M(jìn)行動(dòng)態(tài)的調(diào)整,</p><p><b> 所使用的數(shù)據(jù)表:</b></p><p><b> 掛號(hào)表:</b></p><p> 3掛號(hào)編號(hào)int40</p><p> 1病人姓名char200</p
31、><p> 1病人班級(jí)char301</p><p> 1掛號(hào)日期datetime80</p><p> 1掛號(hào)科室char200</p><p> 1掛號(hào)類型char200</p><p> 1掛號(hào)金額money80</p><p><b&g
32、t; 門診收費(fèi)明細(xì)表:</b></p><p> 2編號(hào)int40</p><p> 0掛號(hào)編號(hào)int40</p><p> 0收費(fèi)名稱char250</p><p> 0計(jì)量單位char100</p><p> 0數(shù)量int40</p>&
33、lt;p> 0收費(fèi)單價(jià)money80</p><p> 0收費(fèi)金額money80</p><p> 1藥品種類char101</p><p><b> 門診收費(fèi)結(jié)算表:</b></p><p> 2編號(hào)int40</p><p> 0掛號(hào)編號(hào)i
34、nt40</p><p> 0患者姓名char200</p><p> 0結(jié)算日期datetime80</p><p> 0西藥費(fèi)money81</p><p> 0中藥費(fèi)money81</p><p> 0中成藥費(fèi)money81</p><p&
35、gt; 0手術(shù)費(fèi)money81</p><p> 0輸液費(fèi)money81</p><p> 0檢查費(fèi)money81</p><p> 0治療費(fèi)money81</p><p> 0化驗(yàn)費(fèi)money81</p><p> 0拍片費(fèi)money81</p>
36、<p> 0其它費(fèi)money81</p><p> 0主治醫(yī)生char201</p><p> 1總費(fèi)用額money81</p><p><b> 掛號(hào)功能界面:</b></p><p> 門診收費(fèi),劃價(jià)管理功能界面:</p><p><b&g
37、t; 門診流程圖:</b></p><p> 4.3-------------------------------------------模塊2功能實(shí)現(xiàn)</p><p> 藥品管理主要完成:藥品的入庫(kù),出庫(kù),庫(kù)存統(tǒng)計(jì),藥品價(jià)格管理:</p><p><b> 所使用的數(shù)據(jù)表:</b></p><p>
38、<b> 藥品入庫(kù)總表:</b></p><p> 2入庫(kù)總表編號(hào)int40</p><p> 0入庫(kù)操作員char200</p><p> 0入庫(kù)日期datetime80</p><p> 1入庫(kù)備注text161</p><p><b>
39、藥品入庫(kù)明細(xì)表:</b></p><p> 2入庫(kù)明細(xì)編號(hào)int40</p><p> 0入庫(kù)總表編號(hào)int40</p><p> 0藥品名稱char300</p><p> 0藥品種類char100</p><p> 0計(jì)量單位char100</p&
40、gt;<p> 0藥品出廠日期datetime81</p><p> 0藥品過期日期datetime81</p><p> 0進(jìn)貨日期datetime81</p><p> 0進(jìn)貨公司int41</p><p> 0藥品單價(jià)money80</p><p>
41、 0藥品數(shù)量int40</p><p> 1藥品總金額money80</p><p><b> 藥品出庫(kù)表:</b></p><p> 2編號(hào)int40</p><p> 0出庫(kù)操作員char200</p><p> 0出庫(kù)日期datetime8
42、0</p><p> 0出庫(kù)藥品名char250</p><p> 0出庫(kù)藥品種類char101</p><p> 0出庫(kù)價(jià)格money80</p><p> 0出庫(kù)數(shù)量int40</p><p> 1備注text161</p><p><
43、b> 藥商表:</b></p><p> 2藥商編號(hào)int40</p><p> 1藥商公司名char300</p><p><b> 藥品庫(kù)存表:</b></p><p> 2編號(hào)int40</p><p> 0藥品名稱char251
44、</p><p> 0藥品種類char101</p><p> 0生產(chǎn)日期datetime81</p><p> 0過期日期datetime81</p><p> 0計(jì)量單位char101</p><p> 0藥品進(jìn)價(jià)money81</p><p&g
45、t; 0藥品售價(jià)money81</p><p> 0藥品數(shù)量int41</p><p> 1備注text161</p><p><b> 藥品入庫(kù)功能界面:</b></p><p><b> 藥品填寫單界面:</b></p><p><
46、b> 藥品出庫(kù)功能界面:</b></p><p><b> 藥品管理流程圖:</b></p><p> 4.4-------------------------------------------模塊3功能實(shí)現(xiàn)</p><p> 住院管理功能實(shí)現(xiàn):住院預(yù)交款,住院收費(fèi),醫(yī)藥管理,住院結(jié)算管理;</p>&
47、lt;p><b> 所用的數(shù)據(jù)表:</b></p><p><b> 預(yù)交款信息表:</b></p><p> 2編號(hào)int40</p><p> 0交款姓名char201</p><p> 0預(yù)交金額money80</p><p>
48、 0交款次數(shù)int40</p><p> 0交款日期datetime80</p><p> 1病房號(hào)int40</p><p><b> 住院收費(fèi)明細(xì)表:</b></p><p> 2編號(hào)int40</p><p> 0病房號(hào)int40</p
49、><p> 0收費(fèi)名稱char300</p><p> 0種類char100</p><p> 0數(shù)量int40</p><p> 0單價(jià)money80</p><p> 1金額money81</p><p><b> 住院收費(fèi)結(jié)算表:&
50、lt;/b></p><p> 2編號(hào)int40</p><p> 0病房號(hào)int40</p><p> 0病人姓名char200</p><p> 0收費(fèi)日期datetime80</p><p> 0主治醫(yī)生char200</p><p>
51、; 0藥費(fèi)money81</p><p> 0手術(shù)費(fèi)money81</p><p> 0病房費(fèi)money81</p><p> 0其它費(fèi)money81</p><p> 1總金額money81</p><p><b> 出院結(jié)算信息表:</b>&
52、lt;/p><p> 2編號(hào)int40</p><p> 0病房號(hào)int40</p><p> 0出院日期datetime80</p><p> 0住院總金額money80</p><p> 1找還金額money81</p><p> 預(yù)交款信息功
53、能界面:</p><p> 住院收費(fèi),劃價(jià),醫(yī)藥管理功能界面:</p><p><b> 出院管理功能界面:</b></p><p> 4.5-------------------------------------------模塊4功能實(shí)現(xiàn)</p><p> 醫(yī)務(wù)人員管理功能實(shí)現(xiàn):醫(yī)務(wù)人員注冊(cè),修改,維護(hù),值班
54、維護(hù)及各科室部門維護(hù)等</p><p><b> 所用到的數(shù)據(jù)表:</b></p><p><b> 醫(yī)務(wù)人員信息表:</b></p><p> 2編號(hào)int40</p><p> 0姓名char200</p><p> 0部門科室char20
55、0</p><p> 0職務(wù)char300</p><p> 0聯(lián)系電話char151</p><p> 0星期1bit10</p><p> 0星期2bit10</p><p> 0星期3bit10</p><p> 0星期4bit1
56、0</p><p> 0星期5bit10</p><p> 0星期6bit10</p><p> 1星期7bit10</p><p><b> 醫(yī)生表:</b></p><p> 2編號(hào)int40</p><p> 0醫(yī)生姓名
57、char200</p><p> 1醫(yī)生職務(wù)char250</p><p><b> 工作休息代碼表:</b></p><p> 2編號(hào)int40</p><p> 1休息值char100</p><p><b> 科室表:</b>&l
58、t;/p><p> 2科室號(hào)int40</p><p> 1科室名char300</p><p><b> 職務(wù)表:</b></p><p> 2編號(hào)int40</p><p> 1職務(wù)名稱char200</p><p> 醫(yī)務(wù)人員管
59、理功能界面:</p><p> 值班人員管理功能界面:</p><p><b> 科室維護(hù)功能界面:</b></p><p><b> 部門維護(hù)功能界面:</b></p><p> 4.6-------------------------------------------模塊5功能實(shí)現(xiàn)&l
60、t;/p><p> 院長(zhǎng)查詢管理:藥品價(jià)格整體調(diào)價(jià)控制,單個(gè)藥品調(diào)價(jià)控制,用戶注冊(cè)管理等功能;</p><p> 藥品價(jià)格調(diào)價(jià)控制管理界面:</p><p><b> 用戶注冊(cè)界面:</b></p><p> 4.7-------------------------------------------數(shù)據(jù)庫(kù)</
61、p><p> 數(shù)據(jù)庫(kù)所用到的數(shù)據(jù)表:</p><p> CREATE TABLE [住院收費(fèi)明細(xì)表] (</p><p> CREATE TABLE [住院收費(fèi)結(jié)算表] (</p><p> CREATE TABLE [出院結(jié)算信息表] (</p><p> CREATE TABLE [醫(yī)務(wù)人員信息表] (<
62、;/p><p> CREATE TABLE [醫(yī)生表] (</p><p> CREATE TABLE [工作休息代碼表] (</p><p> CREATE TABLE [當(dāng)日進(jìn)帳表] (</p><p> CREATE TABLE [掛號(hào)類型] (</p><p> CREATE TABLE [掛號(hào)表] (&
63、lt;/p><p> CREATE TABLE [病房狀態(tài)表] (</p><p> CREATE TABLE [登陸表] (</p><p> CREATE TABLE [科室表] (</p><p> CREATE TABLE [職務(wù)表] (</p><p> CREATE TABLE [藥品入庫(kù)總表] (&
64、lt;/p><p> CREATE TABLE [藥品入庫(kù)明細(xì)表] (</p><p> CREATE TABLE [藥品公司表] (</p><p> CREATE TABLE [藥品出庫(kù)表] (</p><p> CREATE TABLE [藥品庫(kù)存表] (</p><p> CREATE TABLE [門診
65、收費(fèi)明細(xì)表] (</p><p> CREATE TABLE [門診收費(fèi)結(jié)算表] (</p><p> CREATE TABLE [預(yù)交款信息表] (</p><p> 能夠?qū)?shù)據(jù)庫(kù)進(jìn)行備份,還原操作等功能;</p><p> 4.8-------------------------------------------系統(tǒng)界面實(shí)現(xiàn)&l
66、t;/p><p> 系統(tǒng)界面主要是對(duì)各功能界面實(shí)現(xiàn)中轉(zhuǎn),間接管理;</p><p><b> 系統(tǒng)功能界面:</b></p><p> 根據(jù)用戶需求:增加了一個(gè)計(jì)算器,和簡(jiǎn)單記話本;</p><p><b> 用戶登陸界面:</b></p><p> 第五部分 畢業(yè)設(shè)計(jì)
67、心得體會(huì)及結(jié)論</p><p> 在老師的指導(dǎo)下。本次畢業(yè)設(shè)計(jì),就要畫上一個(gè)句號(hào)了??墒牵瑢?duì)我來說,這次設(shè)計(jì)的本身所產(chǎn)生的影響,還遠(yuǎn)遠(yuǎn)沒有結(jié)束,我從本次畢業(yè)設(shè)計(jì)中學(xué)到了許多課本上沒有的知識(shí)。從設(shè)計(jì)任務(wù)書的下達(dá)到今天基本實(shí)現(xiàn)任務(wù)書中的設(shè)計(jì)要求,時(shí)間已整整過去了1個(gè)月。在這1個(gè)月中。通過自己的學(xué)習(xí)和努力;通過各位老師的指導(dǎo)和教育,使我不僅僅在知識(shí)水平和解決實(shí)際問題的能力上有了很大的提高。還從思想的深處體會(huì)到,要把自
68、己的所學(xué)變成現(xiàn)實(shí)時(shí)所將面對(duì)的種種難題。</p><p> 由于我平時(shí)的課程理論知識(shí)學(xué)的還可以,我總是認(rèn)為自己的知識(shí)水平已經(jīng)能處理許多的現(xiàn)實(shí)問題了。而當(dāng)自己真正的深入到設(shè)計(jì)實(shí)踐當(dāng)中,深入到問題當(dāng)中時(shí)。我竟然發(fā)現(xiàn)自己無從下手,我開始懷疑我是否真正的學(xué)到了知識(shí)。也只有到了那個(gè)時(shí)候,我才真正體會(huì)到學(xué)會(huì)運(yùn)用自己的能力與知識(shí)是何等的重要,知識(shí)是在課堂上,老師教授的,在書本中學(xué)到的,實(shí)踐則是要自己動(dòng)手,自己去做才能掌握。&l
69、t;/p><p> 在老師們的關(guān)心和幫助下,我漸漸的開始了設(shè)計(jì)。根據(jù)老師的建議,我找來了數(shù)據(jù)庫(kù)設(shè)計(jì)與建設(shè)的相關(guān)書籍和資料,從最基本的問題入手開始一個(gè)個(gè)的解決我心中的疑惑。 這是一個(gè)漫長(zhǎng)的學(xué)習(xí)過程。隨著時(shí)間的推移,我開始慢慢的掌握了設(shè)計(jì)時(shí)所需要的知識(shí)。我也終于明白了大學(xué)三年學(xué)習(xí)的意義和作用。扎實(shí)的基本功和良好的學(xué)習(xí)習(xí)慣,能使自己在學(xué)習(xí)新知識(shí)有更深刻的認(rèn)識(shí)力和更快的領(lǐng)會(huì)力。</p><p>
70、同時(shí)老師對(duì)畢業(yè)設(shè)計(jì)的重視也是我能完成設(shè)計(jì)的一個(gè)重要條件。為了保證我們畢業(yè)設(shè)計(jì)的正常進(jìn)行,學(xué)院抽調(diào)了優(yōu)秀的老師指導(dǎo)我們進(jìn)行畢業(yè)設(shè)計(jì),提供良好的設(shè)備給我們,在軟硬件上支持我們進(jìn)行畢業(yè)設(shè)計(jì),并且不時(shí)地詢問我們畢業(yè)設(shè)計(jì)的進(jìn)展情況。為我們這次設(shè)計(jì)的正常開展提供了必要的物質(zhì)基礎(chǔ)。</p><p> 關(guān)于本次設(shè)計(jì)的命題,我的設(shè)計(jì)只能提供其基本的功能。還有許多的設(shè)想由于時(shí)間和自身和因素?zé)o法得以實(shí)現(xiàn),這不能不說是本次設(shè)計(jì)的遺憾之
71、處。不過,至少它已經(jīng)啟發(fā)了自己的思維,提高了我的動(dòng)手能力,這是我在課本中學(xué)不到的。它為我們?cè)谝院蟮墓ぷ鲘徫簧习l(fā)揮自己的才能奠定了堅(jiān)實(shí)的基礎(chǔ)。</p><p><b> 第六部分 附錄</b></p><p> 6.1-------------------------------------------代碼部分</p><p><b&g
72、t; 系統(tǒng)界面代碼:</b></p><p> unit main;</p><p><b> interface</b></p><p><b> uses</b></p><p> Windows, Messages, SysUtils, Variants, Classes
73、, Graphics, Controls, Forms,</p><p> Dialogs, ExtCtrls, ImgList, Menus, ComCtrls, ToolWin, jpeg, StdCtrls, DB,</p><p><b> ADODB;</b></p><p><b> type</b>&l
74、t;/p><p> Tmain1 = class(TForm)</p><p> Panel1: TPanel;</p><p> PageControl2: TPageControl;</p><p> TabSheet5: TTabSheet;</p><p> StaticText5: TStaticTex
75、t;</p><p> GroupBox1: TGroupBox;</p><p> label_gh: TLabel;</p><p> Label_mzbagl: TLabel;</p><p> Label_cxhbb: TLabel;</p><p> GroupBox2: TGroupBox;<
76、;/p><p> Label1: TLabel;</p><p> Label2: TLabel;</p><p> Label3: TLabel;</p><p> b_go2: TButton;</p><p> GroupBox3: TGroupBox;</p><p> Rich
77、Edit1: TRichEdit;</p><p> TabSheet6: TTabSheet;</p><p> TabSheet7: TTabSheet;</p><p> TabSheet9: TTabSheet;</p><p> TabSheet10: TTabSheet;</p><p> Pan
78、el2: TPanel;</p><p> PageControl1: TPageControl;</p><p> TabSheet1: TTabSheet;</p><p> Image1: TImage;</p><p> TabSheet2: TTabSheet;</p><p> TabSheet3
79、: TTabSheet;</p><p> StatusBar1: TStatusBar;</p><p> ToolBar1: TToolBar;</p><p> ToolButton1: TToolButton;</p><p> ToolButton2: TToolButton;</p><p> T
80、oolButton7: TToolButton;</p><p> ToolButton8: TToolButton;</p><p> ToolButton6: TToolButton;</p><p> ToolButton9: TToolButton;</p><p> ToolButton5: TToolButton;<
81、/p><p> ToolButton10: TToolButton;</p><p> ToolButton4: TToolButton;</p><p> ToolButton3: TToolButton;</p><p> MainMenu1: TMainMenu;</p><p> N11: TMenuIt
82、em;</p><p> N1: TMenuItem;</p><p> N2: TMenuItem;</p><p> N3: TMenuItem;</p><p> N4: TMenuItem;</p><p> N21: TMenuItem;</p><p> N5: TMen
83、uItem;</p><p> N6: TMenuItem;</p><p> N7: TMenuItem;</p><p> N27: TMenuItem;</p><p> objectN17TMenuItem1: TMenuItem;</p><p> N28: TMenuItem;</p>
84、<p> N29: TMenuItem;</p><p> N31: TMenuItem;</p><p> N8: TMenuItem;</p><p> N9: TMenuItem;</p><p> N10: TMenuItem;</p><p> N12: TMenuItem;<
85、/p><p> N41: TMenuItem;</p><p> N51: TMenuItem;</p><p> N13: TMenuItem;</p><p> N14: TMenuItem;</p><p> N15: TMenuItem;</p><p> N52: TMenuI
86、tem;</p><p> N16: TMenuItem;</p><p> N61: TMenuItem;</p><p> N71: TMenuItem;</p><p> N20: TMenuItem;</p><p> N22: TMenuItem;</p><p> N23
87、: TMenuItem;</p><p> N24: TMenuItem;</p><p> N26: TMenuItem;</p><p> N30: TMenuItem;</p><p> N72: TMenuItem;</p><p> N25: TMenuItem;</p><p&
88、gt; ImageList1: TImageList;</p><p> Timer1: TTimer;</p><p> b_go1: TButton;</p><p> GroupBox4: TGroupBox;</p><p> GroupBox5: TGroupBox;</p><p> Group
89、Box6: TGroupBox;</p><p> Image2: TImage;</p><p> Image3: TImage;</p><p> Memo1: TMemo;</p><p> GroupBox7: TGroupBox;</p><p> GroupBox8: TGroupBox;<
90、/p><p> GroupBox9: TGroupBox;</p><p> Label4: TLabel;</p><p> Label5: TLabel;</p><p> Image4: TImage;</p><p> Image5: TImage;</p><p> Group
91、Box10: TGroupBox;</p><p> GroupBox11: TGroupBox;</p><p> GroupBox12: TGroupBox;</p><p> Image6: TImage;</p><p> Image7: TImage;</p><p> Image8: TImage
92、;</p><p> ToolButton11: TToolButton;</p><p> ADOQuery1: TADOQuery;</p><p> procedure FormClose(Sender: TObject; var Action: TCloseAction);</p><p> procedure b_go1Cl
93、ick(Sender: TObject);</p><p> procedure b_go2Click(Sender: TObject);</p><p> procedure FormShow(Sender: TObject);</p><p> procedure Timer1Timer(Sender: TObject);</p><p
94、> procedure jishibenclick(sender:tobject);</p><p> procedure calculateclick(sender:tobject);</p><p> procedure yaopinglclick(sender:tobject);</p><p> procedure Image2Click(Se
95、nder: TObject);</p><p> procedure menzhenglclick(sender:tobject);</p><p> procedure Image3Click(Sender: TObject);</p><p> procedure ToolButton9Click(Sender: TObject);</p>
96、<p> procedure Image4Click(Sender: TObject);</p><p> procedure Image5Click(Sender: TObject);</p><p> procedure Label5Click(Sender: TObject);</p><p> procedure ywryzbglclick
97、(sender:tobject);</p><p> procedure ToolButton8Click(Sender: TObject);</p><p> procedure Image6Click(Sender: TObject);</p><p> procedure Image7Click(Sender: TObject);</p>
98、<p> procedure Image8Click(Sender: TObject);</p><p> procedure tuichuclick(sender:tobject);</p><p> procedure N20Click(Sender: TObject);</p><p> procedure N22Click(Sender:
99、TObject);</p><p> procedure ToolButton11Click(Sender: TObject);</p><p> procedure N16Click(Sender: TObject);</p><p> procedure ToolButton3Click(Sender: TObject);</p><p
100、> procedure N23Click(Sender: TObject);</p><p> procedure N26Click(Sender: TObject);</p><p><b> private</b></p><p> { Private declarations }</p><p>&l
101、t;b> public</b></p><p> { Public declarations }</p><p><b> end;</b></p><p><b> var</b></p><p> main1: Tmain1;</p><p>
102、 implementation</p><p> {$R *.dfm} uses mzgh,mzshg,login,book,calculate1,yaorukugl,yaochukugldan,</p><p> ywrydj,ksgl11,zwgl11,zbgl11,zyxkgl11,zyglzong11,cygl11,yzgl11,mimagai11,yztjgl11,<
103、;/p><p> jinzhanggl11,dmshuju11,connect;</p><p> procedure Tmain1.FormClose(Sender: TObject; var Action: TCloseAction);</p><p><b> begin</b></p><p> applic
104、ation.Terminate;</p><p><b> end;</b></p><p> procedure Tmain1.b_go1Click(Sender: TObject);</p><p><b> begin</b></p><p> mzghd:=tmzghd.Create
105、(application);</p><p> mzghd.Show;</p><p><b> end;</b></p><p> procedure Tmain1.b_go2Click(Sender: TObject);</p><p><b> begin</b></p>
106、<p> mzshgf:=tmzshgf.Create(application);</p><p> mzshgf.Show;</p><p><b> end;</b></p><p> procedure Tmain1.FormShow(Sender: TObject);</p><p><
107、b> begin</b></p><p> statusbar1.Panels[0].Text:='µ±Ç°²Ù×÷Ô±:';</p><p> statusbar1.Panels[2].Text:=FormatDateTime('"
108、ϵͳʱ¼ä£º"yyyy-mm-dd" "hh:nn:ss" "mmmm" "dddd', now);</p><p> statusbar1.Panels[1].Text:=' '+login.Form
109、1.DBEdit1.Text;</p><p> statusbar1.Panels[3].Text:='Èí¼þ¿ª·¢ÕߣºÄª½¨ÆÂ';</p><p> timer1.Enable
110、d:=true;</p><p> tabsheet5.Visible:=true;</p><p> tabsheet6.Visible:=false;</p><p> tabsheet7.Visible:=false;</p><p> tabsheet9.Visible:=false;</p><p>
111、 tabsheet10.Visible:=false;</p><p> tabsheet5.Caption:='ÃÅÕï¹ÜÀíÇø';</p><p> pagecontrol2.Refresh;</p><p><b> end
112、;</b></p><p> procedure Tmain1.Timer1Timer(Sender: TObject);</p><p><b> begin</b></p><p> statusbar1.Panels[2].Text:=FormatDateTime('"ϵÍ
113、;³Ê±¼ä£º"yyyy-mm-dd" "hh:nn:ss" "mmmm" "dddd', now);</p><p><b> end;</b></p><p> procedure tmain1.jishi
114、benclick(sender:tobject);</p><p><b> begin</b></p><p> book.jishiben:=book.Tjishiben.Create(application);</p><p> if book.jishiben.ShowModal=mrok then</p>&l
115、t;p><b> begin</b></p><p> book.jishiben.Memo1.Lines.SaveToFile('love.txt');</p><p> book.jishiben.Free;</p><p> toolbutton5.Down:=false;</p><p&
116、gt;<b> end;</b></p><p><b> end;</b></p><p> procedure tmain1.calculateclick(sender:tobject);</p><p><b> begin</b></p><p> calcu
117、late1.calculate:=calculate1.Tcalculate.Create(application);</p><p> calculate1.calculate.Show;</p><p><b> end;</b></p><p> procedure tmain1.yaopinglclick(sender:tobje
118、ct);</p><p><b> begin</b></p><p> if toolbutton7.Down then</p><p><b> begin</b></p><p> tabsheet6.Visible:=true;</p><p> tabsh
119、eet5.Visible:=false;</p><p> tabsheet7.Visible:=false;</p><p> tabsheet9.Visible:=false;</p><p> tabsheet10.Visible:=false;</p><p> tabsheet5.Caption:='Ò
120、169;Æ·¹ÜÀíÇø';</p><p> pagecontrol2.Refresh;</p><p><b> end;</b></p><p><b> end;</b></p><p> pro
121、cedure Tmain1.Image2Click(Sender: TObject);</p><p><b> begin</b></p><p> yaorukugl.rukuf:=yaorukugl.Trukuf.Create(application);</p><p> yaorukugl.rukuf.Show;</p>
122、;<p> yaorukugl.flag:=true;</p><p><b> end;</b></p><p> procedure tmain1.menzhenglclick(sender:tobject);</p><p><b> begin</b></p><p>
123、 if toolbutton2.Down then</p><p><b> begin</b></p><p> tabsheet5.Visible:=true;</p><p> tabsheet6.Visible:=false;</p><p> tabsheet7.Visible:=false;<
124、/p><p> tabsheet9.Visible:=false;</p><p> tabsheet10.Visible:=false;</p><p> tabsheet5.Caption:='ÃÅÕï¹ÜÀíÇø';</p>&l
125、t;p> pagecontrol2.Refresh;</p><p><b> end;</b></p><p><b> end;</b></p><p> procedure Tmain1.Image3Click(Sender: TObject);</p><p><b>
126、; begin</b></p><p> yaochukugldan.yaochukugl:=yaochukugldan.Tyaochukugl.Create(application);</p><p> yaochukugldan.yaochukugl.Show;</p><p><b> end;</b></p&g
127、t;<p> procedure Tmain1.ToolButton9Click(Sender: TObject);</p><p><b> begin</b></p><p> if toolbutton9.Down then</p><p><b> begin</b></p>&
128、lt;p> tabsheet9.Visible:=true;</p><p> tabsheet6.Visible:=false;</p><p> tabsheet7.Visible:=false;</p><p> tabsheet5.Visible:=false;</p><p> tabsheet10.Visible:
129、=false;</p><p> tabsheet5.Caption:='Ò½ÎñÈËÔ±¹ÜÀíÇø';</p><p> pagecontrol2.Refresh;</p><p><b>
130、end;</b></p><p><b> end;</b></p><p> procedure Tmain1.Image4Click(Sender: TObject);</p><p><b> begin</b></p><p> ywrydj.register1:=ywr
131、ydj.Tregister1.Create(application);</p><p> ywrydj.register1.Show;</p><p><b> end;</b></p><p> procedure Tmain1.Image5Click(Sender: TObject);</p><p><
132、b> begin</b></p><p> ksgl11.keshigldd:=ksgl11.Tkeshigldd.Create(application);</p><p> ksgl11.keshigldd.Show;</p><p><b> end;</b></p><p> proce
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝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ù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 眾賞文庫(kù)僅提供信息存儲(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ì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 醫(yī)院管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 畢業(yè)設(shè)計(jì)--畢業(yè)設(shè)計(jì)管理系統(tǒng)設(shè)計(jì)說明書
- 藥庫(kù)管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 暖通醫(yī)院畢業(yè)設(shè)計(jì)說明書
- 訂單管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 畢業(yè)設(shè)計(jì)說明書---畢業(yè)設(shè)計(jì)課題綜合管理系統(tǒng)
- 畢業(yè)設(shè)計(jì)說明書---畢業(yè)設(shè)計(jì)課題綜合管理系統(tǒng)
- delphi物資管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 圖書管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 學(xué)籍管理畢業(yè)設(shè)計(jì)說明書
- 生產(chǎn)管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 企業(yè)文檔管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 班級(jí)學(xué)生管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 倉(cāng)庫(kù)管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書3
- 物流管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 產(chǎn)品管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 企業(yè)員工管理系統(tǒng)畢業(yè)設(shè)計(jì)說明書
- 畢業(yè)設(shè)計(jì)說明書---畢業(yè)設(shè)計(jì)課題綜合管理系統(tǒng).doc
- 畢業(yè)設(shè)計(jì)--畢業(yè)設(shè)計(jì)管理系統(tǒng)說明書
- 液壓系統(tǒng)畢業(yè)設(shè)計(jì)說明書
評(píng)論
0/150
提交評(píng)論