【導(dǎo)讀】圖書(shū)館作為一個(gè)信息資源的集散地，包含很多信息數(shù)據(jù)的管理。若圖書(shū)館采取手工。處理的工作量非常大，同時(shí)也就影響了圖書(shū)館整體的管理效率。因此，人們希望使用一。個(gè)有效的圖書(shū)管理系統(tǒng)，用以提高圖書(shū)館的日常工作效率。在這樣的背景下，本文針對(duì)。在本文中，給出了該系統(tǒng)的整個(gè)系統(tǒng)分析、設(shè)計(jì)以及實(shí)現(xiàn)。管理人員三者的共同需求。

　　

【正文】 、出生日期、班級(jí)、登記日期。 進(jìn)入該模塊點(diǎn)擊添加按鈕，在輸入信息框中輸入讀者檔案信息，點(diǎn)擊確定即完成添加操作。 進(jìn)入該模塊點(diǎn)擊修改按鈕，即可修改讀者的基本信息，點(diǎn)擊確定即可完成修改操作。 進(jìn)入該模塊點(diǎn)擊刪除按鈕，點(diǎn)擊要?jiǎng)h除的讀者的基本，點(diǎn)擊確定即可完成修改操作。 代碼 說(shuō)明 ： 實(shí)現(xiàn)保存功能的代碼如下 ： 41 procedure (Sender: TObject)。 begin with do //使用 DM 中的 qryDzxxb begin Edit。 FieldByName(39。讀者編號(hào) 39。).AsString:= trim()。 //修改數(shù)據(jù)庫(kù)中的值，改為 edit、 bobox 中的值 FieldByName(39。讀者姓名 39。).AsString:=trim()。 FieldByName(39。性別 39。).AsString:=trim()。 FieldByName(39。出生日期 39。).AsDateTime:=。 FieldByName(39。班級(jí) 39。).AsString:=trim()。 FieldByName(39。用戶(hù)權(quán)限 39。).AsString:=trim()。 FieldByName(39。登記日期 39。).AsDateTime:=。 Post。 (39。保存成功！ 39。,39。提示 39。,64)。 //顯示對(duì)話(huà)框，‘保 存成功’如果不能保存 ,則顯示出錯(cuò)誤 。 := 39。Select *from 讀者信息表 order by 讀者編號(hào) 39。 。 //保存之后，顯示出目前數(shù)據(jù)庫(kù)中的信息 end。 實(shí)現(xiàn) 修改 功能的代碼如下 ： procedure (Sender: TObject)。 begin with do //使用 DM 中的 qryDzxxb begin := Trim(FieldByName(39。讀者編號(hào) 39。).AsString)。 //修改數(shù)據(jù)庫(kù)中的信息，根據(jù)錄入的新內(nèi)容 := Trim(FieldByName(39。讀者姓名 39。).AsString)。 42 := Trim(FieldByName(39。性別 39。).AsString)。 := FieldByName(39。出生日期 39。).AsDateTime。 := Trim(FieldByName(39。班級(jí) 39。).AsString)。 := Trim(FieldByName(39。用戶(hù)權(quán)限 39。).AsString)。 := FieldByName(39。登記日期 39。).AsDateTime。 end。 end。 實(shí)現(xiàn) 刪除 功能的代碼如下 ： procedure (Sender: TObject)。 begin try if (39。確實(shí)要?jiǎng)h除此記錄嗎？ 39。,39。提示 39。,mb_yesno)=id_yes then //詢(xún)問(wèn)是否要修改，彈出對(duì)話(huà)框 。 //點(diǎn)選確定后，刪除數(shù)據(jù)庫(kù)中的信息 except (39。系統(tǒng)出錯(cuò)！ 39。,39。提示 39。,64)。 //若不能刪除該信息的 話(huà)，就顯示‘系統(tǒng)出錯(cuò)’ end。 end。 167。 圖書(shū)信息管理模塊的實(shí)現(xiàn) 圖書(shū)管理模塊界面和讀者管理界面基本相同。 流程說(shuō)明： 圖書(shū)類(lèi)型設(shè)置模塊組要包括圖書(shū)類(lèi)型信息添加，圖書(shū)類(lèi)型信息修改，圖書(shū)類(lèi)型信息刪除。圖書(shū)類(lèi)型信息包括：圖書(shū)分類(lèi)號(hào)的代碼、圖書(shū)類(lèi)型名稱(chēng)信息。 進(jìn)入模塊點(diǎn)擊添加按鈕，在字段信息輸入框中添加相應(yīng)的圖書(shū)類(lèi)型信息，點(diǎn)擊確定即可完成添加操作。 進(jìn)入模塊點(diǎn)擊修改按鈕，在要修改的字段信息輸入框中添加相應(yīng)的圖書(shū)類(lèi)型新的修改信息，然后點(diǎn)擊確定即可完成修改操作。 43 進(jìn)入模塊點(diǎn)擊刪除按鈕，然后點(diǎn)擊要?jiǎng)h除 的一條圖書(shū)類(lèi)型信息記錄，再點(diǎn)擊確定即可完成刪除操作。 代碼 說(shuō)明 ： （略） 167。 圖 圖書(shū)借閱管理模塊界面 流程說(shuō)明： 首先進(jìn)入借閱模塊后，選擇讀者姓名，選擇借閱時(shí)間，可以直接讀出用戶(hù)權(quán)限和借閱上限，最后選擇圖書(shū)名稱(chēng)，就可以完成讀者借閱了。 代碼 說(shuō)明 ： 實(shí)現(xiàn)保存功能的代碼如下 ： procedure (Sender: TObject)。 begin 。 if = StrToInt() then begin MessageDlg(39。Sorry!39。,mterror,[mbok],0)。 end。 //這是根據(jù)讀者的借閱權(quán)限來(lái)實(shí)現(xiàn)的，作者在設(shè)計(jì)系統(tǒng)前期，就把讀者的權(quán)限分為四類(lèi)，每種權(quán)限所能借閱的圖書(shū)數(shù)量不同，該處實(shí)現(xiàn)的正是當(dāng)用戶(hù)的借閱數(shù)量達(dá)到上限，所彈出的對(duì)話(huà)框。 if zx then // 該處表示用戶(hù)還可以借書(shū)，執(zhí)行下面的操作。 begin with do begin 44 Append。 FieldByName(39。讀者編號(hào) 39。).AsString:= dzbh。 //根據(jù)在界面上點(diǎn)選的信息，保存到數(shù)據(jù)庫(kù)中。 FieldByName(39。用戶(hù)權(quán)限 39。).AsString:=trim()。 FieldByName(39。圖書(shū)編號(hào) 39。).AsString:=tsbh。 FieldByName(39。借閱日期 39。).AsDateTime:=。 FieldByName(39。歸還 39。).AsString:=39。否 39。 Post。 (39。借書(shū)成功！ 39。,39。提示 39。,64)。 。 :=39。select *from 圖書(shū)分類(lèi)信息表 where 圖書(shū)編號(hào)=39。39。39。+tsbh+39。39。39。39。 。 167。 圖書(shū)歸還模塊的實(shí)現(xiàn) 圖 圖書(shū)歸還界面 流程說(shuō)明： 進(jìn)入該頁(yè)面，會(huì)顯示出 [歸還 ]為‘否’的借閱信息，直接點(diǎn)選某條借閱信息再選擇借書(shū)按鈕，完成還書(shū)過(guò)程。 代碼 說(shuō)明 ： 實(shí)現(xiàn)還書(shū)功能的代碼如下 ： procedure (Sender: TObject)。 begin if then begin Exit 45 end。 try if (39。確定要還這本書(shū)嗎？ 39。,39。提示 39。,mb_yesno)=id_yes then begin 。//刪除該條借閱信息 。 :=39。select *from 圖書(shū)分類(lèi)信息表 where 圖書(shū)編號(hào) =39。39。39。+ (39。圖書(shū)編號(hào) 39。).AsString+39。39。39。39。 。 。 (39。復(fù)本數(shù) 39。).AsString:= IntToStr(StrtoInt( (39。復(fù)本數(shù) 39。).AsString)+1)。//為圖書(shū)復(fù)本數(shù)中添加 1 本 。 :=39。select *from 讀者借書(shū)表 where 歸還 =39。39。否 39。39。order by 借閱日期 39。 。//顯示最新的借閱信息 MessageBox(handle, 39。還書(shū)成功 ,歡迎你閱讀 39。, 39。提示 39。, mb_IconWarning + mb_Ok)。 end。 except (39。系統(tǒng)出錯(cuò)！ 39。,39。提示 39。,64)。 end。 end。 167。 圖書(shū)續(xù)借模塊的實(shí)現(xiàn) 與圖書(shū)歸還模塊基本相同，不再重復(fù)介紹。 46 第五章 系 統(tǒng)功能測(cè)試 167。 測(cè)試概述 依據(jù)用戶(hù)需求，設(shè)計(jì)測(cè)試用例 [11]，對(duì)軟件進(jìn)行系統(tǒng)級(jí)測(cè)試。并根據(jù)測(cè)試結(jié)果填寫(xiě)測(cè)試表格的測(cè)試結(jié)果欄。 167。 測(cè)試目的 測(cè)試的重點(diǎn)是對(duì)各項(xiàng)功能的正常運(yùn)轉(zhuǎn)進(jìn)行全面測(cè)試，檢測(cè)軟件的各子系統(tǒng)的協(xié)作能力。具體目的如下： ? 確保系統(tǒng)達(dá)到需求功能的說(shuō)明； ? 確保系統(tǒng)滿(mǎn)足性能需求； ? 強(qiáng)度測(cè)試確認(rèn)程序能夠處理要求的負(fù)載； ? 確保系統(tǒng)在要求的硬件和軟件平臺(tái)上工作正常。 167。 測(cè)試過(guò)程及結(jié)果 167。 測(cè)試用例 本項(xiàng)目所做的測(cè)試列表如下： 測(cè)試單元： 圖書(shū)信息管理單元 測(cè)試類(lèi)型：功能測(cè)試 測(cè)試日期： 2021/5/28 編號(hào) 測(cè)試說(shuō)明 期望結(jié)果 實(shí)際結(jié)果 成功 /失敗 1 測(cè)試新書(shū)信息添加是否成功 新書(shū)信息成功寫(xiě)入數(shù)據(jù)庫(kù) 數(shù)據(jù)庫(kù)中可以找到新添加記錄。 成功 2 測(cè)試舊書(shū)銷(xiāo)毀 將輸入新書(shū)信息銷(xiāo)毀 數(shù)據(jù)庫(kù)中新書(shū)紀(jì)錄銷(xiāo)毀 成功 3 測(cè)試圖書(shū)信息修改 將重新輸入數(shù)據(jù)錄入到數(shù)據(jù)庫(kù)中 修改圖書(shū)信息信息成功 成功 表 圖書(shū)信息管理測(cè)試用例表 測(cè)試單元： 借閱管理單元 測(cè)試類(lèi)型：功能測(cè)試 測(cè)試日期： 2021/5/28 47 編號(hào) 測(cè)試說(shuō)明 期望結(jié)果 實(shí)際結(jié)果 成功 /失敗 1 測(cè)試讀者是否可以進(jìn) 行第一次借閱 能夠借閱成 功，并在界面中顯示借閱信息 彈出對(duì)話(huà)框，“借閱成功” 成功 2 測(cè)試是否可以超越權(quán)限借閱 不能借閱，并且能夠提示管理員 彈出對(duì)話(huà)框 “你不能再借閱了” 成功 3 測(cè)試已經(jīng)該讀者能不能重復(fù)借閱同一本書(shū) 不能借閱，并且能夠提示管理員 彈出對(duì)話(huà)框 “你已經(jīng)借閱過(guò)該本圖書(shū)了” 成功 4 測(cè)試圖書(shū)借完之后，還能不能繼續(xù)借閱 不能借閱，并且能夠提示管理員 彈出對(duì)話(huà)框 “該本圖書(shū)已經(jīng)借完” 成功 表 圖書(shū)借閱管理測(cè)試用例表 測(cè)試單元： 查詢(xún)讀者信息單元 測(cè)試類(lèi)型：功能測(cè)試 測(cè) 試日期： 2021/5/28 編號(hào) 測(cè)試說(shuō)明 期望結(jié)果 實(shí)際結(jié)果 成功 /失敗 1 測(cè)試按讀者的各項(xiàng)信息是否可以進(jìn)行查詢(xún) 根據(jù)不同的查詢(xún)信息對(duì)讀者進(jìn)行查詢(xún) 顯示查詢(xún)項(xiàng) 成功 2 測(cè)試多項(xiàng)的查詢(xún)條件是否能進(jìn)行查詢(xún) 根據(jù)不同的查詢(xún)條件對(duì)讀者信息進(jìn)行查詢(xún) 顯示查詢(xún)結(jié)果 成功 表 167。 測(cè)試結(jié)論 根據(jù)上面的測(cè)試，該系統(tǒng)各功能模塊均能正常使用，此次設(shè)計(jì)完成。 48 設(shè)計(jì)體會(huì)與總結(jié) 本 設(shè)計(jì) 是 一個(gè) 面向圖書(shū) 館借閱管理的 ，具有一定實(shí)用性的數(shù)據(jù)庫(kù)信息管理系統(tǒng)。它主要完成對(duì)圖書(shū) 借閱 的一 系列管理，包括 借書(shū)、還書(shū) 以及 圖書(shū)，讀者，管理員的 信息管理。本系統(tǒng)采用當(dāng)前流行的面向?qū)ο蟮拈_(kāi)發(fā)工具 — Delph 以及數(shù)據(jù)庫(kù)工具 — SQL Server 2021 來(lái)完成整個(gè)系統(tǒng)的設(shè)計(jì) 。 該 系統(tǒng)具有相當(dāng)?shù)膶?shí)用功能。 在用戶(hù)權(quán)限方面，可以通過(guò)不同用戶(hù)控制不同的界面，以達(dá)到圖書(shū)館信息的修改隱蔽性和查詢(xún)的透明性。在借閱 在查詢(xún)方面，系統(tǒng) 可以 實(shí)現(xiàn)了多條件任意字段的查詢(xún) 。 系統(tǒng)在設(shè)計(jì)過(guò)程中不可避免地遇到了各種各樣的問(wèn)題，由于整個(gè)系統(tǒng)完全都是由個(gè)人設(shè)計(jì)的，有關(guān) Delphi 許多細(xì)節(jié)問(wèn)題都要靠自己去摸索，加之本人水平有限，并沒(méi)有完全 地理解 Delphi 的強(qiáng)大功能，而且還存在著許多不足之處。如： ? 受開(kāi)發(fā)條件和開(kāi)發(fā)時(shí)間的限制，本系統(tǒng)只利用了本地?cái)?shù)據(jù)庫(kù) Sql，它同應(yīng)用程序處于同一系統(tǒng)中，能存儲(chǔ)的數(shù)據(jù)量也有一定限制，并沒(méi)有發(fā)揮出 Delphi 其數(shù)據(jù)庫(kù)方面的優(yōu)勢(shì) 。 ? 添加功能 尚不夠全面完善，不能動(dòng)態(tài) 生成讀者編號(hào)和圖書(shū)編號(hào)。 ? 在一些數(shù)據(jù)輸入時(shí)沒(méi)有及時(shí)的進(jìn)行數(shù)據(jù)格式校驗(yàn)，不能保證數(shù)據(jù)輸入的絕對(duì)正確性。 ? 由于時(shí)間關(guān)系，系統(tǒng)功能實(shí)現(xiàn)不夠完善，使用不是很方便，比如，沒(méi)有實(shí)現(xiàn) 圖書(shū)歸還超期，或者是圖書(shū)損害應(yīng)該如何罰款的功能。 這些都是需要完善的地方，該系統(tǒng)離實(shí)際 使用也還有相當(dāng)?shù)木嚯x，需要我進(jìn)行不斷地補(bǔ)充和完善。 這次畢業(yè)設(shè)計(jì)完成后，體會(huì)頗多，在學(xué)與做的過(guò)程中，取長(zhǎng)補(bǔ)短，不斷學(xué)習(xí)新的知識(shí)，吸取經(jīng)驗(yàn)，達(dá)到進(jìn)步的目的。在學(xué)與做的過(guò)程中自身的努力以及相關(guān)圖書(shū)資料的幫助，逐漸熟悉了 Delphi 在數(shù)據(jù)庫(kù)方面的應(yīng)用知識(shí)。程序開(kāi)發(fā)的一般過(guò)程和對(duì)數(shù)據(jù)庫(kù)知識(shí)的進(jìn)一步的了解，在這個(gè)快速發(fā)展的當(dāng)代社會(huì)里，數(shù)據(jù)庫(kù)已經(jīng)普遍應(yīng)用在各個(gè)領(lǐng)域。在這次的畢業(yè)設(shè)計(jì)中我學(xué)習(xí)到不少的數(shù)據(jù)庫(kù)知識(shí)，但由于自己的理論知識(shí)水平有限，實(shí)踐知識(shí)和設(shè)計(jì)經(jīng)驗(yàn)不足，在設(shè)計(jì)過(guò)程中難免存在一些問(wèn)題，甚至錯(cuò)誤。懇請(qǐng)各位老師批評(píng)指 正，