基于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國(guó)內(nèi)外發(fā)展概況及存在問(wèn)題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)的功能簡(jiǎn)介4</p><p>　　2.3.1學(xué)生信息管理模塊5</p><p>　　2.3.2學(xué)生成績(jī)管理模塊5</p><p>　　2.3.3學(xué)籍變動(dòng)模塊5</p><p>　　2.3.4基

4、本信息模塊5</p><p>　　2.4系統(tǒng)開(kāi)發(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ù)存儲(chǔ)分析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ù)庫(kù)設(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é)籍變動(dòng)模塊13</p><p>　　5.5學(xué)生信息管理模塊14</p><p>　　5.6成績(jī)管理模塊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)的開(kāi)發(fā)與研究</p><p>　　摘 要 隨著信息技術(shù)在管理上越來(lái)越深入而廣泛的應(yīng)用，教務(wù)管理

9、系統(tǒng)的實(shí)施在技術(shù)上也逐步成熟。教務(wù)管理系統(tǒng)是一個(gè)不斷發(fā)展的學(xué)科,貫穿著整個(gè)教育管理體系。</p><p>　　本文介紹了在DELPHI環(huán)境下采用“自上而下地總體規(guī)劃，自下而上地應(yīng)用開(kāi)發(fā)”的策略開(kāi)發(fā)一個(gè)教務(wù)管理系統(tǒng)的過(guò)程。通過(guò)分析學(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ù)庫(kù)設(shè)計(jì)等；系統(tǒng)實(shí)現(xiàn)部分簡(jiǎn)單介紹了幾個(gè)主要模塊用法。本系統(tǒng)界面友好，操作簡(jiǎn)單，比較實(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ì)初期，既是我國(guó)經(jīng)濟(jì)快速、健康發(fā)展的重要

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

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

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

19、;</p><p>　　國(guó)外從20世紀(jì)70年代就有人研究管理問(wèn)題.直到20世紀(jì)90年代關(guān)于管理問(wèn)題的研究仍然十分活躍。</p><p>　　管理信息系統(tǒng)(MIS)的概念起源很早。在國(guó)外，早在20世紀(jì)30年代，柏德就強(qiáng)調(diào)了決策在組織管理中的作用。50年代，西蒙提出了管理依賴于信息和決策的概念。同一時(shí)代維納發(fā)表了控制論與管理，他把管理過(guò)程當(dāng)成一個(gè)控制過(guò)程。50年代計(jì)算機(jī)已用于會(huì)計(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é)、會(huì)計(jì)學(xué)、統(tǒng)計(jì)學(xué)、經(jīng)濟(jì)學(xué)、管理科學(xué)、計(jì)算機(jī)科學(xué)有著十分密切的聯(lián)系。</p><p><b>　　(2)國(guó)內(nèi)研究現(xiàn)狀</b></p>&l

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

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

23、的比較分析?？墒?，任何東西都不是完美的，它也存在很多缺點(diǎn)：網(wǎng)絡(luò)功能欠缺。本系統(tǒng)沒(méi)有建立網(wǎng)絡(luò)連接，只能單機(jī)運(yùn)行，無(wú)法實(shí)現(xiàn)資源共享。容錯(cuò)性不高，系統(tǒng)的抗錯(cuò)，容錯(cuò)性不高。如必須使用規(guī)范查詢語(yǔ)言，否則系統(tǒng)無(wú)法辨識(shí)執(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é)生，研究?jī)?nèi)容涉及到以下幾方面：</p><p>　?。?）教務(wù)處管理人員可以以管理員的身份登陸，進(jìn)入管理模塊，可以進(jìn)行學(xué)生信息的錄入和查詢，學(xué)生成績(jī)的錄入查詢，學(xué)籍的變動(dòng)以及班級(jí)的設(shè)定和查詢等功能最后是退出系統(tǒng)等操作。 </p><p>　　（2）管理員可以設(shè)定教師用戶，授予相應(yīng)的權(quán)限，對(duì)學(xué)生信息，學(xué)生成績(jī)以及班級(jí)進(jìn)行管

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

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

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

28、　　由于本系統(tǒng)管理的對(duì)象單一,都是在校學(xué)生，且每個(gè)數(shù)據(jù)內(nèi)容具有較強(qiáng)的關(guān)聯(lián)性，涉及的計(jì)算過(guò)程不是很復(fù)雜。因此，比較適合于采用數(shù)據(jù)庫(kù)管理。且學(xué)校用于學(xué)生管理的微機(jī)都是PIII以上的機(jī)器，在存儲(chǔ)量、速度方面都能滿足數(shù)據(jù)庫(kù)運(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開(kāi)發(fā)成功的。目前，數(shù)據(jù)

29、庫(kù)產(chǎn)品較多，每種產(chǎn)品都具有各自的特點(diǎn)和適用范圍，因此，在選擇數(shù)據(jù)庫(kù)時(shí)，應(yīng)考慮數(shù)據(jù)庫(kù)應(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ì)分析工作如果只靠人工來(lái)完成，費(fèi)時(shí)費(fèi)力，還容易出錯(cuò)。隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，計(jì)算機(jī)在日常管理應(yīng)用中迅速普

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

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

32、gt;<p><b>　　學(xué)籍變動(dòng)模塊</b></p><p>　　該模塊對(duì)學(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>　　該模塊是對(duì)班級(jí)的添加和設(shè)置以及對(duì)課程的添加和設(shè)置，自行添

33、加相應(yīng)的課程和班級(jí)，把軟件進(jìn)行了人性化的設(shè)計(jì)。</p><p><b>　　系統(tǒng)開(kāi)發(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ù)管理人員的勞動(dòng)強(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ù)存儲(chǔ)分析：實(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ù)庫(kù)

36、概念設(shè)計(jì)。E-R圖是直觀表示概念模型的工具。在圖中有四個(gè)基本成分，如圖3.2.1：</p><p>　　矩形框：表示實(shí)體類型(考慮問(wèn)題的對(duì)象)。</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圖符號(hào)表示</p><p><b>　　系統(tǒng)E-R圖的設(shè)計(jì)</b></p>

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

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

40、向</b></p><p>　　圖3.3.1流程圖使用符號(hào)</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>　　通過(guò)對(duì)系統(tǒng)的調(diào)研與分析，系統(tǒng)主要應(yīng)完成的功能有：系統(tǒng)管理、學(xué)生信息管理、學(xué)生成績(jī)管理、學(xué)籍變動(dòng)、班級(jí)信息等。</

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覽等操作；總體來(lái)說(shuō)，本系統(tǒng)屬于一個(gè)MIS系統(tǒng)。系統(tǒng)的功能層次圖如圖4.1.1所示。</p><p>　　圖4.1.1功能層次圖</p><p><b>　

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

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

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

46、姓名，年齡，班級(jí)，團(tuán)員，學(xué)期，注冊(cè)時(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>　　本界面的主要功能是為了對(duì)系統(tǒng)進(jìn)行安全性管理(見(jiàn)圖5.1.1)，本系統(tǒng)的用戶名和密碼保存在表中，本系統(tǒng)根據(jù)不同的用戶而設(shè)置了不同的權(quán)限，可以用admin為用戶名和密碼來(lái)登陸本系統(tǒng)。</p><p>　　圖5.1.1 系統(tǒng)登錄界面</p><p><b>　　系統(tǒng)主界面<

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

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

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

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

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

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

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

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

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

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

59、社，2004，起止頁(yè)碼（第45頁(yè)～第126頁(yè)）</p><p>　　[12] 李目海，《Delphi應(yīng)用程序設(shè)計(jì)》，出版社：電子科技大學(xué)出版社，2005年8月，起止頁(yè)碼（第1頁(yè)～第200頁(yè)）</p><p><b>　　附 錄</b></p><p>　　主要編碼過(guò)程如下所示：</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('對(duì)不起, 此軟件不適用于

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 := '目前沒(méi)有用戶登錄,無(wú)法使用本程序';</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><