【正文】 end。 + + 39。密碼修改失敗 !39。 。 (39。)。)。 (39。 。jszh39。 (39。 if ( = 39。 if = 39。 if = 39。密碼修改失敗 !39。 。 (39。 if = 39。 if = 39。 := 39。 (39。values(:name,:xh,:depart,:phone,:jszh,:xb,:mm)39。A39。 Exit。 Exit。 Exit。 Exit。 := 39。).Value := StrToDate(Trim())。id39。 if = 39。 := 39。 Exit。 Exit。 Exit。 Exit。 (39。 if 0 then := (39。 end。沒有此書 , 請重新 選擇！ 39。39。39。 if (BorrowBookID 39。 then begin scope fthnirj.(2)uld:m,qay3bkw4x56v1g21 ShowMessage(39。 。 Result := [0].Value。)。 (39。 (39。 := false。 := 39。 := strSql。readerid39。 end else begin strBookID := Trim()。)。 。).Value:=Trim(edtB)。類別名稱不能為空！ 39。 procedure (Sender: TObject)。update 圖書明細(xì)表 set 狀態(tài) =39。 end。39。 end。 + + 39。 begin 。 程序相關(guān)代碼： procedure (Sender: TObject)。).Value := 。 aName: String。, mtinformation, [mbyes, mbno], 0) = mryes then begin ShowMessage(39。 end。 其子系統(tǒng)描述： ，主要整理圖書的數(shù)量、類別和各種相關(guān)的信息等。 ⑶ 總結(jié) ⑷ 驗(yàn)收情況 scope fthnirj.(2)uld:m,qay3bkw4x56v1g7 系統(tǒng)需求分析 隨著學(xué)校規(guī)模的不斷擴(kuò)大，圖書數(shù)量的急劇增加，有關(guān)圖書的信息量也在不斷成倍增長。為了減少或消除關(guān)系模式中存在的數(shù)據(jù)冗余和操作異常，根據(jù)設(shè)計(jì)所要求的規(guī)范級別， 按照本課程所學(xué)知識(shí)，逐一分析各個(gè)關(guān)系模式是否滿足規(guī)定的范式。本課程設(shè)計(jì)要求學(xué)生在自己的設(shè)計(jì)中能反映出基本的安全性和完整性功能。 下面是各個(gè)設(shè)計(jì)階段的具體內(nèi)容。即根據(jù)需求分析的結(jié)果，抽取出與本課程設(shè)計(jì)相關(guān)的特性。 ⒉ 選題要求 在后面的課題表中列出了幾個(gè)設(shè)計(jì)課題，每個(gè)課題都有相應(yīng)的要求或說明。 功能劃分 圖書管理系統(tǒng)主要實(shí)現(xiàn)以下 5方面的功能： 1．書籍管理功能：包括書籍類別管理和書籍信息管理兩部分。 、讀者查詢和用戶查詢等功能。 + 13。 end。 登錄按鈕代碼： procedure (Sender: TObject)。 Open。 end。, mtinformation, [mbyes, mbno], 0) = mryes then Close。 。 procedure (Sender: TObject)。作者 =39。刪除記錄 39。 + strBookID。 begin if = 39。 。 (39。是否刪除記錄？ 39。39。+ strBookID。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g18 。借閱成功，還有要借的書籍嗎 ？ 39。39。 + + 39。).Value := BookID。).Value := user。 function (userID: string): integer。 end。 end。 end。 。 and 借出狀態(tài) =1 39。 := strSql。 := 39。 (39。 :=39。 。圖書編號不能為空！ 39。作者不能為空！ 39。售價(jià)不能為空！ 39。select * from 圖書明細(xì)表 where 圖書編號 =:A 39。39。 。 (39。 。39。學(xué)號不能為空！ 39。select * from 學(xué)生信息表 where 學(xué)號 =:A 39。系別不能為空！ 39。借書證號不能為空！ 39。)。xh39。).Value := Trim()。 end。 。 。舊密碼不正確 !39。xm39。 。 。 。請重新檢查密碼 39。).Value := trim()。讀者信息已修改，還要繼續(xù)修改嗎？ 39。姓名 39。).AsString := 。pass39。 end。舊密碼不正確 !39。xm39。 。 。確實(shí)，做什么，只是認(rèn)真地去做，踏踏實(shí)實(shí)，戒躁戒躁，靜靜地思考，慢慢地進(jìn)步，真的是天下無難事。39。圖書編號 39。 ShowMessage(39。)。select * from 學(xué)生信息表 where 姓名 =:xm and 密碼 =:mm39。 ShowMessage(39。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g31 登錄按鈕代碼： procedure (Sender: TObject)。性別 39。39。).Value := trim()。update 學(xué)生信息表 (姓名 ,學(xué)號 ,39。借書證號不能為空！ 39。系別不能為空！ 39。學(xué)號不能為空 !39。 ShowMessage(39。)。select * from 用戶 where 姓名 =:xm and 密碼 =:mm39。請輸入新密碼！ 39。用戶名不能為空！ 39。39。depart39。 := 39。 。39。 if 0 then begin ShowMessage(39。39。39。39。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g25 (39。 + 39。39。 if 0 then begin ShowMessage(39。39。39。39。39。 begin Query := (self)。39。39。 end。 //更新圖書信息表在庫標(biāo)志 strBookID := Trim()。39。 。 strBookID: string。select count(圖書編號 ) from 借出信息 where 圖書編號 =:id and 借出狀態(tài) =139。)。 procedure (Sender: TObject。 end。 end。 begin if Key = 13 then begin if ViewBook() = false then begin ShowMessage(39。39。39。:readerID,:time,1)39。 end。 var strBookID: string。} 。 (39。 Exit。) else ShowMessage(39。圖書編號 39。39。圖書編號 =39。39。學(xué)號 39。 end。 Exit。 (39。 [3].Text := 39。 ShowMessage(Str)。 procedure (Sender: TObject)。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g8 概念模型設(shè)計(jì) 讀者實(shí)體 圖 31 讀者實(shí)體 圖書實(shí)體 圖 32 圖書實(shí)體 、 讀者實(shí)體 學(xué)號 姓名 系別 借書證號 證號 性別 圖書實(shí)體 圖書編號 類別編號 作者 出版日期 數(shù)據(jù)庫配置文件已經(jīng)安裝到 D:\oracle\product\10.,同時(shí)其他選定的安裝組件也已經(jīng)安裝到 D:\oracle\product\10.\db_1。 3．參考選題 工資管理系統(tǒng) 人事管理系統(tǒng) 倉庫管理系統(tǒng) 學(xué)生管理系統(tǒng) 圖書館管理信息系統(tǒng) 賓館客房管理信息系統(tǒng) 學(xué)籍管理系統(tǒng) 機(jī)票預(yù)定系統(tǒng) scope fthnirj.(2)uld:m,qay3bkw4x56v1g 學(xué)生成績管理系統(tǒng) 課程管理子系統(tǒng) 通訊錄子系統(tǒng) 教室管理子系統(tǒng) 宿舍管理子系統(tǒng) 個(gè)人事務(wù)管理子系 統(tǒng) 庫房管理系統(tǒng) 小商店銷售管理系統(tǒng) 其它管理子系統(tǒng)數(shù)據(jù)庫設(shè)計(jì) (自己選題需經(jīng)指導(dǎo)教師認(rèn)可 ). 課程設(shè)計(jì)的設(shè)計(jì)報(bào)告是學(xué)生對本次課程設(shè)計(jì)的全面總結(jié)，應(yīng)該反映每個(gè)設(shè)計(jì)階段的設(shè)計(jì)思路和設(shè)計(jì)內(nèi)容。 ⒊ 數(shù)據(jù)庫的邏輯設(shè)計(jì) 數(shù)據(jù)庫邏輯設(shè)計(jì)的目的是將概念設(shè)計(jì)階段設(shè)計(jì)好的 ER圖轉(zhuǎn)換成與具體機(jī)器上的 DBMS（如 Oracle）所支持的數(shù)據(jù)模型（如關(guān)系模型）相符合的邏輯結(jié)構(gòu)。 ⑵ 信息需 求。學(xué)生在設(shè)計(jì)中應(yīng)根據(jù)具體的課題要求確定系統(tǒng)應(yīng)該實(shí)現(xiàn)的功能，一些基本的功能通常是必須具備的，如用戶的管理與維護(hù)，基本數(shù)據(jù)的維護(hù)，靈活的信息查詢等。 本階段的設(shè)計(jì)結(jié)果（局部和全局 ER圖、具體數(shù)據(jù)庫設(shè)計(jì)工具中概念結(jié)構(gòu)設(shè)計(jì)圖）應(yīng)該在課程設(shè)計(jì)報(bào)告中進(jìn)行詳細(xì)描述，應(yīng)該能夠反映該設(shè)計(jì)的正確性，作為本課程設(shè)計(jì)的 驗(yàn)收依據(jù)之一。若確因條件所限，必須要改變課題要求時(shí)，應(yīng)在征得指導(dǎo)教師同意的前提下進(jìn)行。管理員有權(quán)力行使所有的管理功能，普通用戶只能進(jìn)行一般的查詢。 end。請自便！ 39。 + DateToStr(Date)。)。39。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g14 begin 。 if = 39。 + + 39。 then scope fthnirj.(2)uld:m,qay3bkw4x56v1g15 begin := 39。39。 b