基于delphi的教務(wù)管理系統(tǒng)畢業(yè)論文

1、<p><b>　　目 錄</b></p><p><b>　　摘 要 I</b></p><p>　　ABSTRACTII</p><p><b>　　1.緒 論1</b></p><p>　　1.1系統(tǒng)研究的目的和意義1</p><

2、;p>　　1.2國內(nèi)外發(fā)展概況及存在問題1</p><p>　　1.3本文研究的內(nèi)容及目標(biāo)2</p><p><b>　　2.系統(tǒng)概述4</b></p><p>　　2.1系統(tǒng)及需求分析4</p><p>　　2.1.1系統(tǒng)需求4</p><p>　　2.1.2可行性分

3、析4</p><p>　　2.2系統(tǒng)設(shè)計(jì)的背景4</p><p>　　2.3系統(tǒng)的功能簡介4</p><p>　　2.3.1學(xué)生信息管理模塊5</p><p>　　2.3.2學(xué)生成績管理模塊5</p><p>　　2.3.3學(xué)籍變動模塊5</p><p>　　2.3.4基

4、本信息模塊5</p><p>　　2.4系統(tǒng)開發(fā)的目標(biāo)5</p><p><b>　　3.系統(tǒng)分析6</b></p><p>　　3.1數(shù)據(jù)流程分析6</p><p>　　3.2數(shù)據(jù)存儲分析6</p><p>　　3.2.1概念模型6</p><p>　

5、　3.2.2系統(tǒng)E-R圖的設(shè)計(jì)7</p><p>　　3.3系統(tǒng)流程分析7</p><p><b>　　4.系統(tǒng)設(shè)計(jì)9</b></p><p>　　4.1軟件模塊結(jié)構(gòu)設(shè)計(jì)9</p><p>　　4.1.1系統(tǒng)方案確定9</p><p>　　4.1.2軟件結(jié)構(gòu)設(shè)計(jì)9</p

6、><p>　　4.2數(shù)據(jù)庫設(shè)計(jì)9</p><p>　　4.2.1本系統(tǒng)中所涉及到的主要實(shí)體共有六個(gè)數(shù)據(jù)表10</p><p>　　4.2.2各表的物理結(jié)構(gòu)10</p><p>　　5.系統(tǒng)的實(shí)現(xiàn)12</p><p>　　5.1系統(tǒng)登陸界面12</p><p>　　5.2系統(tǒng)主界

7、面12</p><p>　　5.3用戶管理模塊13</p><p>　　5.4學(xué)生學(xué)籍變動模塊13</p><p>　　5.5學(xué)生信息管理模塊14</p><p>　　5.6成績管理模塊15</p><p><b>　　6.結(jié)論16</b></p><p&

8、gt;<b>　　參考文獻(xiàn)17</b></p><p><b>　　附 錄18</b></p><p><b>　　答 謝27</b></p><p>　　教務(wù)管理系統(tǒng)的開發(fā)與研究</p><p>　　摘 要 隨著信息技術(shù)在管理上越來越深入而廣泛的應(yīng)用，教務(wù)管理

9、系統(tǒng)的實(shí)施在技術(shù)上也逐步成熟。教務(wù)管理系統(tǒng)是一個(gè)不斷發(fā)展的學(xué)科,貫穿著整個(gè)教育管理體系。</p><p>　　本文介紹了在DELPHI環(huán)境下采用“自上而下地總體規(guī)劃，自下而上地應(yīng)用開發(fā)”的策略開發(fā)一個(gè)教務(wù)管理系統(tǒng)的過程。通過分析學(xué)校的教務(wù)管理體系，創(chuàng)建了一套行之有效的計(jì)算機(jī)管理的方案。文章介紹了教務(wù)管理系統(tǒng)的系統(tǒng)分析部分，包括系統(tǒng)需求分析、可行性分析、數(shù)據(jù)流程分析以及系統(tǒng)流程分析等；系統(tǒng)設(shè)計(jì)部分主要介紹了軟件模塊

10、設(shè)計(jì)和數(shù)據(jù)庫設(shè)計(jì)等；系統(tǒng)實(shí)現(xiàn)部分簡單介紹了幾個(gè)主要模塊用法。本系統(tǒng)界面友好，操作簡單，比較實(shí)用。</p><p>　　關(guān)鍵詞 信息管理系統(tǒng)，教務(wù)管理系統(tǒng)，信息查詢，DELPHI應(yīng)用 </p><p><b>　　ABSTRACT</b></p><p>　　With more and more widespread and profound

11、 application of information technology in management, the implement of management information system has become mature in technology step by step. Managing information system is a subject. Enterprise needs existence and

12、development, so enterprise activities means tightening up the enterprise management and strengthening effective management of any resource internal the enterprise。</p><p>　　This article introduces the detail

13、ed process of exploring a management information system under the environment of delphi, utilizing “Top-Bottom” overall plan and a strategy according to “Bottom-Top” application and exploitation. That is to establish a s

14、et of effective scheme for student management by computer, through analyzing disadvantages of student management by human resources. This article emphasizes on three sections. The system analysis section of student manag

15、ement information includes</p><p>　　Key Words: MIS、Student managementsystem、Delphi</p><p><b>　　緒 論</b></p><p>　　系統(tǒng)研究的目的和意義</p><p>　　21世紀(jì)初期，既是我國經(jīng)濟(jì)快速、健康發(fā)展的重要

16、時(shí)期，也是我國高等教育快速、健康發(fā)展的關(guān)鍵時(shí)期，高等學(xué)校必須與時(shí)俱進(jìn)，更新觀念，創(chuàng)新制度，深化改革，努力提高人才培養(yǎng)質(zhì)量，這不僅是新時(shí)期經(jīng)濟(jì)社會發(fā)展的客觀要求，更是高等學(xué)校改革與發(fā)展的必然選擇。隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，計(jì)算機(jī)在日常管理應(yīng)用中迅速普及，利用計(jì)算機(jī)進(jìn)行教務(wù)管理勢在必行。因此開發(fā)一個(gè)能滿足學(xué)校日常信息統(tǒng)計(jì)分析工作的教務(wù)管理系統(tǒng)對學(xué)校各項(xiàng)工作的開展有著重要的意義。</p><p>　　開發(fā)出一個(gè)操作簡便

17、，界面友好，靈活實(shí)用，能被人普遍接受，安全可靠，容易操作的教務(wù)管理系統(tǒng)，能夠提高學(xué)校對學(xué)生信息的統(tǒng)計(jì)分析效率，減輕教務(wù)管理人員對信息管理和統(tǒng)計(jì)的負(fù)擔(dān)，提高學(xué)校對信息的規(guī)范化管理。教務(wù)管理系統(tǒng)能夠及時(shí)對信息進(jìn)行收集整理，使學(xué)校相關(guān)部門及時(shí)獲取可靠的信息，便于管理。</p><p>　　國內(nèi)外發(fā)展概況及存在問題</p><p>　　隨著以計(jì)算機(jī),多媒體,通訊,網(wǎng)絡(luò),人工智能等為代表的信息收集,

18、處理,加工,傳輸?shù)燃夹g(shù)的飛速發(fā)展,信息技術(shù)不斷滲透到社會生活的各個(gè)領(lǐng)域和各個(gè)方面,在全球范圍內(nèi)掀起了一場改變世界面貌的信息革命浪潮,它不斷改變著人們的生產(chǎn)方式,生活方式以及思維方式,使人類跨入了一個(gè)嶄新的時(shí)代——信息化時(shí)代。</p><p>　　開發(fā)教務(wù)管理系統(tǒng)就是緊跟信息時(shí)代的步伐,也是推動管理信息化的具體措施。</p><p><b>　　(1)國外研究現(xiàn)狀</b>

19、;</p><p>　　國外從20世紀(jì)70年代就有人研究管理問題.直到20世紀(jì)90年代關(guān)于管理問題的研究仍然十分活躍。</p><p>　　管理信息系統(tǒng)(MIS)的概念起源很早。在國外，早在20世紀(jì)30年代，柏德就強(qiáng)調(diào)了決策在組織管理中的作用。50年代，西蒙提出了管理依賴于信息和決策的概念。同一時(shí)代維納發(fā)表了控制論與管理，他把管理過程當(dāng)成一個(gè)控制過程。50年代計(jì)算機(jī)已用于會計(jì)工作，1958

20、年蓋爾寫道：管理將以較低的成本得到及時(shí)準(zhǔn)確的信息，做到較好的控制。"這時(shí)數(shù)據(jù)處理一詞已經(jīng)出現(xiàn)。 管理信息系統(tǒng)(MIS)已經(jīng)逐步成為一個(gè)獨(dú)立的學(xué)科分支，它繼承了其他眾多學(xué)科的理論、方法與應(yīng)用技術(shù)，它與信息科學(xué)、系統(tǒng)科學(xué)、控制理論、運(yùn)籌學(xué)、會計(jì)學(xué)、統(tǒng)計(jì)學(xué)、經(jīng)濟(jì)學(xué)、管理科學(xué)、計(jì)算機(jī)科學(xué)有著十分密切的聯(lián)系。</p><p><b>　　(2)國內(nèi)研究現(xiàn)狀</b></p>&l

21、t;p>　　我國從20世紀(jì)80年代初期開始管理問題的研究。</p><p>　　國內(nèi)許多企業(yè)開發(fā)過與管理相關(guān)的系統(tǒng),但大多是根據(jù)本企業(yè)的特點(diǎn)而設(shè)計(jì)的。只有少數(shù)系統(tǒng)考慮到了管理的通用性。</p><p>　　隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)日漸成熟，其強(qiáng)大的功能已為人們深刻認(rèn)識，它已進(jìn)入人類社會的各個(gè)領(lǐng)域并發(fā)揮著重要的作用。作為計(jì)算機(jī)應(yīng)用的一部分，使用計(jì)算機(jī)對信息進(jìn)行管理，具有高速度

22、、高效率、高質(zhì)量的優(yōu)勢。</p><p>　　程序設(shè)計(jì)人員運(yùn)用編程語言及數(shù)據(jù)庫，針對信息管理的具體情況，進(jìn)行分析，設(shè)計(jì)出一個(gè)專屬的信息管理系統(tǒng)，這將是開發(fā)信息管理系統(tǒng)的方向。教務(wù)管理系統(tǒng)是一個(gè)比較穩(wěn)定的系統(tǒng)，很大程度上具有一定的優(yōu)勢，比如說：系統(tǒng)運(yùn)行安全可靠，穩(wěn)定性好；系統(tǒng)的可管理性好；系統(tǒng)輸入界面友好，操作簡便易行，盡量減少用戶的輸入工作量；能實(shí)現(xiàn)多種查詢，允許進(jìn)行模糊查詢；數(shù)據(jù)具有規(guī)范性，整體性，方便數(shù)據(jù)之間

23、的比較分析?？墒牵魏螙|西都不是完美的，它也存在很多缺點(diǎn)：網(wǎng)絡(luò)功能欠缺。本系統(tǒng)沒有建立網(wǎng)絡(luò)連接，只能單機(jī)運(yùn)行，無法實(shí)現(xiàn)資源共享。容錯(cuò)性不高，系統(tǒng)的抗錯(cuò)，容錯(cuò)性不高。如必須使用規(guī)范查詢語言，否則系統(tǒng)無法辨識執(zhí)行。 有很多地方還設(shè)計(jì)的不夠詳細(xì)，且系統(tǒng)分析報(bào)告中提及的一些功能在此未能實(shí)現(xiàn)。</p><p>　　本文研究的內(nèi)容及目標(biāo)</p><p>　　課題主要研究的內(nèi)容如下：</p>

24、<p>　　本系統(tǒng)的使用者：教務(wù)處管理人員、任課教師和學(xué)生，研究內(nèi)容涉及到以下幾方面：</p><p>　?。?）教務(wù)處管理人員可以以管理員的身份登陸，進(jìn)入管理模塊，可以進(jìn)行學(xué)生信息的錄入和查詢，學(xué)生成績的錄入查詢，學(xué)籍的變動以及班級的設(shè)定和查詢等功能最后是退出系統(tǒng)等操作。 </p><p>　?。?）管理員可以設(shè)定教師用戶，授予相應(yīng)的權(quán)限，對學(xué)生信息，學(xué)生成績以及班級進(jìn)行管

25、理。</p><p>　　（3）學(xué)生可以用直接進(jìn)入，只可以查詢相應(yīng)的信息而不能對相關(guān)信息進(jìn)行編輯。</p><p>　　本系統(tǒng)的目標(biāo)就是從操作簡單、界面友好、靈活、實(shí)用、安全的要求出發(fā)，完成操作的全過程，為使用者提供最大的方便，最大程度提高工作效率。</p><p><b>　　系統(tǒng)概述</b></p><p>　　本教

26、務(wù)管理系統(tǒng)可以說是一個(gè)綜合性的學(xué)校學(xué)生管理系統(tǒng)，它具有學(xué)生學(xué)籍管理、學(xué)生成績管理、學(xué)生信息管理等多種功能，因而具有較強(qiáng)的實(shí)用性。</p><p><b>　　系統(tǒng)及需求分析</b></p><p><b>　　系統(tǒng)需求</b></p><p>　　通過調(diào)查,系統(tǒng)需要達(dá)到以下要求:</p><p>　

27、　由于該系統(tǒng)的使用對象多,要求有較好的權(quán)限管理; </p><p>　　原始數(shù)據(jù)修改簡單方便,支持多條件修改</p><p>　　方便的數(shù)據(jù)查詢，支持多條件查詢;</p><p>　　在相應(yīng)的權(quán)限下，刪除數(shù)據(jù)方便簡單，數(shù)據(jù)穩(wěn)定性好；</p><p><b>　　可行性分析</b></p><p>

28、　　由于本系統(tǒng)管理的對象單一,都是在校學(xué)生，且每個(gè)數(shù)據(jù)內(nèi)容具有較強(qiáng)的關(guān)聯(lián)性，涉及的計(jì)算過程不是很復(fù)雜。因此，比較適合于采用數(shù)據(jù)庫管理。且學(xué)校用于學(xué)生管理的微機(jī)都是PIII以上的機(jī)器，在存儲量、速度方面都能滿足數(shù)據(jù)庫運(yùn)行的要求。在技術(shù)難度方面，由于有指導(dǎo)老師的指導(dǎo)和查閱相關(guān)參考文獻(xiàn)，因此完全可以實(shí)現(xiàn)。</p><p>　　本系統(tǒng)的設(shè)計(jì)是在WindowsXP中文版操作系統(tǒng)環(huán)境下，使用DELPHI開發(fā)成功的。目前，數(shù)據(jù)

29、庫產(chǎn)品較多，每種產(chǎn)品都具有各自的特點(diǎn)和適用范圍，因此，在選擇數(shù)據(jù)庫時(shí)，應(yīng)考慮數(shù)據(jù)庫應(yīng)用的特點(diǎn)及適用范圍。</p><p><b>　　系統(tǒng)設(shè)計(jì)的背景</b></p><p>　　每個(gè)學(xué)校都需要進(jìn)行信息的統(tǒng)計(jì)分析工作，而這些工作都必須在很短時(shí)間內(nèi)完成。大量的數(shù)據(jù)的統(tǒng)計(jì)分析工作如果只靠人工來完成，費(fèi)時(shí)費(fèi)力，還容易出錯(cuò)。隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，計(jì)算機(jī)在日常管理應(yīng)用中迅速普

30、及，利用計(jì)算機(jī)進(jìn)行管理勢在必行。因此需開發(fā)出一個(gè)能滿足學(xué)校進(jìn)行信息的錄入，統(tǒng)計(jì)，查詢和打印等需求的、功能完善、安全可靠、迅速簡便的管理信息系統(tǒng)是非常有必要的。</p><p><b>　　系統(tǒng)的功能簡介</b></p><p>　　本系統(tǒng)主要可以實(shí)現(xiàn)以下的管理功能：學(xué)生信息管理、學(xué)生成績管理、學(xué)籍變動、班級信息等等。</p><p><b

31、>　　學(xué)生信息管理模塊</b></p><p>　　該模塊的功能是對學(xué)生的基本信息的錄入和查詢，和后面的成績管理，學(xué)籍變動有很好的聯(lián)系。</p><p><b>　　學(xué)生成績管理模塊</b></p><p>　　該模塊對各學(xué)生的成績錄入以及查詢的設(shè)置，可以給學(xué)生添加以及修改學(xué)生成績，分為成績錄入和成績查詢等模塊。</p&

32、gt;<p><b>　　學(xué)籍變動模塊</b></p><p>　　該模塊對學(xué)生退學(xué)休學(xué)復(fù)學(xué)轉(zhuǎn)學(xué)以及調(diào)班的信息進(jìn)行設(shè)置，并可在其中填寫原因，該模塊包括退學(xué)|休學(xué)和轉(zhuǎn)學(xué)|調(diào)班兩個(gè)模塊。</p><p><b>　　基本信息模塊</b></p><p>　　該模塊是對班級的添加和設(shè)置以及對課程的添加和設(shè)置，自行添

33、加相應(yīng)的課程和班級，把軟件進(jìn)行了人性化的設(shè)計(jì)。</p><p><b>　　系統(tǒng)開發(fā)的目標(biāo)</b></p><p>　　本系統(tǒng)是管理學(xué)校學(xué)生信息的一個(gè)綜合性的系統(tǒng)，本系統(tǒng)的設(shè)計(jì)目標(biāo)將最終定位于完成以上所述的系統(tǒng)主要業(yè)務(wù)的基本模型上。擬建系統(tǒng)實(shí)現(xiàn)以下具體要求：</p><p><b>　　提高信息處理速度。</b></

34、p><p>　　集中處理，提高管理效率。</p><p>　　減輕教務(wù)管理人員的勞動強(qiáng)度、提高管理水平。</p><p><b>　　系統(tǒng)分析</b></p><p><b>　　數(shù)據(jù)流程分析</b></p><p>　　下面是教務(wù)管理系統(tǒng)的數(shù)據(jù)流圖，如圖3.1.1所示。<

35、/p><p>　　圖3.1.1教務(wù)管理系統(tǒng)據(jù)流程圖</p><p>　　數(shù)據(jù)存儲分析：實(shí)體聯(lián)系圖(E-R圖)</p><p><b>　　概念模型</b></p><p>　　E-R模型是指直接從現(xiàn)實(shí)世界中抽象出實(shí)體類型及實(shí)體間聯(lián)系，是一種描述靜態(tài)數(shù)據(jù)結(jié)構(gòu)的概念模型。它的主要成分是實(shí)體、聯(lián)系和屬性?？衫肊-R模型進(jìn)行數(shù)據(jù)庫

36、概念設(shè)計(jì)。E-R圖是直觀表示概念模型的工具。在圖中有四個(gè)基本成分，如圖3.2.1：</p><p>　　矩形框：表示實(shí)體類型(考慮問題的對象)。</p><p>　　菱形框：表示聯(lián)系類型(實(shí)體間的聯(lián)系)。</p><p>　　橢圓型框：表示實(shí)體類型和聯(lián)系類型的屬性。</p><p>　　直線：聯(lián)系類型與設(shè)計(jì)的實(shí)體類型之間以直線連接，并在直線上

37、部標(biāo)上聯(lián)系種類(1:1，1:N，M:N)。</p><p>　　具體圖示如圖3.2.1所示。</p><p>　　實(shí)體 屬性 聯(lián)系</p><p>　　圖3.2.1實(shí)體E-R圖符號表示</p><p><b>　　系統(tǒng)E-R圖的設(shè)計(jì)</b></p>

38、<p>　　本系統(tǒng)中所規(guī)劃的主要實(shí)體有：學(xué)生基本信息實(shí)體、學(xué)注冊實(shí)體、班級信息實(shí)體、課程信息實(shí)體、成績信息實(shí)體等，下面以學(xué)生注冊實(shí)體為例是實(shí)體E-R圖，如圖3.2.2所示。</p><p>　　圖3.2.2學(xué)生注冊實(shí)體E-R圖</p><p><b>　　系統(tǒng)流程分析</b></p><p>　　所謂系統(tǒng)流程分析，就是用戶使用系統(tǒng)

39、時(shí)的工作過程。不同用戶有著不同的工作流程和使用權(quán)限。登陸是判斷是否是合法的用戶，在數(shù)據(jù)庫設(shè)計(jì)中用戶的登陸名是固定的，如果要添加用戶則在用戶管理里面添加相應(yīng)的用戶信息。</p><p>　　流程圖使用的符號如圖3.3.1所示。</p><p>　　開始/結(jié)束 數(shù)據(jù)流動 判斷 功能描述 輸入</p><p><b>　　及方

40、向</b></p><p>　　圖3.3.1流程圖使用符號</p><p>　　本系統(tǒng)的系統(tǒng)流程分析如圖3.3.2所示。</p><p><b>　　N</b></p><p><b>　　Y </b></p><p>　　圖3.3.2 系統(tǒng)流程分析圖</p

41、><p><b>　　系統(tǒng)設(shè)計(jì)</b></p><p><b>　　軟件模塊結(jié)構(gòu)設(shè)計(jì)</b></p><p><b>　　系統(tǒng)方案確定</b></p><p>　　通過對系統(tǒng)的調(diào)研與分析，系統(tǒng)主要應(yīng)完成的功能有：系統(tǒng)管理、學(xué)生信息管理、學(xué)生成績管理、學(xué)籍變動、班級信息等。</

42、p><p><b>　　軟件結(jié)構(gòu)設(shè)計(jì)</b></p><p>　　本系統(tǒng)在執(zhí)行時(shí)，先根據(jù)不同的操作人員的需要進(jìn)入相應(yīng)的模塊，然后可以輸入數(shù)據(jù)或者進(jìn)行其它的查詢或?yàn)g覽等操作；總體來說，本系統(tǒng)屬于一個(gè)MIS系統(tǒng)。系統(tǒng)的功能層次圖如圖4.1.1所示。</p><p>　　圖4.1.1功能層次圖</p><p><b>　

43、　數(shù)據(jù)庫設(shè)計(jì)</b></p><p>　　數(shù)據(jù)庫采用了Microsoft推出的Access數(shù)據(jù)庫，這是微軟集成到Office中的一個(gè)桌面數(shù)據(jù)庫，能夠快速方便的和Office的其他套件綜合使用。由于Access具有顯著的簡易性和有效性，大量的桌面數(shù)據(jù)庫系統(tǒng)都采用Access作為后臺數(shù)據(jù)庫。使用Access的好處還在于，如果你的系統(tǒng)擴(kuò)展到Client/Server模式的時(shí)候，可以使用Microsoft的數(shù)

44、據(jù)庫服務(wù)器軟件SQL Server，此時(shí)，程序只需要簡單的修改一下鏈接就可以，這樣，為程序的平滑擴(kuò)展提供了非常有利的條件。</p><p>　　本系統(tǒng)中所涉及到的主要實(shí)體共有六個(gè)數(shù)據(jù)表</p><p>　　cj表：{學(xué)號，姓名，班級，課程，成績，考試類型，學(xué)期}</p><p>　　class表：{班級編號，班級名稱 }</p><p>　　

45、classkecheng表：{課程編號，課程名稱}</p><p>　　xueji表：{學(xué)號，姓名，原班級，狀態(tài)，轉(zhuǎn)學(xué)學(xué)校，現(xiàn)在班級，變動原因}</p><p>　　xinxi表：{學(xué)號，姓名，性別，班級，民族，政治面貌，家庭成分，籍貫，家長姓名，家長工作單位，當(dāng)前狀態(tài)，入學(xué)時(shí)間，出生日期，聯(lián)系電話，家庭住址，履歷，備注}</p><p>　　zhuce表：{學(xué)號，

46、姓名，年齡，班級，團(tuán)員，學(xué)期，注冊時(shí)間，備注}</p><p><b>　　各表的物理結(jié)構(gòu)</b></p><p>　　各表的物理結(jié)構(gòu)如下圖所示。</p><p>　　表4.2.1 Cj表</p><p>　　表4.2.2 Class表</p><p>　　表4.2.3 classkecheng表

47、</p><p>　　表4.2.4 xueji表</p><p>　　表4.2.5 xinxi表</p><p>　　表4.2.6 zhuce表</p><p><b>　　系統(tǒng)的實(shí)現(xiàn)</b></p><p>　　本部分主要內(nèi)容為本系統(tǒng)的運(yùn)行界面以及主要界面展示。</p><p

48、><b>　　系統(tǒng)登陸界面</b></p><p>　　本界面的主要功能是為了對系統(tǒng)進(jìn)行安全性管理(見圖5.1.1)，本系統(tǒng)的用戶名和密碼保存在表中，本系統(tǒng)根據(jù)不同的用戶而設(shè)置了不同的權(quán)限，可以用admin為用戶名和密碼來登陸本系統(tǒng)。</p><p>　　圖5.1.1 系統(tǒng)登錄界面</p><p><b>　　系統(tǒng)主界面<

49、/b></p><p>　　本模塊是本系統(tǒng)的應(yīng)用界面(見圖5.2.2)，在本界面上集成了本系統(tǒng)的所有功能，使用TOOLBAR組件，簡便快捷。</p><p>　　圖5.2.2 系統(tǒng)主界面</p><p><b>　　用戶管理模塊</b></p><p>　　本模塊是本系統(tǒng)的安全性設(shè)置模塊(見圖5.3.3)，根據(jù)學(xué)校

50、不同部門以及不同使用人員對本系統(tǒng)的要求和需要，從而實(shí)行了分級管理，對用戶的權(quán)限和類別進(jìn)行了分類管理。</p><p>　　圖5.3.3 用戶管理模塊</p><p><b>　　學(xué)生學(xué)籍變動模塊</b></p><p>　　本模塊主要設(shè)置學(xué)生學(xué)籍的變動(見圖5.4.4)，以及記錄相關(guān)信息等內(nèi)容?？梢愿鶕?jù)條件查詢相應(yīng)信息等功能。</p>

51、;<p>　　圖5.4.4 學(xué)生學(xué)籍變動模塊</p><p><b>　　學(xué)生信息管理模塊</b></p><p>　　本模塊只要錄入修改相應(yīng)的學(xué)生信息(見圖5.5.5)，根據(jù)條件查詢需要的學(xué)生信息，界面清楚，便于操作。</p><p>　　圖5.5.5 學(xué)生學(xué)籍變動模塊</p><p><b>

52、　　成績管理模塊</b></p><p>　　本模塊主要是錄入和修改學(xué)生的成績(見圖5.6.6)，根據(jù)條件查詢需要的學(xué)生成績，界面清楚，便于操作。</p><p>　　圖5.6.6 學(xué)生學(xué)籍變動模塊</p><p><b>　　結(jié)論</b></p><p>　　在本系統(tǒng)的開發(fā)過程中，由于本人是初次開發(fā)軟件，在

53、知識、經(jīng)驗(yàn)方面都存在著不足。另外，在整個(gè)開發(fā)的過程中，時(shí)間也比較倉促。因此，該系統(tǒng)必然會存在一些缺陷和不足。因?yàn)閷芾淼恼麄€(gè)流程不夠熟悉，在需求分析時(shí)未能做到完全滿足用戶的需求。在本次開發(fā)過程由于硬件的限制，未能實(shí)現(xiàn)網(wǎng)絡(luò)功能，因此在以后的系統(tǒng)更新過程中可能會造成一些不必要的數(shù)據(jù)損失。</p><p>　　在在找資料的過程也找了很多關(guān)于http://www.bylw120.com的相關(guān)資料，上面參考了很多的資料。盡

54、管本管理系統(tǒng)存在著很多不足，但其功能全面、易于日后程序更新、數(shù)據(jù)庫管理容易、界面友好、操作方便、效率高、安全性好等優(yōu)點(diǎn)是本管理系統(tǒng)所必需的。相信本管理系統(tǒng)是一套學(xué)校在日常管理中必不可少的管理軟件，通過開發(fā)這個(gè)系統(tǒng)，我掌握了的項(xiàng)本過程，了解了的基本知識鞏固了我對delphi的學(xué)習(xí)，但在這次畢業(yè)設(shè)計(jì)中的最大收獲并不是掌握這幾門開發(fā)工具的應(yīng)用，而是學(xué)會了設(shè)計(jì)系統(tǒng)的思維方法，以及與同學(xué)們之間相互幫助的精神。</p><p&g

55、t;<b>　　參考文獻(xiàn)</b></p><p>　　[1] 周佩德，《數(shù)據(jù)庫原理及應(yīng)用》，出版社：電子工業(yè)出版社，2000年3月，起止頁碼（第105頁～第300頁）</p><p>　　[2] 王要武，《管理系統(tǒng)》，出版社：電子工業(yè)出版社，2001年，起止頁碼（第54頁～第205頁）</p><p>　　[3] 李紅等，《管理信息系統(tǒng)開發(fā)與應(yīng)

56、用》，出版社：電子工業(yè)出版社，2003年，起止頁碼（第70頁～第275頁）</p><p>　　[4] 周之英，《現(xiàn)代軟件工程》，出版社：科學(xué)出版社，1999年，起止頁碼（第79頁～第200頁）</p><p>　　[5] 張曜等，《Delphi函數(shù)實(shí)用手冊》，出版社：冶金工業(yè)出版社，2002年12月，起止頁碼（第37頁～第219頁）</p><p>　　[6] 陳

57、寬達(dá)，《Delphi深度歷險(xiǎn)》，出版社：科學(xué)出版社，2001年7月，起止頁碼（第19頁～第199頁）</p><p>　　[7] 李存斌 汪兵，《Delphi深度編程及其項(xiàng)目應(yīng)用開發(fā)》，出版社：水利水電出版社，2002年11月，起止頁碼（第27頁～第257頁）</p><p>　　[8] 付軍，《Delphi7實(shí)例編程100例》，出版社：中國鐵道出版社，2005年7月，起止頁碼（第30頁～

58、第157頁）</p><p>　　[9] 楊長春，《Delphi編程設(shè)計(jì)教程》，出版社：清華大學(xué)出版社，2005年，起止頁碼（第50頁～第180頁）</p><p>　　[10] 康祥順，《Delphi案例開發(fā)集錦》，出版社：電子工業(yè)出版社，2005年，起止頁碼（第78頁～第176頁）</p><p>　　[11] 羅小平，《Delphi精要》，出版社：電子工業(yè)出版

59、社，2004，起止頁碼（第45頁～第126頁）</p><p>　　[12] 李目海，《Delphi應(yīng)用程序設(shè)計(jì)》，出版社：電子科技大學(xué)出版社，2005年8月，起止頁碼（第1頁～第200頁）</p><p><b>　　附 錄</b></p><p>　　主要編碼過程如下所示：</p><p>　　unit Arch

60、ive;</p><p><b>　　interface</b></p><p><b>　　uses</b></p><p>　　Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,</p><p>　

61、　Dialogs, Buttons, ComCtrls, ToolWin, Menus, ImgList,</p><p>　　ExtCtrls, StdCtrls, DBTables, jpeg;</p><p><b>　　type</b></p><p>　　TMainFrm = class(TForm)</p><

62、p>　　MainMenu1: TMainMenu;</p><p>　　N1: TMenuItem;</p><p>　　NSet: TMenuItem;</p><p>　　N3: TMenuItem;</p><p>　　NPasswd: TMenuItem;</p><p>　　N7: TMenuItem;

63、</p><p>　　NClose: TMenuItem;</p><p>　　N9: TMenuItem;</p><p>　　NstdArc: TMenuItem;</p><p>　　Nstdetail: TMenuItem;</p><p>　　StatusBar1: TStatusBar;</p>

64、<p>　　ImageList1: TImageList;</p><p>　　Image1: TImage;</p><p>　　N2: TMenuItem;</p><p>　　N4: TMenuItem;</p><p>　　Nscore: TMenuItem;</p><p>　　N6: TMen

65、uItem;</p><p>　　N8: TMenuItem;</p><p>　　NUserAdmin: TMenuItem;</p><p>　　Nreg: TMenuItem;</p><p>　　N16: TMenuItem;</p><p>　　N17: TMenuItem;</p><p

66、>　　N18: TMenuItem;</p><p>　　N19: TMenuItem;</p><p>　　N20: TMenuItem;</p><p>　　N21: TMenuItem;</p><p>　　N22: TMenuItem;</p><p>　　N23: TMenuItem;</p>

67、;<p>　　Timer1: TTimer;</p><p>　　N10: TMenuItem;</p><p>　　N12: TMenuItem;</p><p>　　ToolBar1: TToolBar;</p><p>　　SbtnSet: TSpeedButton;</p><p>　　ToolB

68、utton5: TToolButton;</p><p>　　SpeedButton3: TSpeedButton;</p><p>　　SpeedButton9: TSpeedButton;</p><p>　　ToolButton1: TToolButton;</p><p>　　Sbtninfo: TSpeedButton;</p

69、><p>　　ToolButton9: TToolButton;</p><p>　　SpeedButton1: TSpeedButton;</p><p>　　ToolButton2: TToolButton;</p><p>　　SpeedButton2: TSpeedButton;</p><p>　　ToolBut

70、ton3: TToolButton;</p><p>　　SpeedButton5: TSpeedButton;</p><p>　　ToolButton4: TToolButton;</p><p>　　SpeedButton6: TSpeedButton;</p><p>　　ToolButton8: TToolButton;</p

71、><p>　　SpeedButton7: TSpeedButton;</p><p>　　ToolButton6: TToolButton;</p><p>　　SpeedButton8: TSpeedButton;</p><p>　　ToolButton7: TToolButton;</p><p>　　SpeedBu

72、tton4: TSpeedButton;</p><p>　　procedure NCloseClick(Sender: TObject);</p><p>　　procedure NSetClick(Sender: TObject);</p><p>　　procedure FormCreate(Sender: TObject);</p><p

73、>　　procedure Timer1Timer(Sender: TObject);</p><p>　　procedure FormShow(Sender: TObject);</p><p>　　procedure NUserAdminClick(Sender: TObject);</p><p>　　procedure NPasswdClick(Send

74、er: TObject);</p><p>　　procedure N18Click(Sender: TObject);</p><p>　　procedure N19Click(Sender: TObject);</p><p>　　procedure NstdArcClick(Sender: TObject);</p><p>　　pro

75、cedure FormClose(Sender: TObject; var Action: TCloseAction);</p><p>　　procedure NregClick(Sender: TObject);</p><p>　　procedure N16Click(Sender: TObject);</p><p>　　procedure N17Click

76、(Sender: TObject);</p><p>　　procedure NscoreClick(Sender: TObject);</p><p>　　procedure N12Click(Sender: TObject);</p><p>　　procedure N20Click(Sender: TObject);</p><p>　

77、　procedure N21Click(Sender: TObject);</p><p>　　procedure NreglogClick(Sender: TObject);</p><p>　　procedure N6Click(Sender: TObject);</p><p>　　procedure SpeedButton8Click(Sender: TOb

78、ject);</p><p><b>　　private</b></p><p>　　{ Private declarations }</p><p>　　// fuID :String;</p><p>　　procedure SYSLog;</p><p>　　Function re

79、gLog:boolean;</p><p><b>　　public</b></p><p>　　procedure addlogin;</p><p>　　{ Public declarations }</p><p>　　// property _uID :String read fuID Write fuID;&

80、lt;/p><p><b>　　end;</b></p><p><b>　　var</b></p><p>　　MainFrm: TMainFrm;</p><p>　　implementation</p><p>　　uses maind, //數(shù)據(jù)模塊</p>

81、<p>　　frmset,//設(shè)置學(xué)校</p><p>　　UTIL, //公共程序</p><p>　　cLogin,//登錄界面</p><p>　　FUser,//用戶管理</p><p>　　cpasswd,// set password</p><p>　　cFcalss,// class in

82、fo</p><p>　　cLesson,//lesson info</p><p>　　uReg,//register student info</p><p>　　uStatus,//change student status;</p><p>　　uscore,//score input</p><p>　　ua

83、bout,//aboutbox</p><p><b>　　ubackup,</b></p><p><b>　　ustore,</b></p><p>　　csys,//register info</p><p><b>　　UREGINFO,</b></p>

84、<p><b>　　stdArc;</b></p><p>　　{$R *.dfm}</p><p>　　procedure TMainFrm.NCloseClick(Sender: TObject);</p><p><b>　　begin</b></p><p>　　//addlogi

85、n;</p><p>　　Application.Terminate;</p><p><b>　　end;</b></p><p>　　procedure TMainFrm.NSetClick(Sender: TObject);</p><p><b>　　var</b></p>&

86、lt;p>　　syssetFrm:TsyssetFrm;</p><p>　　School,FileName:string;</p><p><b>　　begin</b></p><p>　　if MaindFrm.CheckPermission(UserID,'set')=False then exit;</p&

87、gt;<p>　　syssetFrm := TsyssetFrm.Create(application);</p><p><b>　　try</b></p><p>　　syssetFrm.ShowModal;</p><p><b>　　finally</b></p><p>　　

88、syssetfrm.Free;</p><p><b>　　end;</b></p><p>　　FileName := ExtractFilePath(Application.ExeName)+</p><p>　　'\INI\set.ini';</p><p>　　school := INI_Load

89、_Str2(FileName,'SET','Name','');</p><p>　　Caption :='教務(wù)管理系統(tǒng) || 使用單位：'+school;</p><p><b>　　end;</b></p><p>　　procedure TMainFrm.FormCreate

90、(Sender: TObject);</p><p><b>　　begin</b></p><p>　　IF IsCPUID_Available = FALSE THEN</p><p><b>　　BEGIN</b></p><p>　　SHOWMESSAGE('對不起, 此軟件不適用于

91、您的計(jì)算機(jī)!');</p><p><b>　　CLOSE;</b></p><p><b>　　EXIT;</b></p><p><b>　　END;</b></p><p>　　IF RegKeyCheck('\Software\Intel soft

92、9;)= FALSE THEN</p><p><b>　　begin</b></p><p>　　RegCreate('\Software\Intel soft');</p><p><b>　　end;</b></p><p>　　// SYSLog;</p>&l

93、t;p>　　Timer1.Enabled := true;</p><p>　　//if TEST_OpenFile(FileName) then</p><p>　　statusBar1.Panels.Items[3].Text := '計(jì)算機(jī)種類：'+GetCPUVendor;</p><p><b>　　end;</b&g

94、t;</p><p>　　procedure TMainFrm.SYSLog;</p><p><b>　　begin</b></p><p>　　if not Assigned(MainDFrm) then</p><p>　　Application.CreateForm(TMainDFrm, MainDFrm);&l

95、t;/p><p>　　if not Assigned(FrmLogin) then</p><p>　　Application.CreateForm(TFrmLogin, FrmLogin);</p><p>　　// FrmLogin := TFrmLogin.create(Application);</p><p><b>　　

96、try</b></p><p>　　FrmLogin.ShowModal;</p><p>　　// fuID := UserID;</p><p><b>　　finally</b></p><p>　　FrmLogin.free;</p><p><b>　　end;

97、</b></p><p><b>　　end;</b></p><p>　　procedure TMainFrm.Timer1Timer(Sender: TObject);</p><p><b>　　begin</b></p><p>　　StatusBar1.Panels[1].Te

98、xt :='系統(tǒng)時(shí)間： ' +TimetoStr(Now);</p><p>　　StatusBar1.Panels[2].text :='使用時(shí)間：'+TimeGetStamp(LogTime);</p><p><b>　　end;</b></p><p>　　procedure TMainFrm.FormS

99、how(Sender: TObject);</p><p><b>　　begin</b></p><p><b>　　SYSLog;</b></p><p><b>　　RegLog;</b></p><p>　　if UserID = '' then<

100、/p><p><b>　　begin</b></p><p>　　StatusBar1.Panels[0].Text := '目前沒有用戶登錄,無法使用本程序';</p><p><b>　　end else</b></p><p>　　StatusBar1.Panels[0].Text

101、 := '使用者:'+UserID+ '| '+UserName+</p><p>　　' 登錄時(shí)間：'+ DatetoStr(Date)+' '+LogTime;</p><p><b>　　end;</b></p><p>　　procedure TMainFrm.NUserA

102、dminClick(Sender: TObject);</p><p>　　var FrmUser:TFrmUser;</p><p><b>　　begin</b></p><p>　　if MaindFrm.CheckPermission(UserID,'userada')=False then exit;</p>

103、;<p>　　FrmUser := TFrmUser.Create(Application);</p><p><b>　　try</b></p><p>　　FrmUser.ShowModal;</p><p><b>　　finally</b></p><p>　　FrmUser.

104、Release;</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　procedure TMainFrm.NPasswdClick(Sender: TObject);</p><p><b>　　var</b><

105、;/p><p>　　frmpasswd:Tfrmpasswd;</p><p><b>　　begin</b></p><p>　　if MaindFrm.CheckPermission(UserID,'edtpass')=False then exit;</p><p>　　frmpasswd := Tfr

106、mpasswd.Create(application);</p><p><b>　　try</b></p><p>　　frmpasswd.ShowModal;</p><p><b>　　finally</b></p><p>　　frmpasswd.Free;</p><p

107、><b>　　end;</b></p><p><b>　　end;</b></p><p>　　procedure TMainFrm.N18Click(Sender: TObject);</p><p><b>　　var</b></p><p>　　FrmClass:

108、 TFrmClass;</p><p><b>　　begin</b></p><p>　　if MaindFrm.CheckPermission(UserID,'classada')=False then exit;</p><p>　　FrmClass := TFrmClass.Create(Application);<

109、;/p><p><b>　　try</b></p><p>　　FrmClass.ShowModal;</p><p><b>　　finally</b></p><p>　　FrmClass.Free;</p><p><b>　　end;</b><

110、/p><p><b>　　end;</b></p><p>　　procedure TMainFrm.addlogin;</p><p><b>　　var</b></p><p>　　QLeft:TQuery;</p><p>　　Str:string;</p>

111、<p><b>　　begin</b></p><p>　　Str :=maindFrm.FeedUuser(UserID);</p><p>　　if Str<> '' then</p><p><b>　　begin</b></p><p>　　QLeft

112、 := TQuery.Create(Application.Owner);</p><p><b>　　try</b></p><p>　　QLeft.DatabaseName := 'main';</p><p>　　QLeft.SQL.Clear;</p><p>　　QLeft.SQL.Add(&#

113、39;insert into Loginfo (uID,uUser,LogDate,LogTime,LeftTime)');</p><p>　　QLeft.SQL.Add('values(' );</p><p>　　QLeft.SQL.Add(''''+UserID+''',');</p>

114、;<p>　　QLeft.SQL.Add(''''+Str +''',');</p><p>　　QLeft.SQL.Add(''''+DatetoStr(Date)+''',');</p><p>　　QLeft.Sql.Add(''

115、;''+LogTime+''',');</p><p>　　Qleft.sql.Add(''''+TimetoStr(Time)+''')');</p><p>　　QLeft.Close;</p><p>　　QLeft.ExecSQL;</p&g

116、t;<p><b>　　finally</b></p><p>　　QLeft.Free;</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p><b>　　end;</b></p&

117、gt;<p>　　procedure TMainFrm.N19Click(Sender: TObject);</p><p><b>　　var</b></p><p>　　FrmLession: TFrmLession;</p><p><b>　　begin</b></p><p>

118、;　　if MaindFrm.CheckPermission(UserID,'lessada')=False then exit;</p><p>　　FrmLession := TFrmLession.Create(Application);</p><p><b>　　try</b></p><p>　　FrmLession

119、.Show;</p><p>　　// finally</p><p><b>　　except</b></p><p>　　FrmLession.Free;</p><p><b>　　end;</b></p><p><b>　　end;</b>&

120、lt;/p><p>　　procedure TMainFrm.NstdArcClick(Sender: TObject);</p><p><b>　　var</b></p><p>　　Frmbasic:TFrmbasic;</p><p><b>　　begin</b></p><

121、;p>　　if (sender = Nstdetail) then</p><p>　　tabstatus := 1</p><p><b>　　else</b></p><p>　　tabstatus := 0;</p><p>　　if MaindFrm.CheckPermission(UserID,'

122、stdb001')=False then exit;</p><p>　　Frmbasic := TFrmbasic.Create(Application);</p><p><b>　　try</b></p><p>　　Frmbasic.showmodal;</p><p><b>　　finall

123、y</b></p><p>　　Frmbasic.Free;</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　procedure TMainFrm.FormClose(Sender: TObject; var Action:

124、 TCloseAction);</p><p><b>　　begin</b></p><p><b>　　addlogin;</b></p><p>　　Action := caFree;</p><p><b>　　end;</b></p><p>

125、　　procedure TMainFrm.NregClick(Sender: TObject);</p><p><b>　　var</b></p><p>　　FrmReg: TFrmReg;</p><p><b>　　begin</b></p><p>　　if MaindFrm.CheckP

126、ermission(UserID,'reg001')=False then exit;</p><p>　　FrmReg := TFrmReg.Create(Application);</p><p><b>　　try</b></p><p>　　FrmReg.ShowModal;</p><p>&l

127、t;b>　　finally</b></p><p>　　FrmReg.Free;</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　procedure TMainFrm.N16Click(Sender: TObject)

128、;</p><p><b>　　var</b></p><p>　　FrmStatus: TFrmStatus;</p><p><b>　　begin</b></p><p>　　Tabstatus:= 0;</p><p>　　if MaindFrm.CheckPermi

129、ssion(UserID,'status001')=False then exit;</p><p>　　FrmStatus:= TFrmStatus.Create(Application);</p><p><b>　　try</b></p><p>　　FrmStatus.ShowModal;</p><