數(shù)據(jù)庫課程設(shè)計報告-圖書管理系統(tǒng)

1、精選優(yōu)質(zhì)文檔-傾情為你奉上精選優(yōu)質(zhì)文檔-傾情為你奉上專心-專注-專業(yè)專心-專注-專業(yè)精選優(yōu)質(zhì)文檔-傾情為你奉上專心-專注-專業(yè)數(shù)據(jù)庫課程設(shè)計報告 學(xué) 院： 信息科學(xué)與工程學(xué)院專 業(yè)： 計算機(jī)科學(xué)與技術(shù)班 級： 學(xué) 號： 姓 名： 指導(dǎo)老師： 目 錄 TOC o 1-3 h z u 第一章 課程設(shè)計概述1.1 課程設(shè)計的性質(zhì)與任務(wù)1.掌握計算機(jī)管理信息系統(tǒng)設(shè)計的一般方法，主要包括系統(tǒng)分析、系統(tǒng)設(shè)計的組織和實施。2.掌握關(guān)系型數(shù)據(jù)庫管理系統(tǒng)的編程技術(shù)，并能獨立完成一般小系統(tǒng)的程序設(shè)計、調(diào)試運(yùn)行等工作。3.培養(yǎng)學(xué)生學(xué)以致用，根據(jù)具體問題設(shè)計方案并解決該問題的能力。1.2 課程設(shè)計的基本要求1.完成系

2、統(tǒng)的需求分析、總體設(shè)計與詳細(xì)設(shè)計。2.編寫相關(guān)數(shù)據(jù)庫的腳本，建立后臺數(shù)據(jù)庫程序，包括表、視圖、過程、觸發(fā)器等，其中可以采用ORACLE或SQL SERVER，一定要有過程與觸發(fā)器的編寫與調(diào)試以及有關(guān)數(shù)據(jù)字段、程序功能模塊、主要變量的說明。3.完成技術(shù)方案選型研究，確定開發(fā)工具及其主要理由，選用動態(tài)網(wǎng)頁技術(shù)及主要理由，完成10項主要功能中的5項功能的編制、調(diào)試及驗收，其中主要包含有前兩項基礎(chǔ)數(shù)據(jù)的維護(hù)、中心的借閱、還書功能及基于WEB的網(wǎng)上查詢等功能。 4書寫課程設(shè)計報告。1.3 課程設(shè)計的內(nèi)容1引言圖書借閱是學(xué)生在大學(xué)學(xué)習(xí)中經(jīng)常實際經(jīng)歷的活動，而在此過程中所涉及信息與行為可以較好地作為一個數(shù)據(jù)

3、庫系統(tǒng)的典型實例。在該實例中，需要管理的信息包括圖書信息、管理員信息、學(xué)生信息、教師信息、借閱信息、圖書分類信息、出版社信息等能表現(xiàn)出關(guān)系數(shù)據(jù)庫中一對一、一對多、多對多等實體關(guān)系與規(guī)范化設(shè)計屬性依賴關(guān)系，基本滿足學(xué)習(xí)關(guān)系數(shù)據(jù)庫的示例需要。系統(tǒng)中的行為所涉及的活動包括適合采用C/S模式處理的一系列圖書管理活動，也包括適合B/S模式處理的新書推薦、書目查詢、網(wǎng)上續(xù)借、借閱查詢、歸還提醒等功能，基本滿足學(xué)習(xí)實例系統(tǒng)開發(fā)的需要。下面分別說明其中系統(tǒng)功能需求與數(shù)據(jù)關(guān)系需求。2系統(tǒng)功能需求描述在該系統(tǒng)中，主要包括圖書管理、借閱、續(xù)借、查詢等功能，下面分別就其系統(tǒng)主要功能與業(yè)務(wù)規(guī)則描述如下。圖書維護(hù)（1）圖

4、書的書目信息新增、編輯、刪除等；（2）某一書目記錄的刪除只有其所有圖書復(fù)本都在庫的情況下才可以。借閱人/卡維護(hù)（1）借閱人信息的新增、編輯、刪除等；（2）借閱人信息的刪除只有所借圖書都已歸還的情況下才可以；（3）借閱卡與借閱人一一對應(yīng)，每一新增借閱人記錄的同時與之對應(yīng)的新增借閱卡記錄；（4）借閱卡由于遺失等原因可能重新辦理：即刪除舊卡，新增新卡與該借閱人的對應(yīng)信息；（5）刪除借閱人記錄的同時刪除該借閱卡記錄。出版社維護(hù)（1）出版社的書目信息新增、編輯、刪除等；（2）出版社的刪除只有其所屬圖書都已刪除的情況下才可以。圖書借閱（1）新增一條借閱記錄；（2）只有該圖書在庫復(fù)本數(shù)大于1才能進(jìn)行借閱；（

5、3）借閱完成后，該圖書在庫復(fù)本數(shù)減1；（4）學(xué)生：最多借5本書，每本書借閱期限為3個月，在此期限內(nèi)可續(xù)借一次，從續(xù)借之日起延長3個月；（5）教師：最多借10本書，每本書借閱期限為6個月，在此期限內(nèi)可續(xù)借一次，從續(xù)借之日起延長6個月；（6）有書超期未還，或已借書數(shù)量超過規(guī)定者，不可再借書；（7）借書時需要出示借閱卡，并正確輸入密碼，方可借書。圖書歸還（1）修改該借閱記錄的歸還字段；（2）圖書歸還完成后，該圖書在庫復(fù)本數(shù)加1；（3）延期歸還者按規(guī)定交納罰款；（4）還書時需要出示借閱卡，并正確輸入密碼，方可還書。新書推薦：列出所有標(biāo)記為新書的圖書記錄（圖書記錄的相應(yīng)字段表示）。書目查詢（1）可以按書

6、名、作者、分類、出版社模糊查詢；（2）只有輸入借閱卡號與密碼，才可進(jìn)入相應(yīng)網(wǎng)頁。已借圖書（1）列出該借閱人所有已借閱圖書；（2）只有輸入借閱卡號與密碼，才可進(jìn)入相應(yīng)網(wǎng)頁。圖書催還（1）對列出該借閱人所有已借閱圖書中還書日期在10天之內(nèi)的提示歸還；（2）只有輸入借閱卡號與密碼，才可進(jìn)入相應(yīng)網(wǎng)頁。10）圖書續(xù)借（1）借閱人可以對已借閱圖書中未續(xù)借的續(xù)借一次；（2）只有輸入借閱卡號與密碼，才可進(jìn)入相應(yīng)網(wǎng)頁。3系統(tǒng)數(shù)據(jù)需求描述對上述系統(tǒng)功能需求，可以分析、歸納出其相應(yīng)必須管理的信息包括圖書、借閱人、借閱卡、借閱關(guān)系、出版社等，其主要數(shù)據(jù)及其屬性需求分析如下：1）圖書信息包括：圖書編號，書名，作者，圖書

7、分類，出版社，單價（元），復(fù)本數(shù)量，庫存量，日罰金（元），是否新書；2）借閱卡信息包括：借閱卡編號，讀者編號；3）借閱人信息包括：借閱人編號，姓名，是否學(xué)生，密碼，已借數(shù)量，Email地址，電話號碼；4）借閱信息包括：流水號，借閱人編號，圖書編號，借閱日期，是否續(xù)借，續(xù)借日期，是否已歸還，歸還日期；5）出版社信息包括：編號，出版社名；6）圖書分類信息包括：編號，分類名。第二章 設(shè)計方案論證2.1 介紹Delphi基本概念介紹Delphi是全新的可視化編程環(huán)境，為我們提供了一種方便、快捷的Windows應(yīng)用程序開發(fā)工具。它使用了Microsoft Windows圖形用戶界面的許多先進(jìn)特性和設(shè)計思

8、想，采用了彈性可重復(fù)利用的完整的面向?qū)ο蟪绦蛘Z言(Object-Oriented Language)、當(dāng)今世界上最快的編輯器、最為領(lǐng)先的數(shù)據(jù)庫技術(shù)。對于廣大的程序開發(fā)人員來講，使用Delphi開發(fā)應(yīng)用軟件，無疑會大大地提高編程效率，而且隨著應(yīng)用的深入，您將會發(fā)現(xiàn)編程不再是枯燥無味的工作Delphi的每一個設(shè)計細(xì)節(jié)，都將帶給您一份欣喜。 Delphi的基本形式 Delphi實際上是Pascal語言的一種版本，但它與傳統(tǒng)的Pascal語言有天壤之別。一個Delphi程序首先是應(yīng)用程序框架，而這一框架正是應(yīng)用程序的“骨架”。在骨架上即使沒有附著任何東西，仍可以嚴(yán)格地按照設(shè)計運(yùn)行。您的工作只是在“骨架

9、”中加入您的程序。缺省的應(yīng)用程序是一個空白的窗體(Form)，您可以運(yùn)行它，結(jié)果得到一個空白的窗口。這個窗口具有Windows窗口的全部性質(zhì)：可以被放大縮小、移動、最大最小化等，但您卻沒有編寫一行程序。因此，可以說應(yīng)用程序框架通過提供所有應(yīng)用程序共有的東西，為用戶應(yīng)用程序的開發(fā)打下了良好的基礎(chǔ)。Delphi已經(jīng)為您做好了一切基礎(chǔ)工作程序框架就是一個已經(jīng)完成的可運(yùn)行應(yīng)用程序，只是不處理任何事情。您所需要做的，只是在程序中加入完成您所需功能的代碼而已。在空白窗口的背后，應(yīng)用程序的框架正在等待用戶的輸入。由于您并未告訴它接收到用戶輸入后作何反應(yīng)，窗口除了響應(yīng)Windows的基本操作(移動、縮放等)外

10、，它只是接受用戶的輸入，然后再忽略。Delphi把Windows編程的回調(diào)、句柄處理等繁復(fù)過程都放在一個不可見的Romulam覆蓋物下面，這樣您可以不為它們所困擾，輕松從容地對可視部件進(jìn)行編程。2.2 面向?qū)ο缶幊痰母拍?面向?qū)ο蟮某绦蛟O(shè)計(Object-Oriented Programming，簡記為OOP)是Delphi誕生的基礎(chǔ)。OOP立意于創(chuàng)建軟件重用代碼，具備更好地模擬現(xiàn)實世界環(huán)境的能力，這使它被公認(rèn)為是自上而下編程的優(yōu)勝者。它通過給程序中加入擴(kuò)展語句，把函數(shù)“封裝”進(jìn)Windows編程所必需的“對象”中。面向?qū)ο蟮木幊陶Z言使得復(fù)雜的工作條理清晰、編寫容易。說它是一場革命，不是對對象

11、本身而言，而是對它們處理工作的能力而言。對象并不與傳統(tǒng)程序設(shè)計和編程方法兼容，只是部分面向?qū)ο蠓炊鴷骨樾胃?。除非整個開發(fā)環(huán)境都是面向?qū)ο蟮?，否則對象產(chǎn)生的好處還沒有帶來的麻煩多。而Delphi是完全面向?qū)ο蟮模@就使得Delphi成為一種觸手可及的促進(jìn)軟件重用的開發(fā)工具，從而具有強(qiáng)大的吸引力。 一些早期的具有OOP性能的程序語言如C+,Pascal,Smalltalk等，雖然具有面向?qū)ο蟮奶卣鳎荒茌p松地畫出可視化對象，與用戶交互能力較差，程序員仍然要編寫大量的代碼。Delphi的推出，填補(bǔ)了這項空白。您不必自己建立對象，只要在提供的程序框架中加入完成功能的代碼，其余的都交給Delphi

12、去做。欲生成漂亮的界面和結(jié)構(gòu)良好的程序絲毫不必絞盡腦汁，Delphi將幫助您輕松地完成。它允許在一個具有真正OOP擴(kuò)展的可視化編程環(huán)境中，使用它的Object Pascal語言。這種革命性的組合，使得可視化編程與面向?qū)ο蟮拈_發(fā)框架緊密地結(jié)合起來。語言介紹Delphi的編程語言是以Pascal為基礎(chǔ)的。Pascal語言具有可讀性好、編寫容易的特點，這使得它很適合作為基礎(chǔ)的開發(fā)語言。同時，使用編譯器創(chuàng)建的應(yīng)用程序只生成單個可執(zhí)行文件(.EXE)，正是這種結(jié)合，使得Pascal成為Delphi這種先進(jìn)開發(fā)環(huán)境的編程語言。在編寫自己的Object Pascal程序時，要注意程序的可讀性。Pascal語

13、言是英式結(jié)構(gòu)語言，在程序中選擇合適的縮排、大小寫風(fēng)格，并在需要時將程序代碼分行，會使得程序代碼能夠很容易地被自己和他人讀懂。一般的程序員都有這樣的體驗：如果不給程序加上適當(dāng)?shù)淖⒔?，一段時間后，自己也難以理清程序的流程。給程序及時地加上注釋是良好的編程習(xí)慣。Delphi的注釋需要加注在之間，編輯器會把它們處理成為空白。Delphi保留了Borland Pascal編輯器的風(fēng)格，關(guān)鍵字采用黑體字，被注釋的部分會變暗，這使得編程風(fēng)格良好，易讀易寫。在事件處理過程中，最常用到的工作就是把一個新值賦給一個屬性或變量。在設(shè)計用戶界面時，可以使用Object Inspector(Object Inspect

14、or)來改變其屬性；但有時需要在程序執(zhí)行時改變屬性的值，而且有些屬性只能在執(zhí)行時改變，這些屬性在Delphi的在線幫助的“Proprety”主題中被標(biāo)為執(zhí)行期屬性。過程與函數(shù)是程序中執(zhí)行特定工作的模塊化部分。Delphi的運(yùn)行庫包含許多過程與函數(shù)以供您的應(yīng)用程序調(diào)用。您不必了解過程與函數(shù)的邏輯，但要知道過程與函數(shù)的用途。在對象中說明的過程和函數(shù)稱為方法(Method)。所有的事件處理過程都是過程，以保留字procedure開頭。每一個事件處理過程只包含了當(dāng)這一事件發(fā)生時需要執(zhí)行的程序代碼。在事件處理過程中使用Delphi已經(jīng)存在的過程與函數(shù)，只需在程序代碼中調(diào)用它們即可。2.4 SQL語言1.

15、 SQL語言簡介SQL語言作為關(guān)系數(shù)據(jù)庫管理系統(tǒng)中的一種通用的結(jié)構(gòu)查詢語言，已經(jīng)被眾多的數(shù)據(jù)庫管理系統(tǒng)所采用，如ORACLE、Sybase、Informix等數(shù)據(jù)庫管理系統(tǒng)，它們都支持SQL 語言。Delphi與使用SQL語言的數(shù)據(jù)庫管理系統(tǒng)兼容，在使用Delphi開發(fā)數(shù)據(jù)庫應(yīng)用程序時，我們可以使用SQL語言編程，支持SQL編程是Delphi的一個重要特征，這也是體現(xiàn)Delphi作為一個強(qiáng)大的數(shù)據(jù)庫應(yīng)用開發(fā)工具的一個重要標(biāo)志。2. SQL的優(yōu)點SQL廣泛地被采用正說明了它的優(yōu)點。它使全部用戶，包括應(yīng)用程序員、DBA管理員和終端用戶受益非淺。1) 非過程化語言SQL是一個非過程化的語言，因為它一

16、次處理一個記錄，對數(shù)據(jù)提供自動導(dǎo)航。SQL允許用戶在高層的數(shù)據(jù)結(jié)構(gòu)上工作，而不對單個記錄進(jìn)行操作，可操作記錄集。所有SQL 語句接受集合作為輸入，返回集合作為輸出。SQL的集合特性允許一條SQL語句的結(jié)果作為另一條SQL語句的輸入。SQL不要求用戶指定對數(shù)據(jù)的存放方法。這種特性使用戶更易集中精力于要得到的結(jié)果。所有SQL語句使用查詢優(yōu)化器，它是RDBMS的一部分，由它決定對指定數(shù)據(jù)存取的最快速度的手段。查詢優(yōu)化器知道存在什么索引，哪兒使用合適，而用戶從不需要知道表是否有索引，表有什么類型的索引。2) 統(tǒng)一的語言SQL可用于所有用戶的DB活動模型，包括系統(tǒng)管理員、數(shù)據(jù)庫管理員、應(yīng)用程序員、決策支

17、持系統(tǒng)人員及許多其它類型的終端用戶?；镜腟QL 命令只需很少時間就能學(xué)會，最高級的命令在幾天內(nèi)便可掌握。SQL為許多任務(wù)提供了命令，包括： 查詢數(shù)據(jù) 在表中插入、修改和刪除記錄 建立、修改和刪除數(shù)據(jù)對象 控制對數(shù)據(jù)和數(shù)據(jù)對象的存取 保證數(shù)據(jù)庫一致性和完整性 以前的數(shù)據(jù)庫管理系統(tǒng)為上述各類操作提供單獨的語言，而SQL 將全部任務(wù)統(tǒng)一在一種語言中。3) 是所有關(guān)系數(shù)據(jù)庫的公共語言由于所有主要的關(guān)系數(shù)據(jù)庫管理系統(tǒng)都支持SQL語言，用戶可將使用SQL的技能從一個RDBMS轉(zhuǎn)到另一個。所有用SQL編寫的程序都是可以移植的。2.5 SQLSever 2000的應(yīng)用在Windows操作系統(tǒng)中，Access

18、和SQL Server是最常見的網(wǎng)絡(luò)后臺數(shù)據(jù)庫。在比較大的網(wǎng)絡(luò)應(yīng)用系統(tǒng)中，還是選擇SQL Server；在局域網(wǎng)站上，使用ASPSQL Server 2000開發(fā)網(wǎng)絡(luò)應(yīng)用系統(tǒng)是十分經(jīng)典的組合。SQL Server 2000的版本包括企業(yè)版，標(biāo)準(zhǔn)版，個人版，開發(fā)版和評估版。企業(yè)版是功能最強(qiáng)大的版本，它具有強(qiáng)大的可伸縮性和可靠性。對于中小規(guī)模的企業(yè)，標(biāo)準(zhǔn)版是一個比較經(jīng)濟(jì)的選擇。個人版是在標(biāo)準(zhǔn)版的基礎(chǔ)上，為個人用戶量身定做的。其最大的特點是可以在非服務(wù)器操作系統(tǒng)上運(yùn)行。例如Windows2000專業(yè)版，Windows NTWorkstation4.0,Windows Me和Windows 98。開發(fā)

19、版是為開發(fā)者提供的版本，它可以在SQL Server基礎(chǔ)上編譯生成任何類型的應(yīng)用程序。它包括企業(yè)版的所有特性，但不能用于產(chǎn)品發(fā)布。SQL Server 是一個關(guān)系型數(shù)據(jù)庫管理系統(tǒng)，其主要特性包括：1）存儲過程（Stored Procedures），即一種預(yù)編譯的事務(wù)SQL語句組。2）擴(kuò)展存儲過程（Extended Stored Procedures），動態(tài)裝載和執(zhí)行DLL中的函數(shù)功能。3)在線事務(wù)處理（Online Transaction Processing, OLTP）4)在線分析處理（Online Analytical Processing,OLAP）5）提供大量的向?qū)Чぞ?，協(xié)助完成各種

20、操作。在本課題的設(shè)計過程中，我選擇了SQL Server2000作為后臺數(shù)據(jù)庫系統(tǒng)，在開發(fā)的過程中使用的是SQL Server 2000，開發(fā)完成后使用SQLServer2000企業(yè)版進(jìn)行了聯(lián)機(jī)測試。2.6 數(shù)據(jù)庫訪問技術(shù)直到目前為止，計算機(jī)軟件的開發(fā)分為兩個不同的體系，其中一個體系是使用傳統(tǒng)的程序設(shè)計語言（如Pascal、Basic和C等）開發(fā)數(shù)值控制、數(shù)值運(yùn)算等軟件，圍繞它們的重點是算術(shù)、數(shù)據(jù)結(jié)構(gòu)以及近年產(chǎn)生的面向?qū)ο蠹夹g(shù)。另一個體系則是通用的數(shù)據(jù)庫管理軟件領(lǐng)域（數(shù)據(jù)庫應(yīng)用程序的開發(fā)）。這兩個體系的發(fā)展都極為迅猛，但是二者并沒出現(xiàn)混合滲透跡象。如果使用數(shù)據(jù)庫語言進(jìn)行傳統(tǒng)的算術(shù)編程，雖然也能

21、完成相應(yīng)的功能，但是其編程過程可能極為復(fù)雜。如果使用傳統(tǒng)的編程語言進(jìn)行數(shù)據(jù)庫編程，通過調(diào)用專用的數(shù)據(jù)庫應(yīng)用程序接口函數(shù)和過程，利用這些函數(shù)和過程提供的功能，可能也能做得比較完善，但這做起來大多是極其困難的。而Delphi結(jié)合了兩個體系的優(yōu)點，它結(jié)合了傳統(tǒng)的編程語言O(shè)bject Pascal和數(shù)據(jù)庫語言的強(qiáng)大功能，它即可以用于傳統(tǒng)的算術(shù)編程又可以用于數(shù)據(jù)庫編程，特別是Delphi具有強(qiáng)大的數(shù)據(jù)庫功能，利用Delphi的數(shù)據(jù)庫工具，我們根本不需要編寫任何Object Pascal代碼便可以創(chuàng)建一個簡單的數(shù)據(jù)庫應(yīng)用。 Delphi是Borland公司于1994年底發(fā)布的用于開發(fā)數(shù)據(jù)庫應(yīng)用程序的工具，

22、它是面向?qū)ο蟮模悄壳伴_發(fā)客戶/服務(wù)器數(shù)據(jù)庫應(yīng)用程序的強(qiáng)有力的工具。Delphi在Window3.1以上版本的系統(tǒng)環(huán)境下運(yùn)行，目前具有兩個版本：Delphi的標(biāo)準(zhǔn)版本和客戶/服務(wù)器版本。標(biāo)準(zhǔn)版本包含一個Borland Database Engine的局部拷貝，它允許用戶創(chuàng)建能訪問dBASE、Paradox和Local InterBase 服務(wù)器的數(shù)據(jù)庫應(yīng)用， 它還支持具有 ODBC 接口的數(shù)據(jù)庫。Delphi的客戶/服務(wù)器版本包括Borland SQL Link， 它能直接訪問 ORACLE 、 SyBase 和Microsoft SQL Server,Informix以及InterBase

23、數(shù)據(jù)庫服務(wù)器。 Delphi可以訪問多種數(shù)據(jù)庫管理系統(tǒng)的數(shù)據(jù)庫，憑借窗體(Forms)和報表(Reports)，BDE(Borland Database Engine)可以訪問諸如Paradox、dBASE、本地InterBase 服務(wù)器的數(shù)據(jù)庫，也可以訪問遠(yuǎn)程數(shù)據(jù)庫服務(wù)器上的數(shù)據(jù)庫(如ORACLE、SyBase、Informix等客戶/服務(wù)器數(shù)據(jù)庫中的數(shù)據(jù)庫)，或任何經(jīng)ODBC(Open Database Connecticity) 可訪問的數(shù)據(jù)庫管理系統(tǒng)中的數(shù)據(jù)庫。2.7 概要設(shè)計根據(jù)我設(shè)計的圖書館數(shù)據(jù)庫管理系統(tǒng)，我作了如下分析：圖書館提供圖書借閱業(yè)務(wù)，讀者借閱需先辦理借書卡(用條碼識別身

24、份)，并交納一定的押金。不同的書有著不同的借閱期限，比如期刊和某些新書最多只能借閱七天，而另一些書則可以借閱半個月或最長三個月不等。逾期不還，或丟失、損壞書籍則予以罰款。在交納罰款前，借書卡被凍結(jié)。不同類別的讀者不著不同的借閱數(shù)量限制，比如有的一次可以借閱7本，有的只能借閱5本等。對逾期不還的，系統(tǒng)給出報警，并打印催還通知單。讀者可以事先從網(wǎng)上查詢擬借書刊是否存在，并可查詢書刊存放地點。我設(shè)計的圖書管理系統(tǒng)，功能包括：一圖書管理系統(tǒng)：圖書查詢新書登記圖書下架二讀者信息管理：1辦卡 2信息 3掛失 4注銷 5凍結(jié)三借閱管理系統(tǒng)：1借書（還書）2借閱信息管理系統(tǒng)的框圖如下：系統(tǒng)登陸界面系統(tǒng)登陸界面

25、系統(tǒng)主界面圖書管理系統(tǒng)讀者信息管理借閱管理系統(tǒng)圖書查詢 新書登記 圖書下架辦卡 信息 掛失 注銷 凍結(jié) 借書（還書） 借閱信息2.8 模塊分析 上圖是整個圖書館數(shù)據(jù)庫管理系統(tǒng)的邏輯結(jié)構(gòu)，概要設(shè)計中各個功能模塊的劃分就是依據(jù)上圖來實現(xiàn)的。主要分成三個子模塊：圖書管理系統(tǒng)：圖書查詢：可以按照書號，書名，作者，出版單位分別單獨查詢，也可以結(jié)合查詢，且均為不完整查詢。新書登記：向圖書數(shù)據(jù)庫中寫入書名，作者，單價，出版單位，庫存，借書時限，另外書的編號會自動生成。圖書下架：可以按照書名，書編號分別刪除。讀者信息管理：辦卡：輸入讀者姓名，和借數(shù)限制，寫入讀者數(shù)據(jù)庫，其中卡號自動生成，已借數(shù)，掛失，凍結(jié)采用

26、默認(rèn)值。信息：根據(jù)讀者姓名查詢讀者個人信息。掛失：根據(jù)讀者姓名掛失，修改讀者表的掛失項，同時使該卡不能借閱圖書，若讀者找到卡，或者新辦了卡，就通過解掛失按鈕來解掛失。注銷：根據(jù)讀者姓名永久刪除讀者表中的該讀者信息。凍結(jié)：類似掛失，當(dāng)讀者逾期未歸還圖書時，凍結(jié)項自動改變，使該卡不能節(jié)約圖書，同時彈出提示信息，催繳圖書。借閱管理系統(tǒng)：借書（還書）：必須同時輸入讀者卡號和所借書的書編號才能借閱圖書，借書前判斷時候該書庫存不足，該卡是否有掛失，注銷，凍結(jié)現(xiàn)象。若存在，則不將借書信息寫入借閱表，否則寫入借閱表。借閱信息：根據(jù)讀者的卡號查詢讀者的借閱信息，其中還包含到期圖書查詢，使管理員方便查詢哪本書的借

27、書期限已到。 以上各個模塊在結(jié)構(gòu)上是相互獨立的，但每一部分在功能上存在相關(guān)的部分，具體可以參考后面的詳細(xì)設(shè)計部分的結(jié)構(gòu)流程圖。第三章 設(shè)計過程詳細(xì)論述分析以下只介紹，我所使用的Delphi組件，以及我在程序設(shè)計中的應(yīng)用。1. Standard欄的Lable組件，Edit組件，Memo組件，Button組件，Panle組件。分別簡單介紹：Label部件 Label(標(biāo)簽)一般放在對象的旁邊，用來標(biāo)記這些對象，從而對用戶的操作進(jìn)行提示，也可以用來顯示其它信息。您可以在標(biāo)簽中設(shè)置熱鍵，也即在Caption屬性值段中輸入含有“&”的字串，當(dāng)用戶使用“Alt+關(guān)鍵字母”時，將自動選中它所指向的對象。Ed

28、it部件 部件都是用作接收、顯示用戶輸入文本的。ReadOnly在運(yùn)行時間內(nèi)控制對象是否可以進(jìn)行Windows的操作，當(dāng)此值為False時，該框內(nèi)的文本就不能被復(fù)制到剪貼板上。MaxLength可以設(shè)置輸入文本的長度限制。用PasswordChar屬性可以按照顯示隱蔽密碼的方法顯示用戶輸入文本Memo部件Memo是備注框，與以上對象不同的是，它可以接收多行文本輸入。將ScrollBars設(shè)置成ssVertical，可以為它加上一個垂直的滾行條。Align屬性調(diào)整該對象在窗口中的對齊情況，有alNone(無對齊指定)、alBottom(底部對齊)、alClient(全窗口顯示)等可以選擇；而Al

29、ignment屬性則決定了文本在框中的對齊顯示格式。Button部件按鈕是Windows常用的部件，前文的例程中我們已經(jīng)基本掌握了Button和BitBtn的主要用法。它們一般用在對話框中，做為執(zhí)行某種功能的指示。您也可以為它們設(shè)置內(nèi)置返回功能，將ModelResult屬性加以匹配，可以不用編程，直接實現(xiàn)系統(tǒng)內(nèi)置的功能，這一點上和Kind屬性頗類似。Panle部件Panle有標(biāo)題，可以用文字表征成組部件的標(biāo)題或信息。Panel部件也可以達(dá)到將部件分組的目的。通過編程向窗口加一個操作板部件，以書寫提示和幫助信息，也不失為一種好方法。2. Additional欄的Bitbtn部件，Image部件。

30、Bitbtn部件 與Button基本相同，不過可以在旁邊加入圖案，使按鈕功能更鮮明。Image部件 圖象部件Image在Additional頁上，用來在窗口中顯示一幅圖片，可以在picture屬性中調(diào)入圖象文件。Delphi支持位圖(.BMP)、圖標(biāo)(.ICO)、圖元(.WFM)三種文件格式。比較重要的屬性是Autosize和Strech。它們決定了圖象在窗口中的顯示尺寸。Autosize屬性為True表示按原尺寸顯示，Strech屬性為True表示圖象按對象圖框的大小顯示，這時圖象的大小可以人為改變。3. System中的Timer部件。計時器部件Timer 在System頁上，還有一個(T

31、imer計時器)部件，它能夠有規(guī)律地觸發(fā)OnTimer事件，發(fā)送信息給應(yīng)用程序。它是編制應(yīng)用程序時最為重要的部件之一。Enabled屬性表示了計時器打開還是關(guān)閉；用Interval屬性設(shè)置兩個OnTimer事件間的間隔，單位是毫秒，也即千分之一秒。將間隔置為0相當(dāng)于關(guān)閉計時器，Interval的最大允許值是32767，也即32.767秒。4. Data Access欄中的DataSource部件DataSource部件，顧名思義是用來訪問數(shù)據(jù)源的部件。5. ADO欄中的ADOConnection部件，ADOQuery部件。ADOConnection部件負(fù)責(zé)部相應(yīng)的數(shù)據(jù)庫進(jìn)行連接的部件。它是存取

32、磁盤上數(shù)據(jù)庫表的媒介，它通過ADO存取數(shù)據(jù)庫表中的數(shù)據(jù)，再與TDataSource 進(jìn)行“對話”，使得數(shù)據(jù)瀏覽部件能夠有效地從部件中訪問數(shù)據(jù)并能顯示和編輯其中的數(shù)據(jù)。ADOQuery部件 TQuery 并與TDataSource“對話”，實現(xiàn)數(shù)據(jù)瀏覽部件對數(shù)據(jù)庫的訪問。 6. DataControl欄里的DBGrid部件DBGrid用來顯示查詢數(shù)據(jù)庫得到的內(nèi)容。3.2 數(shù)據(jù)庫詳細(xì)設(shè)計3.2.1 系統(tǒng)ER圖單價 reader掛失凍結(jié)單價 reader掛失凍結(jié)借數(shù)限制已借數(shù)剩余天數(shù)借出時間卡號borrow書編號卡號借書號book 書名書編號作者出版單位位位借書時限庫存讀者姓名3.2.2 數(shù)據(jù)庫表截

33、圖分析根據(jù)系統(tǒng)ER圖,應(yīng)用SQLSever 2000,設(shè)計數(shù)據(jù)庫,共分化成三個表:book,borrow,reader.分別截圖如下.Book表Borrow表Reader表3.2.3 數(shù)據(jù)字典數(shù)據(jù)流 注冊信息 別名 借書證 注冊信息 = 學(xué)生證號+ 系+級+班+姓名 數(shù)據(jù)流 圖書 圖書 = 圖書號（流水號）+ 圖書名+作者+定價+出版社+（備注）數(shù)據(jù)流 超期罰款 超期罰款 = 借書證號+ 系+級+班+姓名 +圖書號（流水號）+登記日期+定價3.2.4 文件字典文件 圖書庫 圖書庫 = 圖書號（流水號）+ 圖書名 + 作者 + 定價 + 出版社 +（備注） + 借/否 組織形式：以圖書號（流水號

34、）為關(guān)鍵字升序排列 說明：借/否用來表示此書是否被借文件 學(xué)生庫 學(xué)生庫 = 學(xué)號 + 系+級+班+姓名+性別組織形式：以學(xué)號為關(guān)鍵字升序排列3.3 系統(tǒng)界面詳細(xì)設(shè)計： 以下分別按照截圖，說明，程序的順序來說明各個界面。3.3.1 系統(tǒng)登陸界面設(shè)計分析:圖1 系統(tǒng)登陸界面截圖系統(tǒng)登陸界面說明：1.對Form的AlphaBlendValue屬性值設(shè)置為210，使界面半透明。2.確定按鈕用的是Bitbtn，加了圖標(biāo)增加美感，而且用了AltX快捷鍵。3.密碼是yutian，用戶名默認(rèn)。 登陸界面程序：確定按鈕的程序： procedure TForm1.BitBtn1Click(Sender: TOb

35、ject);beginif (edit2.Text=yutian)then beginform2.show;form1.hide;endelse showmessage(這個密碼有問題！)end;3.3.2 系統(tǒng)主界面設(shè)計分析圖2 系統(tǒng)主要界面截圖系統(tǒng)主界面說明：說明按鈕彈出版本，個人信息，和制作日期。圖書，讀者，借閱，三個按鈕分別用了快捷鍵。系統(tǒng)主界面程序：說明按鈕程序：procedure TForm2.FormPaint(Sender: TObject);begincanvas.TextOut(100,300,作者：阿羅);canvas.TextOut(100,330,版本1.01);ca

36、nvas.TextOut(100,360,與2009-1-5end;退出按鈕程序：procedure TForm2.Button4Click(Sender: TObject);beginclose;end;圖書按鈕程序：procedure TForm2.Button1Click(Sender: TObject);beginForm3.show;Form2.hide;end;讀者按鈕與借閱按鈕類似圖書按鈕。3.3.3 圖書管理系統(tǒng)界面分析:圖3 圖書管理系統(tǒng)界面截圖圖書管理系統(tǒng)界面說明：1其中用了Timer部件，使界面呈現(xiàn)淡入淡出形式。2以上所有按鈕都只用了跳轉(zhuǎn)語句，沒有特殊程序，不再贅述。3由

37、于返回和退出按鈕在各界面中程序基本相同，所以只說明一遍，以后不再重復(fù)。Timer部件程序：procedure TForm3.Timer1Timer(Sender: TObject);vartmp:Integer;begintmp:=AlphaBlendValue;if tmp=255 thenbegintmp:=255;Timer1.Enabled:=false;end;if(tmp=255) thenAlphaBlendValue:=tmp;end;3.3.4 圖書查詢界面設(shè)計分析:圖4 圖書查詢界面截圖圖書查詢界面說明： 1.可以按照書名，書號，出版單位，分別單獨查詢，也可以結(jié)合查詢，且都

38、是不完整查詢，在提示按鈕中有說明。2.進(jìn)入界面是數(shù)據(jù)庫顯示框是隱藏的，點擊確定才會顯示，增加美觀。3.顯示book表的全部屬性內(nèi)容。圖書查詢界面程序：確定按鈕程序：procedure TForm6.Button1Click(Sender: TObject);beginif(edit1.Text=)and(edit2.Text=) and (edit3.Text=)and (edit4.Text=)thenshowmessage(這就不太方便了！)else begin ADOQuery1.SQL.Clear; ADOQuery1.SQL.Text:=select * from book wher

39、e 書名 like+%+Edit1.Text+%+ and 書編號 like+%+Edit2.Text+%+ and 出版單位 like+%+Edit3.Text+%+ and 作者 like+%+Edit4.Text+%+; ADOQuery1.Open; DBGrid1.show;end;end;3.3.5 新書登記界面設(shè)計分析：圖5 新書登記界面截圖新書登記界面說明：將書名，作者，單價，出版單位，庫存，借書時限插入數(shù)據(jù)庫中book表。書編號默認(rèn)最大值插入。顯示book數(shù)據(jù)庫中的全部內(nèi)容，方便管理。信息清除按鈕，用來清除輸入的文字，方便連續(xù)登記新書。新書登記界面程序： 確定按鈕程序：pro

40、cedure TForm8.Button1Click(Sender: TObject);varnewid: Integer;beginif (Edit1.Text=)or(Edit2.text=)or(edit3.text=)or(edit4.text=)or(edit5.text=)or(edit6.text=)then showmessage(讓信息空著這樣不禮貌！) else beginDBGrid1.show; ADOQuery1.SQL.Clear;ADOQuery1.Active:=false;ADOQuery1.SQL.Text:=SELECT MAX(書編號)from book

41、;ADOQuery1.open;ADOQuery1.first;newid:=ADOQuery1.Fields.Fields0.AsInteger+1;ADOQuery1.close;ADOQuery1.SQL.Text:=insert into book values(+IntToStr(newid)+,+Edit1.Text+,+Edit2.Text+,+Edit3.Text+,+Edit4.Text+,+Edit5.Text+,+Edit6.Text+);ADOQuery1.ExecSQL;ADOQuery1.close;ADOQuery1.SQL.Text:=select * from

42、 book;ADOQuery1.Active:=true;end;end;信息清除按鈕程序：procedure TForm8.Button3Click(Sender: TObject);beginedit1.Clear;edit2.Clear;edit3.Clear;edit4.Clear;edit5.Clear;edit6.Clear;end;3.3.6 圖書下架界面設(shè)計分析:圖6 圖書下架界面截圖圖書下架界面說明：根據(jù)提示信息來刪除圖書，刪除相應(yīng)圖書Book表中的相應(yīng)元組。圖書下架界面程序： 確定按鈕程序： procedure TForm7.Button1Click(Sender: TOb

43、ject);beginDBGrid1.show;ADOQuery1.SQL.Clear;if (Edit1.text=)and (edit2.Text=) then showmessage(那你讓我刪除什么？：）)else begin ADOQuery1.Active:=false; ADOQuery1.sql.Text:=delete from book where 書名=+edit1.text+ or 書編號=+edit2.text+; ADOQuery1.ExecSQL; ADOQuery1.SQL.Clear; ADOQuery1.SQL.text:=select * from boo

44、k; ADOQuery1.Active:=true; end;end;3.3.7 讀者辦卡界面設(shè)計分析:圖7 讀者辦卡界面截圖讀者辦卡界面說明：輸入讀者姓名，和借數(shù)限制，將這兩項寫入數(shù)據(jù)庫中的Reader表，其中其他信息采用默認(rèn)值插入。顯示該讀者Reader表中全部屬性信息。加入了Panle部件，使信息在同一窗口顯示。（以下的Panle都是覆蓋式的Panle ）讀者辦卡界面程序： 確定按鈕程序：procedure TForm4.Button7Click(Sender: TObject);varkahao: Integer;beginif(edit1.Text=)or(edit2.Text=)

45、thenshowmessage(這個可不應(yīng)該是空??！)elsebeginADOQuery1.Active:=false;ADOQuery1.SQL.Text:=select max(卡號) from reader;ADOQuery1.Open;ADOQuery1.First;kahao:=ADOQuery1.Fields.Fields0.AsInteger+1;/ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=insert into reader values(+IntToStr(kahao)+,+edit1.Text+,+IntToStr(0)+,+edit2

46、.Text+,+IntToStr(0)+,+IntToStr(0)+);ADOQuery1.execsql;ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=select * from reader where 讀者姓名=+edit1.text+;ADOQuery1.active:=true;end;end;3.3.8 讀者信息界面設(shè)計分析:圖8 讀者信息界面截圖讀者信息界面說明：根據(jù)輸入的讀者姓名來查詢讀者Reader表中的信息。讀者信息界面程序： 確定按鈕程序：procedure TForm4.Button8Click(Sender: TObject);beg

47、inif (Edit3.text=) then showmessage(不允許輸入這么奇怪的名字)else begin ADOQuery1.Active:=false; ADOQuery1.SQL.Text:=select * from reader where 讀者姓名=+edit3.text+; ADOQuery1.Active:=true; end; end;3.3.9 讀者掛失界面設(shè)計分析:圖9 讀者掛失界面截圖讀者掛失界面說明：掛失按鈕根據(jù)輸入的讀者姓名修改Reader表中掛失屬性，將屬性值False改為True。解掛失按鈕，將True改為False。掛失統(tǒng)計按鈕首先顯示掛失讀者的總

48、數(shù)目，然后顯示掛失讀者的相應(yīng)信息，方便管理員管理。 讀者掛失界面程序： 掛失按鈕程序：procedure TForm4.Button9Click(Sender: TObject);begin if (Edit4.text=) then showmessage(不允許輸入這么奇怪的名字)else begin ADOQuery1.active:=false;ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=update reader set 掛失=1 where 讀者姓名=+Edit4.Text+;ADOQuery1.SQL.Add(select * from rea

49、der);ADOQuery1.ExecSQL;ADOQuery1.Active:=true;end; end; 解掛失按鈕與掛失按鈕程序基本相同，只一條語句不同，如下：ADOQuery1.SQL.Text:=update reader set 掛失=1 where 讀者姓名=+Edit4.Text+;掛失統(tǒng)計按鈕程序：procedure TForm4.Button16Click(Sender: TObject);var gstj:Integer;beginADOQuery1.active:=false;ADOQuery1.SQL.Text:=select count(*) from reade

50、r where 掛失=1;ADOQuery1.Open; ADOQuery1.First;gstj:=ADOQuery1.Fields.Fields0.AsInteger;showmessage(被掛失的用戶共+IntToStr(gstj)+個#13#10#13#10詳情請點擊確定查看);ADOQuery1.active:=false; ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=select * from reader where 掛失=1;ADOQuery1.Active:=true;end;3.3.10 讀者注銷界面設(shè)計分析:圖10 讀者注銷界面截圖讀

51、者注銷界面說明：根據(jù)輸入的讀者姓名，刪除Reader表中相應(yīng)的讀者信息。顯示剩余讀者的信息。讀者注銷界面程序： 確定按鈕程序：procedure TForm4.Button10Click(Sender: TObject);begin if (Edit5.text=) then showmessage(不允許輸入這么奇怪的名字)else begin ADOQuery1.active:=false; ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=delete from reader where 讀者姓名=+Edit5.Text+; ADOQuery1.SQL.Ad

52、d(select * from reader); ADOQuery1.ExecSQL; ADOQuery1.Active:=true; end;end;3.3.11 讀者凍結(jié)界面設(shè)計分析:圖11 讀者凍結(jié)界面截圖讀者凍結(jié)界面說明：凍結(jié)按鈕根據(jù)輸入的讀者姓名修改Reader表中的凍結(jié)屬性，將凍結(jié)屬性值從False修改為True，解凍結(jié)將True修改為False.。凍結(jié)統(tǒng)計按鈕首先顯示被凍結(jié)用戶的總數(shù)，然后顯示被凍結(jié)用戶的詳細(xì)信息。方便管理員管理。讀者凍結(jié)界面程序： 凍結(jié)按鈕程序：procedure TForm4.Button13Click(Sender: TObject);beginif (Ed

53、it6.text=) then showmessage(不允許輸入這么奇怪的名字)else begin ADOQuery1.active:=false; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Text:=update reader set 凍結(jié)=1 where 讀者姓名=+Edit6.Text+; ADOQuery1.SQL.Add(select * from reader); ADOQuery1.ExecSQL; ADOQuery1.Active:=true; end;end; 解凍結(jié)按鈕與凍結(jié)按鈕程序基本相同，只一條語句不同，如下：ADOQuery1.SQL

54、.Text:=update reader set 凍結(jié)=1 where 讀者姓名=+Edit6.Text+; 凍結(jié)統(tǒng)計按鈕程序：procedure TForm4.Button15Click(Sender: TObject);var djtj:Integer;beginADOQuery1.active:=false; ADOQuery1.SQL.Text:=select count(*) from reader where 凍結(jié)=1; ADOQuery1.Open;ADOQuery1.First;djtj:=ADOQuery1.Fields.Fields0.AsInteger;showmessa

55、ge(被凍結(jié)的用戶共+IntToStr(djtj)+個#13#10#13#10詳情請點擊確定查看);ADOQuery1.active:=false; ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=select * from reader where 凍結(jié)=1;ADOQuery1.Active:=true;end;3.3.12 借閱管理系統(tǒng)界面設(shè)計分析:圖12 借閱管理系統(tǒng)界面截圖借閱管理系統(tǒng)界面說明：以上按鈕全部為跳轉(zhuǎn)信息，代碼不再贅述。 3.3.13借書(還書)界面設(shè)計分析:圖13 借書(還書)界面截圖借書(還書)界面說明: 將輸入的卡號和書編號，寫入數(shù)據(jù)庫

56、中的Borrow表，其中借書號采用當(dāng)前的最大值，借出時間采用當(dāng)前的系統(tǒng)時間，剩余天數(shù)采用默認(rèn)值。寫入數(shù)據(jù)庫之前要先判斷，庫存是否不足，該卡是否掛失，凍結(jié)，注銷，以及該卡是否已達(dá)到最大借數(shù)限制。若滿足其中任何一條則彈出相應(yīng)提示信息。顯示數(shù)據(jù)庫Borrow表中的借書號,卡號,書編號,借出時間,剩余天數(shù)，以及Book表中的庫存數(shù)據(jù)。方便管理員使用。修改已借數(shù)，庫存。使用Timer部件模擬催繳到期圖書。借書（還書）界面程序： 借書按鈕程序：procedure TForm9.Button1Click(Sender: TObject);begin ADOQuery1.SQL.Clear;DBGrid1.s

57、how; if (Edit1.Text= )or ( Edit2.Text= ) then ShowMessage(您要借什么？) else beginADOQuery1.close;ADOQuery1.SQL.Text:=SELECT 借數(shù)限制,已借數(shù),掛失,凍結(jié) from reader where 卡號=+Edit1.Text+; ADOQuery1.open; ADOQuery1.first; jsxz:=ADOQuery1.Fields.Fields0.AsInteger; yjs:=ADOQuery1.Fields.Fields1.AsInteger; guashi:= ADOQue

58、ry1.Fields.Fields2.AsBoolean; dongjie:= ADOQuery1.Fields.Fields3.AsBoolean; ADOQuery1.SQL.Text:=select 庫存 from book where 書編號=+Edit2.text+; ADOQuery1.open; ADOQuery1.first; kucun:= ADOQuery1.Fields.Fields0.AsInteger; if (kucun=0) then showmessage(該書庫存不足，請借閱其他書籍！) else begin if guashi then showmessag

59、e(該卡已掛失，不能借閱圖書！) else begin if dongjie then showmessage(該卡已被凍結(jié)，無法借閱圖書！) else begin if (jsxz=yjs) then showmessage(借書數(shù)已達(dá)到最大限制，無法借閱圖書！) else beginADOQuery1.SQL.Text:=SELECT MAX(借書號) from borrow ;ADOQuery1.active:=false;ADOQuery1.open;ADOQuery1.first;newid:=ADOQuery1.Fields.Fields0.AsInteger+1; ADOQuer

60、y1.close; ADOQuery1.SQL.Clear;ADOQuery1.SQL.text:=insert into borrow values(+IntToStr(newid)+,+Edit1.Text+,+Edit2.Text+,+DateToStr(Now)+,+IntToStr(14)+); ADOQuery1.ExecSQL; ADOQuery1.close; ADOQuery1.SQL.Clear;ADOQuery1.SQL.Text:=update reader set 已借數(shù)=已借數(shù)+1 where 卡號=+Edit1.Text+;ADOQuery1.ExecSQL;AD