【導(dǎo)讀】務(wù)信息的管理，并詳細(xì)論述了使用Delphi7進(jìn)行信息管理系統(tǒng)的設(shè)計(jì)開(kāi)發(fā)方法。系統(tǒng)采用C／S架構(gòu)的雙層結(jié)構(gòu)模式。文中也著重介紹了Delphi7的ADO技術(shù)、Excel讀寫(xiě)控制、SQL編程、SQLServer2021中。的存儲(chǔ)過(guò)程、視圖等相關(guān)技術(shù)。補(bǔ)考記分冊(cè)的Excel文檔導(dǎo)入導(dǎo)出。為什么選用SQLServer2021作為數(shù)據(jù)庫(kù)設(shè)計(jì)工具。

　　

【正文】 實(shí)現(xiàn)效果如圖 － 13 所示。 圖 － 13 報(bào)表格式 iii. 導(dǎo)出的 補(bǔ)考 記分冊(cè) Excel 文件的格式 如 圖 — 14 所示。 圖 — 14 補(bǔ)考記分冊(cè) Excel 文檔格式 4） . 補(bǔ)考成績(jī)的自動(dòng) Excel 導(dǎo)入 補(bǔ)考成績(jī)的自動(dòng) Excel 導(dǎo)入 窗體實(shí)現(xiàn)效果 如 圖 － 15 所示。 37 圖 — 15 補(bǔ)考成績(jī)的自動(dòng) Excel 導(dǎo)入 窗體 成績(jī) 錄入 、補(bǔ)考成績(jī) 錄入 與上 一節(jié)類(lèi)似，成績(jī)的 手工錄入 模塊 與補(bǔ)考成績(jī)的 手工錄入模塊的 功能及程序流程也是相似的，只是他們各自所管理的數(shù)據(jù)并不相同，成績(jī)錄入管理學(xué)生的正考成績(jī)信息，而補(bǔ)考錄入則是管理學(xué)生的補(bǔ)考成績(jī)信息 ，因此程序中所引用的數(shù)據(jù)表字段就不一樣 ，而且成績(jī)錄入的方式也不相同 。但由于它們的功能及流程都及其相似，因此將它們的設(shè)計(jì)放在同一節(jié)進(jìn)行論述， 并對(duì)其不同之處加以說(shuō)明。 1） . 成績(jī)的手工錄入模塊功能 此模塊功能是通過(guò)手工對(duì)成績(jī) 信息進(jìn)行添加、修改、刪除、錄入，在進(jìn)行成績(jī)錄入、 38 修改時(shí)，可以選擇成績(jī)的錄入方式（定量或者是定性），還可以修改考試時(shí)間。 i. 學(xué)號(hào)、姓名搜索 通過(guò)輸入學(xué)號(hào)或姓名查找到學(xué)生的成績(jī)信息以進(jìn)行成績(jī)管理。 ii. 添加記錄 添加一條在數(shù)據(jù)庫(kù)中沒(méi)有選修這門(mén)課的新記錄，并將相關(guān)信息存入整個(gè)數(shù)據(jù)庫(kù)。 iii. 刪除記錄 只刪除原記錄中某一學(xué)生的某一門(mén)課程的成績(jī)信息，但不刪除學(xué)生的其他信息。 iv. 錄入 手工錄入已在數(shù)據(jù)庫(kù)中的學(xué)生的某一門(mén)課程的成績(jī)信息，包括考試時(shí)間、成績(jī)、錄入方式。 2） . 補(bǔ)考成績(jī)的手工錄入模塊功能 此模塊功能是通過(guò)手工對(duì) 補(bǔ)考 成績(jī)信息進(jìn)行錄入，在進(jìn)行 補(bǔ)考 成績(jī)錄入、修改時(shí)，可以選擇 補(bǔ)考 成績(jī)的錄入方式（定量或者是定性），還可以修改考試時(shí)間。 i. 學(xué)號(hào)、姓名搜索 通過(guò)輸入學(xué)號(hào)或姓名查找到學(xué)生的 補(bǔ)考 成績(jī)信息以進(jìn)行成績(jī)管理。 ii. 錄入 手工錄入已在數(shù)據(jù)庫(kù)中的學(xué)生的某一門(mén)課程的 補(bǔ)考 成績(jī)信息，包括考試時(shí)間 、成績(jī)、錄入方式。補(bǔ)考有三次機(jī)會(huì)，因此補(bǔ)考成績(jī)也分為補(bǔ)考成績(jī) 補(bǔ)考成績(jī) 補(bǔ)考成績(jī) 3三個(gè)記錄，當(dāng)選定一個(gè)記錄時(shí)，如選擇錄入“補(bǔ)考成績(jī) 1”時(shí)，“補(bǔ)考成績(jī) 2”和“補(bǔ)考成績(jī) 3”兩條記錄都不能錄入。 程 1） .成績(jī)手工錄入模塊程序流程圖如圖 － 1 所示。 39 圖 － 1 成績(jī)手工錄入模塊 程序流程 2） . 補(bǔ)考成績(jī)手工錄入流程如圖 — 2 所示。 圖 — 2 補(bǔ)考成績(jī)手工錄 入流程 40 3. 各模塊引用的相關(guān)表及其字段 1） . 成績(jī)手工錄入模塊 表名 字段 Dept YXDM（院 系代碼）、 YXMC（院系名稱(chēng)） Major ZYDM（專(zhuān)業(yè)代碼）、 ZYMC（專(zhuān)業(yè)名稱(chēng)） Student XH（學(xué)號(hào)）、 XM（姓名）、 RXNF（入學(xué)年份，即年級(jí)） Class BJDM（班級(jí)代碼）， BJMC（班級(jí)名稱(chēng)） Lecrure KCDM（課程代碼）， KCMC（課程名稱(chēng)） Score CJ（成績(jī)）， XN（學(xué)年）， XQ（學(xué)期）， BKCJ1（補(bǔ)考成績(jī) 1）、 BKRQ1（補(bǔ)考日期 1）、 BKCJ2（補(bǔ)考成績(jī) 2）、 BKRQ2（補(bǔ)考日期 2）、 BKCJ3（補(bǔ)考成績(jī) 3）、 BKRQ3（補(bǔ)考日期 3）、 ZB（是否作弊 ）、 HK（是否緩考） 2） . 補(bǔ)考成績(jī)手工錄入模塊 表名 字段 Dept YXDM（院系代碼）、 YXMC（院系名稱(chēng)） Major ZYDM（專(zhuān)業(yè)代碼）、 ZYMC（專(zhuān)業(yè)名稱(chēng)） Student XH（學(xué)號(hào)）、 XM（姓名）、 RXNF（入學(xué)年份，即年級(jí)） Class BJDM（班級(jí)代碼）， BJMC（班級(jí)名稱(chēng)） Lecrure KCDM（課程代碼）， KCMC（課程名稱(chēng)） Score CJ（成績(jī)）， XN（學(xué)年）， XQ（學(xué)期）， BKCJ1（補(bǔ)考成績(jī) 1）、 BKRQ1（補(bǔ)考日期 1）、 BKCJ2（補(bǔ)考成績(jī) 2）、 BKRQ2（補(bǔ)考日期 2）、 BKCJ3（補(bǔ)考成績(jī) 3）、 BKRQ3（補(bǔ)考日期 3）、 ZB（是否作弊）、 HK（是否緩考） 41 效果 1） .成績(jī)錄入模塊程序?qū)崿F(xiàn) i. 成績(jī)手工錄入 窗體 實(shí)現(xiàn) 效果 如 圖 － 3 所示。 圖 — 3 成績(jī)的手工錄入 界面 ii. 學(xué)號(hào)搜索 實(shí)現(xiàn)效果如圖 － 4 所示。 圖 － 4 學(xué)號(hào)搜索 iii. 添加記錄 42 在“添加記錄”的 Click 事件中， 是以選中當(dāng)前“課程列表”中的某一條記錄為前提的，在點(diǎn)擊“添加記錄”按鈕后，可在當(dāng)前記錄的最后一列添加一個(gè)學(xué)生的信息（包括姓名、學(xué)號(hào)、成 績(jī)、考試時(shí)間等基本信息），效果如圖 — 5 所示。 圖 — 5 添加記錄 iv. 錄入 選中當(dāng)前“課程列表”中的某一條記錄，將其數(shù)據(jù)庫(kù)中 Score 表的中的 CJ（成績(jī)）字段進(jìn)行錄入，使當(dāng)前輸入數(shù)據(jù)覆蓋原數(shù)據(jù)。效果 如 圖 － 6 所示。 圖 － 6 “錄入”模塊圖 v. “成績(jī)記錄方式 ”及“考試日期” 實(shí)現(xiàn)效果如圖 － 7 所示。 圖 － 7 成績(jī)記錄方式及考試日期 在添加記錄和錄入成績(jī)前，必須先選擇成績(jī)記錄方式和考試日期，以確定成績(jī)的記錄 43 方式，只要在“添加記錄”和“錄入”的 Click 事件中預(yù)先確定 Score 表中的 CJ（成績(jī)）字段和 KSRQ（考試日期）就可以實(shí)現(xiàn)。 2） .補(bǔ)考成績(jī)錄入模塊程序?qū)崿F(xiàn) i. 補(bǔ)考成績(jī)手工錄入窗體 實(shí)現(xiàn)效果 如 圖 － 8 所示 。 圖 － 8 補(bǔ)考成績(jī)手工錄 入窗體 ii. “成績(jī)記錄方式”、“補(bǔ)考日期” 、 “補(bǔ)考次數(shù)” 實(shí)現(xiàn)效果如圖 － 9 所示。 圖 － 9 “成績(jī)記錄方式”、“補(bǔ)考日期” 、 “補(bǔ)考次數(shù)” 在添加記錄和錄入成績(jī)前，必須先選擇成績(jī)記錄方式和考試日期，以確定成績(jī)的記錄 44 方式，只要在 “錄入”的 Click 事件中預(yù)先確定 Score 表中的 BKCJ（補(bǔ)考成績(jī)）字段和BKRQ（補(bǔ)考日期）就可以實(shí)現(xiàn)。 等級(jí)考試成績(jī)錄入模塊 此模塊功能是通過(guò)手工對(duì)等級(jí)考試成績(jī)信息進(jìn)行添加、修改、刪除、錄入。 學(xué)號(hào)、姓名搜索 是 通過(guò)輸入 學(xué)號(hào)或姓名查找到學(xué)生的等級(jí)考試成績(jī)信息以進(jìn)行等級(jí)考試成績(jī)管理。 1） .等 級(jí)考試成績(jī)錄入模塊程序流程如圖 — 1 所示。 圖 — 1 等級(jí)考試成績(jī)錄入模塊 程序流程圖 45 2） .本 模塊 所涉及信息表及其字段 表名 字段 Dept YXDM（院系代碼）、 YXMC（院系名稱(chēng)） Major ZYDM（專(zhuān)業(yè)代碼）、 ZYMC（專(zhuān)業(yè)名稱(chēng)） Student XH（學(xué)號(hào)）、 XM（姓名）、 RXNF（入學(xué)年份，即年級(jí)）、 ZXWYYZ（主修外語(yǔ)語(yǔ)種）、 WYDJ（外語(yǔ)等級(jí)）、 JSJDJ（計(jì)算機(jī)等級(jí)）、 BZ（備注） Class BJDM（班級(jí)代碼）， BJMC（班級(jí)名稱(chēng)） 效果 1） . 等級(jí)考試成績(jī)錄入 實(shí)現(xiàn)效果 如圖 － 2 所示。 圖 － 2 等級(jí)考試成績(jī)錄入窗體 2） .學(xué)號(hào)、姓名搜索 實(shí)現(xiàn)效果 如圖 － 3 所示。 46 圖 － 3 學(xué)號(hào)搜索 學(xué)號(hào)、姓名的搜索過(guò)程都是一樣的，只是搜索的字段不同，學(xué)號(hào)的搜索字段為 Student表中的 XH 字段，姓名的為 Student 表中的 XM 字段 ，這里以學(xué)號(hào)搜索為例。 期末成績(jī)通知單打印模塊 本模塊功能是查詢(xún) 到符合查詢(xún)條件的學(xué)生期末成績(jī)并打印出來(lái)。 程 1） .期末成績(jī)通知單打印流程如圖 — 1 所示。 圖 — 1 期末成績(jī)通知單打印 流程 47 2） . 本 模塊 所涉及信息表及其字段 表名 字段 Dept YXDM（院系代碼）、 YXMC（院系名稱(chēng)） Major ZYDM（專(zhuān)業(yè)代碼）、 ZYMC（專(zhuān)業(yè)名稱(chēng)） Student XH（學(xué)號(hào)）、 XM（姓名）、 RXNF（入學(xué)年份，即年級(jí)） Class BJDM（班級(jí)代碼）， BJMC（班級(jí)名稱(chēng)） Score CJ（成績(jī)）， XN（學(xué)年）， XQ（學(xué)期）、 ZB（是否作弊）、 HK（是否緩考） 效果 1） . 期末成績(jī)通知單打印 窗體實(shí)現(xiàn) .期末成績(jī)通知單打印窗體實(shí)現(xiàn)效果如圖 — 2 所示。 圖 — 2 期末成績(jī)通知單打印 窗體 2） . 期末成績(jī)通知單打印預(yù)覽頁(yè)面 期末成績(jī)通知單打印預(yù)覽效果如圖 － 3 所示。 48 圖 － 3 期末成績(jī)通知單打印 成績(jī)查詢(xún)模塊 本模塊功能是查詢(xún)及打印歷年成績(jī) ，成績(jī)包括專(zhuān)業(yè)課程成績(jī)和等級(jí)考試成績(jī)。 1） .成績(jī)查詢(xún)模塊 程序流程 如 圖 — 1 所示。 49 圖 — 1 成績(jī)查詢(xún)模塊 程序流程 2） . 本 模塊 所涉及信息表及其字段 表名 字段 Dept YXDM（院系代碼）、 YXMC（院系名稱(chēng)） Major ZYDM（專(zhuān)業(yè)代碼）、 ZYMC（專(zhuān)業(yè)名稱(chēng)） Student XH（學(xué)號(hào)）、 XM（姓名）、 RXNF（入學(xué)年份，即年級(jí)） 、 ZXWYYZ（主修外語(yǔ)語(yǔ)種）、 WYDJ（外語(yǔ)等級(jí)）、 JSJDJ（計(jì)算機(jī)等級(jí)） Class BJDM（班級(jí)代碼）， BJMC（班級(jí)名稱(chēng)） Score CJ（成績(jī)）， XN（學(xué)年）， XQ（學(xué)期）、 BKCJ1（補(bǔ)考成績(jī) 1）、 BKRQ1（補(bǔ)考日期 1） 、 BKCJ2（補(bǔ)考成績(jī) 2）、 BKRQ2（補(bǔ)考日期 2）、 BKCJ3（補(bǔ)考成績(jī) 3）、 BKRQ3（補(bǔ)考日期 3）、 ZB（是否作弊）、 HK（是否緩考）、 BZ（備注） 50 效果 1） .成績(jī)查詢(xún)模塊 窗體實(shí)現(xiàn)效果如圖 — 2 所示。 圖 — 2 成績(jī)查詢(xún)模塊 窗體 2） .選擇學(xué)生范圍 實(shí)現(xiàn)效果如圖 — 3 所示。 圖 — 3 選擇學(xué)生范圍 當(dāng)選擇下一級(jí)時(shí)，如果上一級(jí)為空，則下一級(jí)不能顯示，如此類(lèi)推。 3） .學(xué)生 列表 51 實(shí)現(xiàn)效果如圖 — 4 所示。 圖 — 4 學(xué)生列表 4） .等級(jí) 考試成績(jī) 實(shí)現(xiàn)效果如圖 — 5 所示 圖 — 5 等級(jí)考試成績(jī)顯示 5） ..打印 打印頁(yè)面實(shí)現(xiàn)效果如圖 — 6 所示。 52 圖 — 6 歷年成績(jī)打印報(bào)表格式 成績(jī)相關(guān)字典維護(hù)模塊 成績(jī)相關(guān)字典主要是計(jì)算機(jī)等級(jí)、外語(yǔ)等級(jí)兩個(gè)字段的維護(hù)。 1） .成績(jī)相關(guān)字典維護(hù) 流程如圖 — 1 所示。 圖 — 1 成績(jī)相關(guān)字典維護(hù) 流程 53 2） . 本 模塊 所涉及信息表及其字段 TZDDM 表： zddmdm(字典代碼代碼 ),zddmmc(字典代碼 名稱(chēng) ) 效果 1） . 主窗體實(shí)現(xiàn) 程序?qū)崿F(xiàn)效果 如圖 － 2 所示。 圖 － 2 成績(jī)相關(guān)字典維護(hù) 窗體 2） .“ 字典列表 ”實(shí)現(xiàn) 設(shè)置其 DBListBox 的 Items 為計(jì)算機(jī)等級(jí)和外語(yǔ)等級(jí)兩相，并將其分別與 T_ZDDM 表中的字段“ JSJDJ”、“ WYDJ”相連接。 3） . “ 增加、刪除、保存 ”實(shí)現(xiàn) 可放入一個(gè) DBNavigator 控件，然后與 dsZDMC 相連接，就可實(shí)現(xiàn)。也可以使用 Button控件 并編寫(xiě)代碼實(shí)現(xiàn) ，但實(shí)現(xiàn)效果是相同的。 54 結(jié)論 當(dāng)前雖然有很多的教學(xué)管理類(lèi)軟件，但 功能大多不完善，且系統(tǒng)的界面設(shè)計(jì)不是太符合人體工學(xué)的構(gòu)造，就是界面不夠友善。而本系統(tǒng)在需求分析的階段就比較全面，實(shí)現(xiàn)了包括從新生入學(xué)到畢業(yè)的所有教學(xué)管理。使用 Delphi 進(jìn)行編程的優(yōu)點(diǎn)不單在于它的使用靈活，功能強(qiáng)大，同時(shí)它的可視化編程界面也是一大特色，用它開(kāi)發(fā)的軟件界面非常友善。 本軟件在開(kāi)發(fā)過(guò)程中使用了 Delphi SqlServer202 C ／ S 架構(gòu) 等一序列技術(shù)，但由于對(duì)所用技術(shù)的不熟練，導(dǎo)致了許多設(shè)計(jì)想法沒(méi)有實(shí)現(xiàn) 。 在這次 的畢業(yè)設(shè)計(jì)開(kāi)發(fā) 中 ，我們大量使用了 ADO 技術(shù)， 可以看出，使用 Delphi7 進(jìn)行 數(shù)據(jù)庫(kù)編程重點(diǎn)在于怎樣對(duì) ADO 控件進(jìn)行編程。通俗的講， ADO 一個(gè) 統(tǒng)一數(shù)據(jù)庫(kù)接口 ，它的兩端可以連接不同類(lèi)型的數(shù)據(jù)庫(kù)，對(duì)于 ADO（ ActiveX Data Object， ActiveX 數(shù)據(jù)對(duì)象） 這個(gè) 微軟提出的新 標(biāo)準(zhǔn)，從理論上來(lái)，能夠支持任何類(lèi)型的數(shù)據(jù)庫(kù)（甚至包括流式數(shù)據(jù)） 。 通過(guò) ADO 進(jìn)行數(shù)據(jù)庫(kù)訪(fǎng)問(wèn)的難點(diǎn)一個(gè)如何在 Delphi 程序中調(diào)用 SQL 查詢(xún)語(yǔ)句，另一個(gè)就是如何通過(guò) ADO 與其他類(lèi)型的數(shù)據(jù)庫(kù)（或數(shù)據(jù)庫(kù)文件）互相訪(fǎng)問(wèn)。對(duì)前一個(gè)問(wèn)題，解決的辦法一個(gè)是在 Delphi 程序中重載 SQL 語(yǔ)句，一個(gè)辦法是通過(guò) Parameters 參數(shù)進(jìn)行調(diào)用。而關(guān)于通過(guò) ADO 與其他類(lèi)型的數(shù)據(jù)庫(kù)（或數(shù)據(jù)庫(kù)文件）互相訪(fǎng)問(wèn)的問(wèn)題， 主要是集中在對(duì) Excel 的操控 上。 關(guān)于如何在 Delphi 中進(jìn)行 Excel 控制的問(wèn)題 ，對(duì) ADO、 Exc