【正文】 do begin classnode:=(matenode,(39。39。+(39。 :=39。 StrCopy(p,pchar(s1))。 s1:=(39。 end。39。39。 。 getmem(p,255)。).AsString)。 。).AsString+39。39。 。).AsString。sbookclass39。)。 qrysub:=(self)。 。 qryclass:=(self)。 。 qrysub,qrymaster,qrymate,qryclass:tadoquery。 end。 //如果已登錄，則可進(jìn)入‘我的圖書館’，否則提示先登錄 end else begin Showmessage(39。 begin 。 begin :=false。 procedure (Sender: TObject)。 18) 更新員工： ALTER PROCEDURE [dbo].[Proc_UpdateReader]讀者自行修改的信息 ReaderId varchar(50),Name varchar(20)=null,sex varchar(10)=null, Email varchar(30)=null,Phone varchar(20)=null,Birthday date=null AS BEGIN update [dbo].Reader set Name=Name,Sex=sex,Email=Email,Phone=Phone, Birthday=Birthday where sReaderId=ReaderId END if error0 or rowcount = 0 rollback transaction。.39。 exec(sql) END if error0 or rowcount = 0 rollback transaction。39。39。+tepstr+39。39。39。+tepstr+39。 set pre = las end end set tepstr = substring(string,pre,len(string)+1pre) set sql = sql + 39。+tepstr+39。39。39。+tepstr+39。39。39。,string,pre) if (las 0) begin set tepstr = LTRIM(substring(string,pre,laspre)) if (tepstr 39。39。39。 12) 超期： ALTER PROCEDURE [dbo].[Proc_readerborrow] sReaderId varchar(30) AS BEGIN select *from Borrowed,Book where sReaderId=sReaderId and = and Return_Date is null END if error0 or rowcount = 0 rollback transaction。日期 39。+cast(GETDATE()as varchar(10)) insert into Stock values (StockId,orderId,Isbn,price,RealNum,GETDATE(),Author,stockstaffId,1) END if error0 or rowcount = 0 rollback transaction。 4) 用戶是否能借閱： ALTER PROCEDURE [dbo].[Proc_Canborrow] userId varchar(30),can_borrow int output AS BEGIN 15 declare tmp_num1 int 已借書目 declare tmp_num2 int 可借書目 declare tmp int select tmp_num1=count(*) from borrowed where sReaderId= userId and return_date=null select tmp_num2=Max_borrow_num from ReaderKind where iReaderLevel=(select ireaderLevel from Reader where sReaderId=userId ) select tmp=Lend_able from Reader where sReaderId=userId if tmp_num1=tmp_num2 and tmp=1 set can_borrow=1 else set can_borrow=0 END if error0 or rowcount = 0 rollback transaction。,readerlevel int =2,Name varchar(20)=null, sex varchar(10)=null,Email varchar(30)=null,Phone varchar(20)=null,Birthday date=null, 14 lend_able int =1,able int output AS BEGIN if exists (select *from Reader where sReaderId=readerid) set able=0 else begin insert into Reader values(readerid,spassword,readerlevel,Name,sex,Email,Phone,Birthday,lend_able,null) set able=1 end END if error0 or rowcount = 0 rollback transaction。88888839。 數(shù)據(jù)結(jié)構(gòu)：用戶 +密碼 +級(jí)別 說(shuō)明：級(jí)別是“管理員”或“讀者”。 說(shuō)明：讀者借閱了一本書，就生成一條借閱記錄。 b) 數(shù)據(jù)流名稱：用戶身份 位置： P3{,} 定義：用戶身份 =[非法用戶 |管理員 |讀者 ] 數(shù)據(jù)流量：平均流量為每月傳輸 2021次，高峰期流量每天傳輸 100次。 圖 2 “內(nèi)部管理”的細(xì)化數(shù)據(jù)流圖 圖 3 “借書管理”的細(xì)化數(shù)據(jù)流圖 圖 書 進(jìn)貨、入庫(kù) 讀者情況 圖書 圖書 管理 D1 圖書記錄 讀者 管理 D1 讀者記錄 讀者 還書請(qǐng)求 圖書情況 圖書信息 借書請(qǐng)求 讀者 查看 書目 D1 圖書記錄 借書 處理 D3 借書記錄 還書 處理 讀 者 圖書 D2 讀者記錄 7 經(jīng)過(guò)整理后得出細(xì)化后的系統(tǒng)數(shù)據(jù)流圖，如圖 4 圖 4 細(xì)化后的圖書館管理系統(tǒng)數(shù)據(jù)流圖 5. 數(shù)據(jù)字典： 圖書館 管理系統(tǒng)數(shù)據(jù)流圖中，數(shù)據(jù)信息和處理過(guò)程需要通過(guò)數(shù)據(jù)字典才能描述清楚。 如何使用 delphi 有效地實(shí)現(xiàn)，將是一個(gè)值得思考的問(wèn)題。因此根據(jù)這些信息，本系統(tǒng)的主要功能就是：實(shí)現(xiàn)圖書館圖書信息的管理和維護(hù)，如用戶信息管理，圖書館規(guī)則維護(hù)，新書入庫(kù)，整理圖書，修改圖書信息和進(jìn)行查詢 等；以及服務(wù)系統(tǒng)的圖書信息查詢，圖書的借出和歸還等功能 ； 圖書信息管理系統(tǒng)能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?.例如 :檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。 4 二、 需求分析 1. 問(wèn)題的提出 ： 隨著科學(xué)技術(shù)的不斷提高 ,計(jì)算機(jī)科學(xué)日漸成熟 , 作為計(jì)算機(jī)應(yīng)用的一部分 ,使用計(jì)算機(jī)對(duì)圖書信息進(jìn) 行管理 ,具有手工管理所無(wú)法比擬的優(yōu)點(diǎn)。這篇文章詳細(xì)介紹了 Microsoft SQL Server 2021 中的新的特性、優(yōu)點(diǎn)和功能 ?? 在現(xiàn)今數(shù)據(jù)的世界里，公司要獲得成功和不斷發(fā)展，他們需要定位主要的數(shù)據(jù)趨勢(shì)的愿景。主創(chuàng)者為 Anders Hejlsberg。同樣，圖書館管理系統(tǒng)有效地管理也離不開(kāi)計(jì)算機(jī)。而如今積累的書籍越來(lái)越多，若是不對(duì)其進(jìn)行有效地管理，對(duì)信息的查詢就如大海撈針不得其所。 8 七、附錄 8 六 、收獲和體會(huì) 1 南 京 理 工 大 學(xué) 課程設(shè)計(jì)說(shuō)明書 作者： 趙軍旺 學(xué)號(hào)： 0906840442 黃岳 0906840419 學(xué)院 (系 ): 計(jì)算機(jī)科學(xué)與技術(shù)學(xué)院 專 業(yè)： 計(jì)算機(jī)科學(xué)與技術(shù) 題 目： Delphi 軟件課程設(shè)計(jì) —— 圖書館管理系統(tǒng) 2021年 9月 2 目錄 一、概述 4 三 、系統(tǒng)設(shè)計(jì) 9 3 一、 概述 1. 項(xiàng)目背景 ： 隨著知識(shí)經(jīng)濟(jì)時(shí)代的迅速發(fā)展，由于以前廣泛使用的 管理 書籍的方法都將慢慢淘汰。隨著計(jì)算機(jī)及性能的不斷提高，計(jì)算機(jī)已經(jīng)在教學(xué)、科研、管理等方面得到越來(lái)越廣泛的應(yīng)用。它的前身，即是 DOS 時(shí)代盛行一時(shí)的 “BorlandTurbo Pascal” ，最早的版本由美國(guó) Borland（寶蘭）公司于 1995 年開(kāi)發(fā)。 SQL Server 2021 是一個(gè)重大的產(chǎn)品版本，它推出了許多新的特性和關(guān)鍵的改進(jìn)，使得它成為至今為止的最強(qiáng) 大和 最全面的 SQL Server版本。 4. 開(kāi)發(fā)環(huán)境 ： Delphi 菜單、 Delphi 快捷工具欄、 Delphi 組件面板、對(duì)象樹狀查看器、對(duì)象查看器、有豐富的第三方控件。圖書的使用對(duì)象是借閱者，例如學(xué)生，教師；管理者是圖書館的管理員。 綜上，本系統(tǒng)主要著力于解決 三 個(gè)問(wèn)題，一是服務(wù)功能， 包括查 詢，借閱等等；二是管理功能，包括管理員對(duì)數(shù)目和讀者的管理；三是讀書的采購(gòu)功能，包括訂單和入庫(kù)等。實(shí)際上“ 圖書管理”還可以細(xì)化，分為圖書記錄維護(hù)、訂單增加和新書入庫(kù)三個(gè)下級(jí)處理框，而“ 讀者管理”也可以細(xì)化為新讀者入戶和讀者記錄維護(hù)兩個(gè)下級(jí)處理框。 說(shuō)明：圖書入庫(kù)時(shí)，根據(jù)圖書情況建立圖書記錄；讀者還書時(shí)要核實(shí)圖書基本信息是否與圖書記錄相符，要檢查圖書是否完好。 存取方式：聯(lián)機(jī)處理，以更新操作為主，隨機(jī)檢索。 存取方式：聯(lián)機(jī)處理，以檢索為主，順序檢索。 9 三、 系統(tǒng)設(shè)計(jì) 1. 數(shù)據(jù)表 1) ER 圖： Level BookNum Borrowdate Returndate manage Manager ManagerID Password Name Level Present Position Plevel Pname Borrowed Reader Name Sex Birthday UserID Password Deadline Level has ReaderKind MaxSum add Order OrderID Orderdate orderStaffID BookName BookPress of Stock stockID orderID enterStaffID of Book IndexNum Isbn BookID Name Author Press Price Bookstate Price Author Isbn realNum