【正文】 e。 。39。select * from 教師表 where 年齡=39。 :=true。 。39。select * from 教師表 where 電話=39。 :=true。 。39。select * from 教師表 where 專業(yè)=39。 :=true。 。39。select * from 教師表 where 住址=39。 :=true。 。39。select * from 教師表 where 姓名=39。 :=true。 。39。select * from 教師表 where 教師號(hào)=39。procedure (Sender: TObject)。{$R *.dfm}procedure (Sender: TObject)。 procedure Button3Click(Sender: TObject)。 procedure Button5Click(Sender: TObject)。 Edit12: TEdit。 ComboBox3: TComboBox。 Label13: TLabel。 Edit9: TEdit。 DBGrid1: TDBGrid。 Edit8: TEdit。 Edit6: TEdit。 Edit4: TEdit。 Edit2: TEdit。type TForm4 = class(TForm) Label1: TLabel。 :=true。 (39。刪除學(xué)生記錄成功！39。 39。39。 。)。 。39。delete from 學(xué)生表 where 年齡=39。 :=true。 (39。刪除學(xué)生記錄成功！39。 39。39。 。)。 。39。delete from 學(xué)生表 where 籍貫=39。 :=true。 (39。刪除學(xué)生記錄成功！39。 39。39。 。)。 。39。delete from 學(xué)生表 where 學(xué)號(hào)=39。procedure (Sender: TObject)。)。 。39。,39。39。39。,39。39。39。 ,39。39。 。 :=true。39。39。++39。 (39。修改學(xué)生信息記錄成功！39。39。39。39。 where 性別=39。39。 。)。++39。39。39。 。39。 and 學(xué)號(hào)=39。39。39。update 學(xué)生表 set 年齡=39。 :=true。39。39。++39。 (39。修改學(xué)生信息記錄成功！39。39。39。39。 where 專業(yè)=39。39。 。 )。++39。 (39。修改學(xué)生信息記錄成功！39。39。39。39。 where 籍貫=39。39。 。)。++39。 (39。修改學(xué)生信息記錄成功！39。39。39。39。update 學(xué)生表 set 姓名=39。procedure (Sender: TObject)。對(duì)不起，沒(méi)有此性別，請(qǐng)重新輸入39。39。39。 。對(duì)不起，沒(méi)有此年齡，請(qǐng)重新輸入39。39。39。 。對(duì)不起，沒(méi)有此專業(yè)，請(qǐng)重新輸入39。39。39。 。對(duì)不起，沒(méi)有此籍貫，請(qǐng)重新輸入39。39。39。 。對(duì)不起，沒(méi)有此姓名，請(qǐng)重新輸入39。39。39。 。對(duì)不起，沒(méi)有此學(xué)號(hào)，請(qǐng)重新輸入39。39。39。 。var Form3: TForm3。 procedure Button3Click(Sender: TObject)。 Button4: TButton。 Edit10: TEdit。 Button3: TButton。 Label11: TLabel。 Button2: TButton。 Label8: TLabel。 Edit5: TEdit。 Edit3: TEdit。 Edit1: TEdit。end.unit Unit3。procedure (Sender: TObject)。procedure (Sender: TObject)。end。end。implementationuses Unit3, Unit4, Unit5, Unit6。 procedure N6Click(Sender: TObject)。 Label2: TLabel。 N5: TMenuItem。 N1: TMenuItem。end。 end。)。)。+password+39。39。39。 end else begin 。39。 then begin ShowMessage(39。beginusername :=trim()。var Form1: TForm1。 ADOConnection1: TADOConnection。 Button1: TButton。 Label1: TLabel。 通過(guò)自己查詢相關(guān)書藉和對(duì)網(wǎng)絡(luò)資源的利用，可以讓我們對(duì)Borland Delphi 7 和Microsoft SQL Server 2000這兩個(gè)開(kāi)發(fā)工具有了具體的了解，從而上升到運(yùn)用的層次；同時(shí)了解了開(kāi)發(fā)一個(gè)系統(tǒng)所要做的具體工作。 圖43學(xué)生信息錄入圖44課程信息編輯，此界面由于是修改和刪除界面所以所有的數(shù)據(jù)綁定控件均為文本框，每一個(gè)文本框都與課程表的一個(gè)字段進(jìn)行綁定。5) 結(jié)束。4. 刪除記錄1) 用戶輸入要?jiǎng)h除的學(xué)生的學(xué)號(hào)或姓名。3) 如找不到，則不顯示。3) 若找不到，則不顯示。4) 當(dāng)檢查正確后將在錄入表單的數(shù)據(jù)插入到學(xué)生基本信息數(shù)據(jù)庫(kù)表文件中。首先系統(tǒng)判斷用戶在主菜單上所輸入的功能選擇碼是否合法，并根據(jù)選擇碼進(jìn)入相應(yīng)功能模塊。表結(jié)構(gòu)如下：學(xué)生表操作(student)課程表(course) 教師表(teacher) 用戶表(login) 在對(duì)話設(shè)計(jì)的過(guò)程中遵循了對(duì)話設(shè)計(jì)的原則：1．對(duì)話要清楚、沒(méi)有二義性。下圖是學(xué)生表操作系統(tǒng)各個(gè)實(shí)體的ER圖。2．修改和刪除當(dāng)用戶進(jìn)入修改和刪除窗口時(shí)，編輯窗口中的數(shù)據(jù)綁定型控件都與學(xué)生基本信息表中的字段進(jìn)行綁定。中南大學(xué)教學(xué)管理系統(tǒng)分為學(xué)生表操作、教師表操作，課程表，安全退出七個(gè)子系統(tǒng)。軟件接口運(yùn)行于Windows9X及更高版本具有WIN32API的操作系統(tǒng)上3．1．概要設(shè)計(jì)針對(duì)以上系統(tǒng)要完成的功能，本系統(tǒng)總體設(shè)計(jì)采用自頂向下，逐步細(xì)化的方法將功能層次結(jié)構(gòu)的各個(gè)部分組合起來(lái)，以完成整個(gè)系統(tǒng)的實(shí)現(xiàn)細(xì)節(jié)。2．2．業(yè)務(wù)流程圖經(jīng)過(guò)系統(tǒng)的調(diào)查與系統(tǒng)分析得到學(xué)生基本信息的基本業(yè)務(wù)流程圖如下：添加信息查詢結(jié)果刪除信息刪除模塊修改信息查詢信息教務(wù)信息管理數(shù)據(jù)庫(kù)添加模塊修改模塊查詢模塊添加結(jié)果 ，圖中表明在學(xué)生管理模塊中要建立一個(gè)學(xué)生數(shù)據(jù)庫(kù)，學(xué)生管理工作中的輸入、編輯和查詢都與此數(shù)據(jù)庫(kù)發(fā)生業(yè)務(wù)。系統(tǒng)的基本數(shù)據(jù)流動(dòng)為教務(wù)數(shù)據(jù)的輸入,學(xué)生信息,課程信息,教師信息，授課信息，班級(jí)信息，選修信息，系部信息和用戶信息的添加與修改,以及有關(guān)用戶提出的對(duì)教務(wù)信息查詢要求所產(chǎn)生的數(shù)據(jù)輸出。對(duì)于一個(gè)基于計(jì)算機(jī)系統(tǒng)的研制項(xiàng)目要在經(jīng)濟(jì)方面評(píng)價(jià)其是否合理，成本－－效益分析要估計(jì)出研制開(kāi)發(fā)的花費(fèi)并與收益（包括有形的可以用貨幣計(jì)數(shù)的及無(wú)形的利益）衡量比較。（4）能提供分布式數(shù)據(jù)庫(kù)功能。只是實(shí)現(xiàn)了對(duì)信息的基本處理功能。關(guān)鍵詞：管理, 一致性, 完整性, 安全性目錄摘 要 2 5 5 5 6 6 6 6. 業(yè)務(wù)流程圖 7. 系統(tǒng)功能分解圖 8．系統(tǒng)分析邀請(qǐng) 8 8 8 8 93．1．概要設(shè)計(jì) 9 9 10 11 11 11 14 15 16 16 17 17 18 19 20 21 21 21參考文獻(xiàn) 21附錄 22 本系統(tǒng)作為大三第一學(xué)期《數(shù)據(jù)庫(kù)技術(shù)》課程的作業(yè)。其開(kāi)發(fā)主要包括前端應(yīng)用程序的開(kāi)發(fā)以及后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù)兩個(gè)方面。每個(gè)管理模塊都包括數(shù)據(jù)查詢、修改、刪除、添加等功能，中南大學(xué)教學(xué)管理系統(tǒng)能高效、準(zhǔn)確地完成這些功能，并達(dá)到界面美觀友好、使用方便。實(shí)現(xiàn)的方法主要用Borland Delphi 7和Microsoft公司的 SQL Server 2000 開(kāi)發(fā)工具來(lái)完成界面與數(shù)據(jù)庫(kù)的開(kāi)發(fā)工作。因?yàn)闀r(shí)間不足，而且第一次接觸Borland Delphi 7和Mircosoft SQL Server 2000這兩個(gè)開(kāi)發(fā)工具，所以并沒(méi)有設(shè)立權(quán)限，也沒(méi)有建立索引和視圖等來(lái)優(yōu)化系統(tǒng)功能。（3）數(shù)據(jù)安全，保安型高。經(jīng)濟(jì)可行性估計(jì)開(kāi)發(fā)費(fèi)用以及最終從開(kāi)發(fā)成功的系統(tǒng)所獲得的收入或利益,衡量比較支出的費(fèi)用和收到的利益。開(kāi)發(fā)該軟件的基本要求與功能是實(shí)現(xiàn)教務(wù)信息數(shù)據(jù)的管理與操作處理,基于數(shù)據(jù)庫(kù)系統(tǒng)的數(shù)據(jù)管理使該軟件有更優(yōu)異的性能。就目前使用的開(kāi)發(fā)技術(shù)來(lái)說(shuō)系統(tǒng)的功能目標(biāo)應(yīng)該能夠達(dá)到；利用現(xiàn)有的技術(shù)在規(guī)定的期限內(nèi)開(kāi)發(fā)工作基本能夠完成。必須對(duì)鼠標(biāo)和鍵盤單獨(dú)支持硬件接口支持一般奔騰Ⅲ,128兆以上內(nèi)存的pc機(jī)。本模塊又分為三個(gè)子模塊： （1）學(xué)生信息添加 （2）學(xué)生信息查詢 （3）學(xué)生信息編輯(修改/刪除)2．教師表操作，課程表模塊和學(xué)生表操作模塊功能相似。 一、用戶管理模塊 在用戶管理模塊中又把此模塊分為三個(gè)小的模塊分別為：1．添加 在輸入模塊中通過(guò)在表單中的一個(gè)確定按鈕使得用戶在界面中通過(guò)鍵盤或通過(guò)標(biāo)輸入的數(shù)據(jù)插入到數(shù)據(jù)庫(kù)中的學(xué)生基本信息表中，通過(guò)退出按鈕結(jié)束學(xué)生信息的添加。一、數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)這一設(shè)計(jì)階段是在需求分析的基礎(chǔ)上,設(shè)計(jì)出能夠滿足用戶需求的各種實(shí)體,以及它們之間的關(guān)系,為后面的邏輯結(jié)構(gòu)設(shè)計(jì)打下基礎(chǔ),可以用實(shí)體關(guān)系模型來(lái)描述.實(shí)體關(guān)系模型(Entityrelationship Mode,簡(jiǎn)稱ER模型),菱形表示實(shí)體之間的聯(lián)系,聯(lián)系的類型可以用1:1或1:M或M：N表示，圓角矩形表示實(shí)體的有關(guān)屬性，橢圓表示實(shí)體的具體屬性。設(shè)計(jì)一個(gè)項(xiàng)目，項(xiàng)目名為教務(wù)管理信息系統(tǒng)并在此項(xiàng)目中創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)，數(shù)據(jù)庫(kù)名為EducationManagerSystem此數(shù)據(jù)庫(kù)中包含學(xué)生、課程、教師、用戶表。4．注意詢問(wèn)格式的美觀、實(shí)用，而且采用了統(tǒng)一的格式，體現(xiàn)了一定的風(fēng)格。3) 檢查錯(cuò)誤時(shí)，彈出一個(gè)錯(cuò)誤的對(duì)話框并提示用戶如何操作。2) 系統(tǒng)根據(jù)用戶輸入的學(xué)生的學(xué)號(hào)先從學(xué)生基本信息數(shù)據(jù)庫(kù)表文件中讀出該記錄。2) 系統(tǒng)根據(jù)用戶輸入的學(xué)號(hào)或名字先從學(xué)生基本信息數(shù)據(jù)庫(kù)表文件中讀出該記錄。6) 結(jié)束。4) 從主文件中刪除該記錄。 圖42 登陸界面在其界面中系統(tǒng)管理名與系統(tǒng)管理員口令都運(yùn)用了文本框讓使用者輸入其目的就增加其保密性。三．沒(méi)有建立索引等來(lái)優(yōu)化系統(tǒng)功能。type TForm1 = class(TForm) Image1: TImage。 Edit2: TEdit。 DataSource1: TDataSource。