【正文】 Value:=。readerid39。(39。 := 39。update 借出信息 set 借出狀態(tài)=1 where 圖書編號= 39。 end else begin strBookID := Trim()。 if getBookCount() 0 then begin ShowMessage(39。)。 if = 39。)。begin if = 39。, MB_OKCANCEL) = IDOK then 。begin if (39。 。 。(39。values(:id,:name)39。).Value:=Trim()。id39。insert into 圖書類別(類別編號,圖書類別)39。 end。類別名稱不能為空！39。 end。類別編號不能為空！39。確定按鈕代碼：procedure (Sender: TObject)。procedure (Sender: TObject)。該書注銷失?。?9。 。 where 圖書編號=39。update 圖書明細表 set 狀態(tài)=39。 then begin strBookID := Trim()。procedure (Sender: TObject)。, 39。end。 := true。 + + 39。 end else begin := 39。39。39。 if = 39。end。 end。39。39。 := true。 + + 39。 then begin := 39。begin 。確定要退出嗎?39。begin 。procedure (Sender: TObject)。end。begin 。程序相關代碼：procedure (Sender: TObject)。 end else begin 。)。管理員39。).Value := 。username39。 (39。end。 aName: String。時間:39。begin [2].Text := 39。 。, mtinformation, [mbyes, mbno], 0) = mryes then begin ShowMessage(39。end。 + 13。圖書管理系統(tǒng)39。end。begin 。 其功能模塊圖如下所示圖書管理系統(tǒng)讀者管理功能系統(tǒng)管理功能圖書管理功能借閱管理功能新書入庫功能圖書類別功能讀者信息功能讀者查詢功能增加用戶密碼修改借書管理功能還書管理功能數(shù)據(jù)實施和維護程序?qū)崿F(xiàn)相關代碼：procedure (Sender: TObject)。、新增用戶、刪除用戶可執(zhí)行的系統(tǒng)操作等。其子系統(tǒng)描述：，主要整理圖書的數(shù)量、類別和各種相關的信息等。 圖書管理：其功能是管理書庫中圖書的記錄信息，對入庫圖書信息進行管理，并進行查詢。 安全性需求 每位用戶根據(jù)自己的身份不同，進入不同的用戶界面。圖書管理系統(tǒng)主要實現(xiàn)以下5方面的功能： 1．書籍管理功能：包括書籍類別管理和書籍信息管理兩部分。面對龐大的信息量，就需要有圖書管理系統(tǒng)來提高圖書管理工作的效率。設計報告一般要以固定規(guī)格的紙張（如A4）書寫或打印并裝訂，字跡及圖形要清楚，工整，規(guī)范。 人事管理系統(tǒng)設計時要嚴格按照題意要求進行設計，不能隨意更改。⒉ 選題要求在后面的課題表中列出了幾個設計課題，每個課題都有相應的要求或說明。在課程設計報告中應該提供本設計階段的相關內(nèi)容，作為本課程設計的驗收依據(jù)之一。要求學生在本階段的設計中分兩步進行：● 形成初始的關系模式。通過對局部ER模型的操作，解決各個ER模型關于對象定義不一致問題，以及對各個ER模型進行合并優(yōu)化等，最終形成數(shù)據(jù)庫的全局概念模式。即根據(jù)需求分析的結(jié)果，抽取出與本課程設計相關的特性。 本階段的設計結(jié)果（即系統(tǒng)需求分析）應該在課程設計報告中進行詳細描述，畫出系統(tǒng)的數(shù)據(jù)流圖，寫出較為詳細的數(shù)據(jù)字典，作為本課程設計的驗收依據(jù)之一。學生應該根據(jù)具體的課題，認真分析有關的要求，確定本設計的信息需求。即用戶要完成什么處理功能等。下面是各個設計階段的具體內(nèi)容。因此，在設計中，要求學生應該全面考慮各個設計環(huán)節(jié)以及它們之間的相互聯(lián)系。用戶對數(shù)據(jù)庫的需求包括：⑴ 處理需求。即在數(shù)據(jù)庫中需要存儲哪些數(shù)據(jù)。本課程設計要求學生在自己的設計中能反映出基本的安全性和完整性功能。本設計階段可分為：● 數(shù)據(jù)抽象?！?設計全局概念模式。鑒于本課程設計的具體環(huán)境要求，學生在進行數(shù)據(jù)庫的邏輯結(jié)構(gòu)設計時應該充分考慮特定的數(shù)據(jù)庫環(huán)境。為了減少或消除關系模式中存在的數(shù)據(jù)冗余和操作異常，根據(jù)設計所要求的規(guī)范級別，按照本課程所學知識，逐一分析各個關系模式是否滿足規(guī)定的范式。2．設計要求：鑒于數(shù)據(jù)庫選題原理課程設計的具體內(nèi)容，對課程設計提出如下要求：⒈ 選題原則課程設計題目以選用學生相對比較熟悉的業(yè)務模型為宜，要求通過本實踐性教學環(huán)節(jié)，能較好地鞏固數(shù)據(jù)庫的基本概念、基本原理、關系數(shù)據(jù)庫的設計理論、設計方法等主要相關知識點，針對實際問題設計概念模型，并應用現(xiàn)有的工具完成小型數(shù)據(jù)庫的設計與實現(xiàn)。若學生對課題表以外的相關課題較感興趣，希望選作課程設計的課題時，應征得指導教師的認可，并寫出明確的設計要求和說明。 圖書館管理信息系統(tǒng)該設計報告，應作為整個課程設計評分的書面依據(jù)和存檔材料。⑶ 總結(jié)⑷ 驗收情況系統(tǒng)需求分析 隨著學校規(guī)模的不斷擴大，圖書數(shù)量的急劇增加，有關圖書的信息量也在不斷成倍增長。通過這樣的系統(tǒng)，我們可以做到信息的規(guī)范管理和快速查詢，實現(xiàn)了圖書管理的系統(tǒng)化、規(guī)范化和自動化，這樣不僅減少了管理工作量，還提高了管理效率，降低了管理成本。4．系統(tǒng)管理：包括修改系統(tǒng)用戶密碼、增加新用戶以及退出系統(tǒng)等。
iSQL*Plus URL 為:
:5560/isqlplus
iSQL*Plus DBA URL 為:
:5560/isqlplus/dba
證號作者圖書名稱類別編號圖32 圖書實體、 借書實體ER圖借書信息實體圖書編號借書證號借出日期還書日期借出狀態(tài)圖33借書實體 系統(tǒng)實體ER圖讀者圖書借閱圖34實體ER圖詳細設計 邏輯設計圖書實體（圖書編號，類別編號，圖書名稱，作者，出版日期）讀者實體（學號，姓名，性別，系別，借書證號，聯(lián)系電話）借書信息實體（圖書編號，讀者編號，借出日期，還書編號，借書狀態(tài)） 物理設計由數(shù)據(jù)模型利用SQLsever2000進行數(shù)據(jù)庫的詳細設計，本系統(tǒng)設計的數(shù)據(jù)庫名為shop，其基本表的設計如下：(1) 學生信息表字段名稱數(shù)據(jù)類型大小學號varchar50姓名varchar20性別varchar4系別varchar5聯(lián)系電話varchar50借書證號varchar50密碼varchar15 (2)圖書明細表字段名稱數(shù)據(jù)類型大小圖書編號int50圖書名稱varchar20作者varchar4出版社varchar5出版日期varchar50定價varchar50類別編號varchar15狀態(tài)char6(3)圖書類別字段名稱數(shù)據(jù)類型大小類別編號smallint2圖書類別nvarchar20(4)用戶字段名稱數(shù)據(jù)類型大小姓名varchar20性別varchar4類型varchar50聯(lián)系電話varchar15密碼varchar50(5)借出信息字段名稱數(shù)據(jù)類型大小借出編號int4圖書編號int 4借書證號varchar50借出日期smalldatetime4借出狀態(tài)bit4本系統(tǒng)包括的模塊主要有如下幾個部分：圖書管理模塊、借閱管理模塊、讀者管理模塊、系統(tǒng)管理模塊、信息查詢模塊、用戶管理模塊 系統(tǒng)管理：其功能是為系統(tǒng)的使用者進行帳戶和密碼管理以及基礎數(shù)據(jù)維護?？梢杂涗浶录尤氲淖x者的信息，并且可以對已經(jīng)存在于數(shù)據(jù)庫中的讀者的信息進行修改，同時可以進行讀者借、還書的管理。，如修改密碼、登錄系統(tǒng)、退出登錄，還有系統(tǒng)簡介等功能。procedure (Sender: TObject)。begin 。begin Str := 39。大家好39。 ShowMessage(Str)。確定要退出本系統(tǒng)嗎?39。 // 。procedure (Sender: TObject)。 [3].Text := 39。procedure (Sender: TObject。end。 。 (39。pass39。).Value := 39。用戶名、密碼錯誤或您不是管理員，請重新輸入!39。 Exit。end。procedure (Sender: TObject)。begin 。end。procedure (Sender: TObject)。begin if messagedlg(39。procedure (Sender: TObject)。學號39。39。39。姓名=39。39。 。begin 。 := false。圖書編號=39。39。 。39。3