軟件工程畢業(yè)論文--圖書館管理系統(tǒng)的圖書流通管理

1、<p><b>　?。?lt;/b></p><p>　　二 〇 一 二 年 六 月</p><p><b>　　摘 要</b></p><p>　　隨著現(xiàn)代科學(xué)技術(shù)的進(jìn)步，人類社會正逐走向信息化。圖書館擁有豐富的文獻(xiàn)信息資源，是社會信息系統(tǒng)的重要組成部分，在信息社會中的作用愈來愈重要。我國圖書館計(jì)算機(jī)等信息技術(shù)的應(yīng)

2、用起步于20世紀(jì)70年代末期，隨著改革開放的步伐得以迅速發(fā)展，特別是90年代以后，我國圖書館信息網(wǎng)絡(luò)建設(shè)取得了較大發(fā)展，圖書館信息化建設(shè)邁上了一個新臺階。</p><p>　　隨著國內(nèi)教育水平的不斷進(jìn)步，我國教育事業(yè)發(fā)展蒸蒸日上，辦學(xué)條件日趨改善，隨之帶來的是學(xué)校的數(shù)據(jù)信息越來越龐大，越來越不易管理，表現(xiàn)比較明顯的就在學(xué)校的圖書館管理方面。</p><p>　　學(xué)校的圖書館藏書在規(guī)模上越來

3、越大，圖書館的日常管理和維護(hù)工作日益繁重，以往傳統(tǒng)的人工管理方法是一種封閉式管理，通過卡片登記借閱信息，只能實(shí)現(xiàn)有限的流通，而且登記的紙質(zhì)檔案也不利于長期保存，使得圖書館不能發(fā)揮應(yīng)有的作用；即使是實(shí)現(xiàn)了正常流通的，也不能提供管理上需要的各種信息，如本館各種資料分布及借閱（流通）情況。</p><p>　　本文介紹了在Borland Delphi7 Studio Enterprise環(huán)境下開發(fā)圖書管理信息系統(tǒng)的過程

4、。文章介紹了圖書館管理信息系統(tǒng)的系統(tǒng)分析部分，包括可行性分析、圖書借閱流程分析等；系統(tǒng)設(shè)計(jì)部分主要介紹了系統(tǒng)功能設(shè)計(jì)和數(shù)據(jù)庫設(shè)計(jì)及代碼設(shè)計(jì)；系統(tǒng)實(shí)現(xiàn)部分說明了幾個主要模塊的算法，本系統(tǒng)界面友好，操作簡單，比較實(shí)用。</p><p>　　關(guān)鍵詞：計(jì)算機(jī)；圖書管理系；數(shù)據(jù)庫設(shè)計(jì)；Delphi開發(fā)</p><p><b>　　Abstract</b></p>

5、<p>　　Along with the progress of modern science and technology, human society is driven to informatization. Libraries have abundant literature information resources, social information system is an important part of

6、 the role in the information society, more and more important. Chinese library computers started in the application of information technology in the late 1970's, along with the reform and opening-up develop rapidly,

7、especially after 1990s, the library information network construction in Chi</p><p>　　Owing to the constantly advancement of domestic education, China's education career develops day by day, and manageria

8、l condition is improving, these changes bring many problems. For example, school’s information become more and more huge, and it’s not easy to manage.</p><p>　　The school library management is obvious. As we

9、 all known, the school library collection is expanding continually in the scale, tasks of day-to-day management and maintenance become more and more onerous. However, the traditional artificial management method is a clo

10、sed management which only realizes the limited circulation through the card borrowing registration information. What’s more, it was not suited to long-term preservation, and can’t make libraries play full role. Even if r

11、ealize the no</p><p>　　This paper introduces in Borland Delphi7 Studio Enterprise environment development books management information system process .This paper introduces the library management information

12、 system of analysis parts, including the feasibility analysis, library process analysis. System design part mainly introduced the system function design and database design and code design , System realize part of severa

13、l major modules illustrates the algorithm, this system friendly interface , the operation is sim</p><p>　　Keywords: Computer ; Library management system ; Database design ;Delphi development 目 錄</p>

14、<p><b>　　引 言1</b></p><p>　　第一章 需求分析2</p><p><b>　　1.1開發(fā)背景2</b></p><p><b>　　1.2定義2</b></p><p><b>　　1.3用戶要求2</b>

15、;</p><p>　　1.3.1 管理員登錄2</p><p>　　1.3.2讀者管理3</p><p>　　1.3.3圖書管理3</p><p>　　1.3.4圖書借閱3</p><p>　　1.3.5圖書歸還3</p><p>　　1.3.6預(yù)約清單4</p>&

16、lt;p>　　1.3.7圖書罰款4</p><p>　　1.4 系統(tǒng)開發(fā)環(huán)境與工具4</p><p>　　第二章 系統(tǒng)設(shè)計(jì)5</p><p><b>　　2.1問題分析5</b></p><p>　　2.1.1讀者管理5</p><p>　　2.1.2圖書管理5</p>

17、;<p>　　2.1.3圖書流通管理6</p><p>　　2.2系統(tǒng)流程分析7</p><p>　　2.2.1系統(tǒng)業(yè)務(wù)流程7</p><p>　　2.2.2系統(tǒng)數(shù)據(jù)流程：7</p><p>　　2.3系統(tǒng)功能分析8</p><p>　　2.3.1讀者管理8</p><p&

18、gt;　　2.3.2圖書管理9</p><p>　　2.3.3圖書流通管理10</p><p>　　2.4數(shù)據(jù)庫設(shè)計(jì)11</p><p>　　2.4.1靜態(tài)數(shù)據(jù)11</p><p>　　2.4.2動態(tài)數(shù)據(jù)11</p><p>　　2.4.3數(shù)據(jù)字典12</p><p>　　2.4.4

19、數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)16</p><p>　　第三章 主程序及登錄窗體設(shè)計(jì)17</p><p><b>　　3.1概述17</b></p><p>　　3.2登錄窗體設(shè)計(jì)17</p><p>　　3.2.1窗體設(shè)計(jì)17</p><p>　　3.2.2窗體程序代碼17</p>

20、<p>　　3.3主窗體設(shè)計(jì)18</p><p>　　3.3.1窗體設(shè)計(jì)18</p><p>　　3.3.2窗體程序代碼19</p><p>　　第四章 讀者管理模塊設(shè)計(jì)23</p><p>　　4.1完成讀者類別設(shè)置功能23</p><p>　　4.1.1窗體設(shè)計(jì)23</p>&

21、lt;p>　　4.1.2運(yùn)行結(jié)果23</p><p>　　4.2完成讀者檔案管理功能23</p><p>　　4.2.1窗體設(shè)計(jì)23</p><p>　　4.2.2窗體代碼24</p><p>　　4.2.3運(yùn)行結(jié)果26</p><p>　　第五章 圖書管理模塊設(shè)計(jì)27</p><

22、p>　　5.1完成圖書類別設(shè)置功能27</p><p>　　5.1.1窗體設(shè)計(jì)27</p><p>　　5.1.2運(yùn)行結(jié)果27</p><p>　　5.2完成圖書檔案管理功能27</p><p>　　5.2.1窗體設(shè)計(jì)27</p><p>　　5.2.2窗體代碼28</p><p&

23、gt;　　5.2.3運(yùn)行結(jié)果31</p><p>　　第六章 圖書流通管理模塊設(shè)計(jì)32</p><p>　　6.1完成圖書借閱功能32</p><p>　　6.1.1窗體設(shè)計(jì)32</p><p>　　6.1.2窗體程序代碼32</p><p>　　6.1.3運(yùn)行結(jié)果35</p><p&g

24、t;　　6.2完成圖書歸還功能35</p><p>　　6.2.1窗體設(shè)計(jì)35</p><p>　　6.2.2窗體程序代碼35</p><p>　　6.2.3運(yùn)行結(jié)果36</p><p>　　6.3完成逾期清單功能37</p><p>　　6.3.1窗體設(shè)計(jì)37</p><p>　　

25、6.3.2窗體程序代碼37</p><p>　　6.3.3運(yùn)行結(jié)果38</p><p>　　6.4完成圖書罰款功能38</p><p>　　6.4.1窗體設(shè)計(jì)38</p><p>　　6.4.2窗體程序代碼38</p><p>　　6.4.3運(yùn)行結(jié)果39</p><p>　　第七章

26、系統(tǒng)使用說明40</p><p>　　7.1程序安裝40</p><p>　　7.2運(yùn)行程序40</p><p><b>　　結(jié) 論41</b></p><p><b>　　參考文獻(xiàn)42</b></p><p><b>　　謝 辭43</b&g

27、t;</p><p><b>　　圖表清單</b></p><p>　　圖2-1系統(tǒng)業(yè)務(wù)流程圖7</p><p>　　圖2-2系統(tǒng)數(shù)據(jù)流程圖8</p><p>　　圖2-3圖書管理系統(tǒng)功能模塊圖8</p><p>　　圖2-4讀者類別設(shè)置功能模塊圖8</p><p>

28、;　　圖2-5讀者檔案管理功能模塊圖9</p><p>　　圖2-6圖書檔案管理功能模塊圖9</p><p>　　圖2-7圖書檔案管理功能模塊圖9</p><p>　　圖2-8圖書借閱功能模塊圖10</p><p>　　圖2-9圖書歸還功能模塊圖10</p><p>　　圖2-10逾期清單10</p&

29、gt;<p>　　圖2-11圖書罰款功能模塊圖11</p><p>　　圖2-12數(shù)據(jù)庫表16</p><p>　　圖3-1登陸截圖17</p><p>　　圖3-2主窗體截圖19</p><p>　　圖4-1讀者類別設(shè)置截圖23</p><p>　　圖4-2讀者檔案管理截圖26</p&

30、gt;<p>　　圖5-1圖書類別設(shè)置截圖27</p><p>　　圖5-2圖書檔案管理截圖31</p><p>　　圖6-1圖書借閱截圖35</p><p>　　圖6-2圖書歸還截圖36</p><p>　　圖6-3逾期清單截圖38</p><p>　　圖6-4圖書罰款截圖39</p&

31、gt;<p>　　表2-1 出版社12</p><p>　　表2-2讀者類型12</p><p>　　表2-3讀者信息12</p><p>　　表2-4管理員13</p><p><b>　　表2-5書架13</b></p><p>　　表2-6圖書罰款13</p&

32、gt;<p>　　表2-7圖書管14</p><p>　　表2-8圖書歸還14</p><p>　　表2-9圖書借閱14</p><p>　　表2-10圖書管理15</p><p>　　表2-11圖書信息15</p><p><b>　　引 言</b></p>

33、<p>　　隨著電子計(jì)算機(jī)和通信技術(shù)的發(fā)展，人類已經(jīng)逐漸地進(jìn)入信息化社會。信息和材料、能源一樣成為一種社會的基本生產(chǎn)資料，在人類的社會生產(chǎn)活動中發(fā)揮著重要的作用。同時人們對信息和數(shù)據(jù)的利用與處理也已進(jìn)入自動化、網(wǎng)絡(luò)化和社會化的階段，因此，開發(fā)相關(guān)的管理信息系統(tǒng)已經(jīng)成為各行各業(yè)的必要和必需了，管理信息系統(tǒng)作為一門邊緣學(xué)科，集管理科學(xué)、信息科學(xué)、系統(tǒng)科學(xué)、現(xiàn)代通信技術(shù)和電子計(jì)算機(jī)技術(shù)于一體，可以解決企業(yè)或組織所面臨的問題，對內(nèi)

34、來看，可以提高工作效率；對外來看，獲得競爭優(yōu)勢。</p><p>　　該圖書館工作大部分還是進(jìn)行著手工管理，工作起來效率很低，并且不能及時了解圖書館各類圖書的存庫，學(xué)生們比較需求的圖書等等，不便于動態(tài)及時地調(diào)整圖書結(jié)構(gòu)，以便更好地適應(yīng)當(dāng)前學(xué)生的借閱需求。手工管理還存在這許多弊端，由于不可避免的人為因素，經(jīng)常造成數(shù)據(jù)的遺漏、誤報。計(jì)算機(jī)信息化管理有著儲存信息量大、速度快等許多優(yōu)點(diǎn)，提供給我們的處理信息及時快捷，同時

35、也提高了我們工作人員的自身素質(zhì)。</p><p><b>　　第一章 需求分析</b></p><p><b>　　1.1開發(fā)背景</b></p><p>　　隨著科技的發(fā)展，計(jì)算機(jī)應(yīng)用越來越普及，各行各業(yè)配置電腦等計(jì)算機(jī)設(shè)備的所需成本也越來越小。與之相對應(yīng)的是隨著國內(nèi)教育體制的逐漸完善，學(xué)校所承載的信息數(shù)據(jù)也越來越多，多

36、到已經(jīng)用人工處理開始不方便起來的地步，這其中又以圖書館最為嚴(yán)重，所以圖書館采取信息化管理勢在必行。</p><p>　　圖書館的信息化管理給圖書館帶來的最顯著的改變就是信息錄入和圖書流通的速度會大大的提高，信息流通的準(zhǔn)確性也大大加強(qiáng)。有利的促進(jìn)了圖書館的圖書流通率和服務(wù)水平的提高。</p><p>　　市面上也有很多圖書管理系統(tǒng)，但是大多都是比較小型的管理系統(tǒng)，邏輯功能比較簡單，甚至功能模

37、塊紊亂，不便于管理，明顯已經(jīng)不能滿足現(xiàn)在高校的需求。圖書館管理系統(tǒng)的核心部分也以圖書流通為核心。要想增強(qiáng)圖書管理系統(tǒng)的功能，使其更強(qiáng)大，操作起來更方便快捷，首先要考慮的是將圖書流通功能模塊升級。</p><p><b>　　1.2定義</b></p><p>　　圖書管：存放學(xué)校圖書，管理學(xué)校圖書流通的部門。</p><p>　　圖書管理系統(tǒng)：

38、用戶通過這個信息管理軟件實(shí)現(xiàn)對學(xué)校圖書及用戶信息的信息化管理。</p><p>　　管理員：通過圖書管理系統(tǒng)管理圖書流通的用戶，通過用戶名，密碼可登錄圖書管理系統(tǒng)后臺，對圖書管的信息流通進(jìn)行管理。</p><p>　　用戶：指一般用戶，能在圖書管借閱書籍，根據(jù)用戶類型不同，借書權(quán)限也不相同。</p><p><b>　　1.3用戶要求</b>&

39、lt;/p><p>　　1.3.1 管理員登錄</p><p>　　管理員輸入用戶名，密碼后能進(jìn)入圖書管理系統(tǒng)，具有對圖書管理系統(tǒng)的信息的處理功能。</p><p><b>　　1.3.2讀者管理</b></p><p>　　讀者管理具有讀者類別設(shè)置，讀者檔案管理兩個功能。</p><p><b

40、>　　1.讀者類別設(shè)置</b></p><p>　　(1)讀者類別設(shè)置能夠定義讀者的類型，讀者能借閱的圖書冊數(shù)，期刊冊數(shù)，續(xù)借次數(shù)，還能設(shè)置讀者的閱讀范圍（圖書，期刊）；</p><p>　　(2)讀者類別設(shè)置必須有讀者類別的搜索功能，且支持模糊搜索；讀者類別設(shè)置窗口具有增刪改查基本功能。</p><p><b>　　2.讀者檔案管理&l

41、t;/b></p><p>　　(1)讀者檔案管理記錄著所有讀者的基本信息（姓名，性別，聯(lián)系方式，讀者類型，等等）；</p><p>　　(2)讀者檔案管理具有對檔案的增，刪，改，查功能，且支持模糊查詢。</p><p><b>　　1.3.3圖書管理</b></p><p>　　圖書管理具有圖書類別設(shè)置和圖書檔案

42、管理兩個功能。</p><p><b>　　1.圖書類別設(shè)置</b></p><p>　　(1)設(shè)置圖書類別的基本信息（類型名稱，可借天數(shù)，類型名稱）；</p><p>　　(2)具有對圖書類別信息的增，刪，改，查的基本功能；</p><p>　　(3)對圖書類別信息的搜索支持模糊查詢。</p><p

43、><b>　　2.圖書檔案管理</b></p><p>　　(1)設(shè)置圖書檔案的基本信息（作者，書名條形碼，出版社，等等）；</p><p>　　(2)具有對圖書檔案信息的增，刪，改，查的基本功能</p><p>　　(3)對圖書檔案信息的搜索支持模糊查詢。</p><p><b>　　1.3.4圖書借閱

44、</b></p><p>　　1.圖書借閱需要輸入讀者信息和圖書借閱信息，才能借書；</p><p>　　2.輸入讀者信息和圖書信息時，既可以按條形碼輸入查詢，也可以按編號輸入查詢。</p><p><b>　　1.3.5圖書歸還</b></p><p>　　1.圖書歸還能查詢所有未歸還的圖書；</p&

45、gt;<p>　　2.圖書歸還的查詢功能支持模糊查詢；</p><p>　　圖書歸還能將指定的圖書歸還，如果逾期還會對其讀者應(yīng)該罰款的數(shù)目寫入數(shù)據(jù)庫；</p><p>　　圖書歸還頁左上角顯示所有借出的圖書數(shù)量。</p><p><b>　　1.3.6預(yù)約清單</b></p><p>　　1.逾期清單能查詢

46、所有借出的書籍過期未歸還的書籍信息和讀者信息；</p><p>　　2.查詢可根據(jù)讀者編號或者圖書編號或者讀者姓名綜合查詢，根據(jù)單獨(dú)條件查詢，模糊查詢；</p><p>　　3.在逾期清單功能頁面左上角顯示借閱逾期數(shù)量。</p><p><b>　　1.3.7圖書罰款</b></p><p>　　1.圖書罰款具有查詢所有

47、讀者借閱圖書逾期未還的信息；</p><p>　　2.查詢功能支持按讀者編號，圖書編號，讀者姓名單獨(dú)查詢，也可綜合查詢，也支持模糊查詢；</p><p>　　3.圖書罰款功能可收回讀者因?yàn)橛馄诮栝喫鶓?yīng)該繳納的費(fèi)用。</p><p>　　1.4 系統(tǒng)開發(fā)環(huán)境與工具</p><p>　　1.硬件環(huán)境：奔騰4處理器，主頻2G以上，內(nèi)存要求512M以

48、上，網(wǎng)卡100M。</p><p>　　2.軟件環(huán)境：Win7操作系統(tǒng)，SQL-SERVER2005。</p><p>　　3.開發(fā)工具：Boland-Delphi7，Microsoft-Visio，SQL-SERVER2005。</p><p><b>　　第二章 系統(tǒng)設(shè)計(jì)</b></p><p><b>　

49、　2.1問題分析</b></p><p><b>　　2.1.1讀者管理</b></p><p>　　讀者管理包括：讀者類型設(shè)置，讀者檔案管理。</p><p>　　1.讀者類型設(shè)置：搜索，新增，刪除，保存，退出。</p><p>　　搜索：根據(jù)讀者類型搜索，搜索的結(jié)果包括（類型，圖書冊書，期刊冊書，續(xù)借次數(shù)

50、，限制圖書，限制期刊）；</p><p>　　新增：新增讀者類型，包括字段（類型，圖書冊書，期刊冊書，續(xù)借次數(shù)，限制圖書，限制期刊），單擊“保存”；</p><p>　　修改：可修改數(shù)據(jù)庫中的讀者類型信息（類型，圖書冊書，期刊冊書，續(xù)借次數(shù)，限制圖書，限制期刊）；</p><p>　　刪除：刪除讀者類型信息；</p><p>　　退出：退出讀

51、者類型設(shè)置窗口。</p><p>　　2.讀者檔案管理：搜索，新增，刪除，保存，退出。</p><p>　　搜索：可根據(jù)條形碼搜索，可根據(jù)編碼搜索，也可根據(jù)姓名搜索，或者輸入多個條件綜合搜索，搜索結(jié)果包括（條形碼，編號，姓名，性別，類型，聯(lián)系方式，有效證件，證件號碼，借閱次數(shù)，出生日期，登記日期，有效期至，期刊借閱數(shù)，操作員）；</p><p>　　新增：輸入項(xiàng)（條

52、形碼，編號，姓名，性別，類型，聯(lián)系方式，有效證件，證件號碼，借閱次數(shù)，出生日期，登記日期，有效期至，期刊借閱數(shù)，操作員）；</p><p>　　修改：輸入項(xiàng)（條形碼，編號，姓名，性別，類型，聯(lián)系方式，有效證件，證件號碼，借閱次數(shù)，出生日期，登記日期，有效期至，期刊借閱數(shù)，操作員）；</p><p>　　刪除：刪除圖書檔案管理。</p><p><b>　

53、　2.1.2圖書管理</b></p><p>　　圖書管理包括：圖書類型設(shè)置和圖書檔案管理。</p><p>　　1.圖書類型設(shè)置：搜索，新增，修改，刪除。</p><p>　　搜索：可模糊搜索，也可按條件精確搜索（搜索條件：類型編號，類型名稱），搜索結(jié)果顯示字段（類型編號，類型名稱，可借天數(shù)）；</p><p>　　新增：新增信

54、息包含字段（類型編號，類型名稱，可借天數(shù)）；</p><p>　　修改：修改信息包含字段（類型編號，類型名稱，可借天數(shù)）；</p><p>　　刪除：刪除圖書類型信息。</p><p>　　2.圖書檔案管理：搜索，新增，修改，刪除。</p><p>　　搜索：搜索圖書檔案信息包含字段（條形碼，編碼，書名，作者，譯者，ISBN，類型，出版社，頁

55、碼，價格，操作員，書架名稱，是否注銷，簡介）；</p><p>　　新增：新增圖書檔案信息；</p><p>　　修改：修改圖書檔案信息；</p><p>　　刪除：刪除圖書檔案信息。</p><p>　　2.1.3圖書流通管理</p><p>　　圖書流通管理包括：圖書借閱，圖書歸還，逾期清單，圖書罰款。</p

56、><p>　　1.圖書借閱：輸入讀者信息（可選輸入項(xiàng)為：編碼，條形碼），以及借閱圖書信息（可選輸入項(xiàng)為：編碼，條形碼），回車鍵匹配借閱信息，單擊“確定借閱”，完成圖書的借閱。生成借閱信息包括（編號，書名，借出時間，狀態(tài)，應(yīng)還時間，出版社，書架）</p><p>　　2.圖書歸還：搜索，歸還所選圖書</p><p>　　搜索：檢索的圖書信息包括（借閱編號，圖書借閱，姓名，

57、續(xù)借次數(shù)，讀者編號，操作員，狀態(tài)，借閱時間，書名，應(yīng)還時間）；</p><p>　　歸還圖書：歸還圖書時判斷是否逾期，并根據(jù)逾期時間計(jì)算罰款費(fèi)用且保存應(yīng)罰款費(fèi)用。</p><p>　　3.圖書罰款：搜索，圖書罰款</p><p>　　搜索：檢索圖書罰款信息包括（罰款編號，姓名，讀者編號，圖書編號，書名，罰款金額，罰款日期，實(shí)收金額，應(yīng)付金額，是否交付，備注）；<

58、;/p><p>　　收回罰款：收回逾期罰款金額。</p><p><b>　　2.2系統(tǒng)流程分析</b></p><p>　　2.2.1系統(tǒng)業(yè)務(wù)流程</p><p><b>　　1.系統(tǒng)業(yè)務(wù)說明</b></p><p>　　(1)管理員往圖書管理系統(tǒng)里采集讀者，圖書信息；

59、 </p><p>　　(2)讀者借書，找管理員登記借閱信息；</p><p>　　(3)讀者還書，找管理員登記還書信息，若逾期，交納逾期罰款；</p><p>　　(4)借閱圖書，逾期清單，圖書罰款，歸還圖書等信息，都保存在數(shù)據(jù)庫表里。</p><p><b>　　2.系統(tǒng)業(yè)務(wù)流程圖</b><

60、;/p><p>　　圖2-1系統(tǒng)業(yè)務(wù)流程圖</p><p>　　2.2.2系統(tǒng)數(shù)據(jù)流程：</p><p>　　1.系統(tǒng)主要數(shù)據(jù)包括：讀者信息，管理員信息，圖書信息，圖書借閱信息，圖書歸還信息，圖書罰款信息，逾期清單信息；所有信息都由管理員操作圖書管理系統(tǒng)完成，把相應(yīng)信息寫入數(shù)據(jù)庫保存起來。</p><p><b>　　2.系統(tǒng)數(shù)據(jù)流程圖

61、</b></p><p>　　圖2-2系統(tǒng)數(shù)據(jù)流程圖</p><p><b>　　2.3系統(tǒng)功能分析</b></p><p>　　圖書管理系統(tǒng)功能模塊圖</p><p>　　圖2-3圖書管理系統(tǒng)功能模塊圖</p><p><b>　　2.3.1讀者管理</b>&l

62、t;/p><p>　　管理：讀者類別設(shè)置，讀者檔案管理。</p><p>　　1.讀者類別設(shè)置功能模塊：搜索，新增，修改，刪除功能。</p><p><b>　　功能模塊圖</b></p><p>　　圖2-4讀者類別設(shè)置功能模塊圖</p><p>　　2.讀者檔案管理功能模塊</p>

63、<p><b>　　功能模塊圖</b></p><p>　　圖2-5讀者檔案管理功能模塊圖</p><p><b>　　2.3.2圖書管理</b></p><p>　　圖書管理：圖書類別設(shè)置，圖書檔案管理。</p><p>　　1.圖書類別設(shè)置功能模塊：搜索，新增，修改，刪除功能。<

64、/p><p><b>　　功能模塊圖</b></p><p>　　圖2-6圖書檔案管理功能模塊圖</p><p>　　2.圖書檔案管理功能模塊</p><p><b>　　功能模塊圖</b></p><p>　　圖2-7圖書檔案管理功能模塊圖</p><p&g

65、t;　　2.3.3圖書流通管理</p><p>　　圖書流通管理：圖書借閱，圖書歸還，逾期清單，圖書罰款。</p><p>　　1.圖書借閱：借閱圖書，搜索。</p><p><b>　　功能模塊圖</b></p><p>　　圖2-8圖書借閱功能模塊圖</p><p>　　2.圖書歸還：搜索，歸

66、還圖書。</p><p><b>　　功能模塊圖</b></p><p>　　圖2-9圖書歸還功能模塊圖</p><p>　　3.逾期清單：搜索。</p><p><b>　　功能模塊圖</b></p><p><b>　　圖2-10逾期清單</b>&l

67、t;/p><p>　　4.圖書罰款：搜索，歸還圖書。</p><p><b>　　功能模塊圖</b></p><p>　　圖2- 11圖書罰款功能模塊圖</p><p><b>　　2.4數(shù)據(jù)庫設(shè)計(jì)</b></p><p><b>　　2.4.1靜態(tài)數(shù)據(jù)</b&g

68、t;</p><p>　　1.讀者類別：類型，圖書冊數(shù)，期刊冊數(shù)，續(xù)借次數(shù)，限制圖書，限制期刊；</p><p>　　2.讀者信息：條形碼，編號，姓名，性別，類型，出生日期，有效證件，證件號碼，聯(lián)系方式，登記日期，有效期至；</p><p>　　3.圖書信息：條形碼，編號，書名，類型，作者，譯者，ISBN，出版社，價格，頁碼，書架名稱；</p><

69、;p>　　4.書架：編號，書架名稱；</p><p>　　5.圖書類型：類型編號，類型名稱，可借天數(shù)；</p><p>　　6.管理員：編號，姓名，密碼。</p><p><b>　　2.4.2動態(tài)數(shù)據(jù)</b></p><p>　　1.圖書借閱：狀態(tài)，編號，書名，借出時間，應(yīng)還時間，出版社，書架；</p>

70、;<p>　　2.圖書歸還：讀者編號，圖書編號，讀者姓名，借閱號，書名，借閱時間，應(yīng)還時間；</p><p>　　3.圖書罰款：罰款編號，讀者編號，姓名，圖書編號，書名，罰款日期，應(yīng)罰金額，實(shí)收金額，是否交款，備注；</p><p>　　4.逾期清單：借閱編號，書名，圖書編號，借閱時間，應(yīng)還時間，續(xù)借次數(shù)，讀者編號，狀態(tài)，操作員。</p><p>&l

71、t;b>　　2.4.3數(shù)據(jù)字典</b></p><p>　　表2-1 出版社信息表</p><p><b>　　表2-2讀者類型表</b></p><p><b>　　表2-3讀者信息表</b></p><p><b>　　表2-4管理員表</b></p

72、><p><b>　　表2-5書架表</b></p><p><b>　　表2-6圖書罰款表</b></p><p><b>　　表2-7圖書館表</b></p><p><b>　　表2-8圖書歸還表</b></p><p><

73、b>　　表2-9圖書借閱表</b></p><p>　　表2-10圖書類型表</p><p>　　表2-11圖書信息表</p><p>　　2.4.4數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)</p><p>　　圖書管理系統(tǒng)的所有數(shù)據(jù)存儲在11張表中，打開SQL SERVER 2005,在其中新建數(shù)據(jù)庫libbook，如下圖2-12所示。<

74、/p><p><b>　　圖2-12數(shù)據(jù)庫表</b></p><p>　　第三章 主程序及登錄窗體設(shè)計(jì)</p><p><b>　　3.1概述</b></p><p>　　前期的邏輯設(shè)計(jì)已經(jīng)完成，現(xiàn)在根據(jù)前期的邏輯結(jié)構(gòu)，設(shè)計(jì)圖書管理系統(tǒng)的界面，以及內(nèi)部代碼實(shí)現(xiàn)。為了給圖書管理系統(tǒng)設(shè)置權(quán)限管理，設(shè)置一個圖

75、書管理員登錄窗口是有必要的，管理員通過輸入用戶名，密碼可以登錄到圖書管理系統(tǒng)主窗體。主窗體有讀者管理，圖書管理，圖書流通管理（圖書借閱，圖書歸還，逾期清單，圖書罰款）。</p><p><b>　　3.2登錄窗體設(shè)計(jì)</b></p><p><b>　　3.2.1窗體設(shè)計(jì)</b></p><p>　　登陸窗體要求輸入信息：

76、用戶名，密碼。</p><p>　　2.窗體運(yùn)行截圖如圖3-1所示。</p><p><b>　　圖3-1登陸截圖</b></p><p>　　3.2.2窗體程序代碼</p><p>　　{$R *.dfm}</p><p>　　procedure TForm1.Button1Click(Send

77、er: TObject);</p><p>　　var tuser,tpwd:string;</p><p><b>　　begin</b></p><p>　　tuser:=trim(eduser.Text);</p><p>　　tpwd:=trim(edpwd.text);</p><p>

78、　　if(tuser='') or (tpwd='') then</p><p><b>　　Begin</b></p><p>　　ShowMessage('用戶名或密碼不能為空!');</p><p><b>　　end</b></p><p>&

79、lt;b>　　else</b></p><p><b>　　Begin</b></p><p>　　ADOQuery1.Close;</p><p>　　adoquery1.SQL.Clear;</p><p>　　adoquery1.SQL.Add('select * from 管理員 <

80、;/p><p>　　where 名稱='''+tuser+''' and 密碼='''+ tpwd+'''');</p><p>　　ADOQuery1.Open;</p><p>　　if adoquery1.eof then</p><p&g

81、t;<b>　　begin</b></p><p>　　ShowMessage('用戶名或密碼不正確請確認(rèn)!');</p><p>　　ADOQuery1.Close;</p><p><b>　　end</b></p><p><b>　　else</b>&l

82、t;/p><p><b>　　Begin</b></p><p>　　ADOQuery1.Close;</p><p>　　Main.ShowModal;</p><p>　　Self.Hide;</p><p><b>　　end;</b></p><p&g

83、t;<b>　　end;</b></p><p><b>　　end;</b></p><p>　　procedure TForm1.Button2Click(Sender: TObject);</p><p><b>　　begin</b></p><p>　　Applica

84、tion.Terminate;</p><p><b>　　end;</b></p><p><b>　　end.</b></p><p><b>　　3.3主窗體設(shè)計(jì)</b></p><p><b>　　3.3.1窗體設(shè)計(jì)</b></p>

85、<p>　　管理員登陸成功后，就進(jìn)入了主窗體。</p><p>　　主窗體截圖如圖3-2所示</p><p><b>　　圖3-2主窗體截圖</b></p><p>　　3.3.2窗體程序代碼</p><p>　　{$R *.dfm}</p><p>　　uses UserSetting

86、Form, BookSettingForm, UserDocuForm,BookDocuForm, BookBorrowForm, BookOrderForm,BookReturnForm,BookOverdueForm,ForfeitForm;</p><p>　　//-----------通過用戶定義的函數(shù)，判斷窗體是否已存在--------------------</p><p>　

87、　function TMain.FindForm(caption: string): bool;</p><p>　　var i:integer;</p><p><b>　　begin</b></p><p>　　for i:=0 to main.MDIChildCount do</p><p><b>　　

88、begin</b></p><p>　　// 通過對窗體標(biāo)題判斷窗體是否存在</p><p>　　if main.MDIChildren[i].Caption=caption then</p><p><b>　　begin</b></p><p>　　//如果窗體已存在，則恢復(fù)窗體，并返回true</

89、p><p>　　SendMessage(mdichildren[i].Handle, WM_SYSCOMMAND, SC_Maximize, 0);</p><p>　　mdichildren[i].Enabled:=true;</p><p>　　mdichildren[i].Show;</p><p>　　mdichildren[i].Set

90、Focus;</p><p>　　result:=true;</p><p><b>　　break;</b></p><p><b>　　end</b></p><p><b>　　else</b></p><p>　　//如窗體不存在，則返回fals

91、e，程序?qū)?chuàng)建窗體</p><p>　　result:=false;</p><p><b>　　end</b></p><p><b>　　end;</b></p><p>　　//-------------打開讀者類別設(shè)置窗體----------</p><p>　　pr

92、ocedure TMain.N2Click(Sender: TObject);</p><p><b>　　Var</b></p><p>　　newform:TUserSetting;</p><p><b>　　begin</b></p><p>　　if FindForm('讀者類別設(shè)

93、置')=false then</p><p><b>　　begin</b></p><p>　　newform:=TUserSetting.Create(application);</p><p>　　newform.Caption:='讀者類別設(shè)置'; </p><p><b>　　

94、end;</b></p><p><b>　　end;</b></p><p>　　//-------------打開讀者檔案管理窗體----------</p><p>　　procedure TMain.N3Click(Sender: TObject);</p><p><b>　　Var<

95、;/b></p><p>　　newform:TUserDocu;</p><p><b>　　begin</b></p><p>　　if FindForm('讀者檔案管理')=false then</p><p><b>　　begin</b></p><

96、;p>　　newform:=TUserDocu.Create(application);</p><p>　　newform.Caption:='讀者檔案管理';</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　/

97、/-------------打開圖書類別設(shè)置窗體----------</p><p>　　procedure TMain.N5Click(Sender: TObject);</p><p><b>　　Var</b></p><p>　　newform:TBookSetting;</p><p><b>　　b

98、egin</b></p><p>　　if FindForm('圖書類別設(shè)置')=false then</p><p><b>　　begin</b></p><p>　　newform:=TBookSetting.Create(application);</p><p>　　newform.

99、Caption:='圖書類別設(shè)置';</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　//-------------打開圖書檔案管理窗體----------</p><p>　　procedure TMain.N6Cli

100、ck(Sender: TObject);</p><p><b>　　Var</b></p><p>　　newform:TBookDocu;</p><p><b>　　begin</b></p><p>　　if FindForm('圖書檔案管理')=false then<

101、/p><p><b>　　begin</b></p><p>　　newform:=TBookDocu.Create(application);</p><p>　　newform.Caption:='圖書檔案管理';</p><p><b>　　end;</b></p>

102、<p><b>　　end;</b></p><p>　　//-------------打開圖書借閱窗體----------</p><p>　　procedure TMain.N9Click(Sender: TObject);</p><p><b>　　Var</b></p><p>

103、　　newform:TBookBorrow;</p><p><b>　　begin</b></p><p>　　if FindForm('圖書借閱')=false then</p><p><b>　　begin</b></p><p>　　newform:=TBookBorrow

104、.Create(application);</p><p>　　newform.Caption:='圖書借閱';</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　//-------------打開圖書歸還窗體------

105、----</p><p>　　procedure TMain.N10Click(Sender: TObject);</p><p><b>　　var</b></p><p>　　newform:TBookReturn;</p><p><b>　　begin</b></p><

106、p>　　if FindForm('圖書歸還')=false then</p><p><b>　　begin</b></p><p>　　newform:=TBookReturn.Create(application);</p><p>　　newform.Caption:='圖書歸還';</p>

107、;<p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　//-------------查看逾期圖書----------</p><p>　　procedure TMain.N11Click(Sender: TObject);</p><p&

108、gt;<b>　　var</b></p><p>　　newform:TBookOverdue;</p><p><b>　　begin</b></p><p>　　if FindForm('逾期清單')=false then</p><p><b>　　begin<

109、/b></p><p>　　newform:=TBookOverdue.Create(application);</p><p>　　newform.Caption:='逾期清單';</p><p><b>　　end;</b></p><p><b>　　end;</b>&l

110、t;/p><p>　　//-------------收回圖書罰款----------</p><p>　　procedure TMain.N12Click(Sender: TObject);</p><p><b>　　var</b></p><p>　　newform:TForfeit;</p><p&

111、gt;<b>　　begin</b></p><p>　　if FindForm('圖書罰款')=false then</p><p><b>　　begin</b></p><p>　　newform:=TForfeit.Create(application);</p><p>　

112、　newform.Caption:='圖書罰款';</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　procedure TMain.N13Click(Sender: TObject);</p><p><b>

113、　　begin</b></p><p>　　Application.Terminate;</p><p><b>　　end;</b></p><p>　　procedure TMain.FormCreate(Sender: TObject);</p><p><b>　　begin</b&g

114、t;</p><p>　　if not Assigned(form1) then</p><p>　　form1:= TForm1.Create(Application);</p><p>　　Form1.ShowModal;</p><p><b>　　end;</b></p><p><

115、b>　　end.</b></p><p>　　第四章 讀者管理模塊設(shè)計(jì)</p><p>　　4.1完成讀者類別設(shè)置功能</p><p><b>　　4.1.1窗體設(shè)計(jì)</b></p><p>　　讀者類別設(shè)置窗體要輸入的信息有：讀者類型，圖書冊數(shù)，期刊冊數(shù)，續(xù)借次數(shù)，借閱范圍（單選框），該窗體還能修改已

116、經(jīng)錄入的數(shù)據(jù)，且支持檢索原有信息。</p><p><b>　　4.1.2運(yùn)行結(jié)果</b></p><p>　　運(yùn)行結(jié)果截圖如圖4-1所示。</p><p>　　圖4-1讀者類別設(shè)置截圖</p><p>　　4.2完成讀者檔案管理功能</p><p><b>　　4.2.1窗體設(shè)計(jì)<

117、;/b></p><p>　　窗體功能：能搜索讀者檔案信息，并將搜索結(jié)果總數(shù)顯示在左上角，右側(cè)以報表形式顯示搜索結(jié)果。下側(cè)顯示具體所指的那條信息。該頁面對讀者信息具有新增，修改，刪除的功能。</p><p><b>　　4.2.2窗體代碼</b></p><p>　　{$R *.dfm}</p><p>　　//-

118、----------根據(jù)讀者類型表中的數(shù)據(jù)更新本窗體中【類型】的下拉列表框------------</p><p>　　procedure TUserDocu.FormActivate(Sender: TObject);</p><p><b>　　var</b></p><p>　　name:string;</p><p&

119、gt;<b>　　begin</b></p><p>　　inherited;</p><p>　　//獲得讀者類型表中【類型】字段的信息</p><p>　　adoquery2.Close;</p><p>　　adoquery2.SQL.Clear;</p><p>　　adoquery2.S

120、QL.Add('select distinct 類型 from 讀者類型');</p><p>　　adoquery2.Open;</p><p>　　//清空本窗體中的【類型】下拉列表框的內(nèi)容</p><p>　　dbcombobox2.Items.Clear;</p><p>　　//根據(jù)查詢到的信息重新添加下拉列表框選項(xiàng)

121、</p><p>　　while not adoquery2.Eof do</p><p><b>　　begin</b></p><p>　　name:=adoquery2.fieldbyname('類型').AsString;</p><p>　　dbcombobox2.Items.Add(name)

122、;</p><p>　　adoquery2.Next;</p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　//----------以下是在新增記錄時的默認(rèn)輸入值-----------</p><p>　　//標(biāo)識用

123、戶是否選擇了【是否掛失】單選框</p><p>　　procedure TUserDocu.ToolButton6Click(Sender: TObject);</p><p><b>　　var</b></p><p>　　maxnum:integer;</p><p>　　newnum:string;</p&g

124、t;<p><b>　　begin</b></p><p>　　isChecked:=0;</p><p>　　//自動確定新用戶編號</p><p>　　adoquery2.Close;</p><p>　　adoquery2.SQL.Clear;</p><p>　　adoque

125、ry2.SQL.Add('select max(編號) 最大編號 from 讀者信息');</p><p>　　adoquery2.Open;</p><p>　　maxnum:=adoquery2.FieldByName('最大編號').AsInteger;</p><p>　　maxnum:=maxnum+1;</p>

126、<p>　　newnum:=inttostr(maxnum);</p><p>　　if length(newnum)=1 then</p><p>　　dbedit2.Text:='000'+newnum;</p><p>　　if length(newnum)=2 then</p><p>　　dbedit2

127、.Text:='00'+newnum;</p><p>　　if length(newnum)=3 then</p><p>　　dbedit2.Text:='0'+newnum;</p><p><b>　　//確定默認(rèn)的類型</b></p><p>　　dbcombobox2.SelT

128、ext:=dbcombobox2.Items.Strings[0];</p><p><b>　　end;</b></p><p>　　procedure TUserDocu.DBCheckBox1Click(Sender: TObject);</p><p><b>　　begin</b></p><

129、p>　　inherited;</p><p>　　isChecked:=(isChecked)or(1);//表示已經(jīng)選擇了是否掛失</p><p><b>　　end;</b></p><p>　　procedure TUserDocu.ToolButton10Click(Sender: TObject);</p><

130、;p><b>　　begin</b></p><p>　　if isChecked=0 then</p><p><b>　　begin</b></p><p>　　showmessage('未選擇是否掛失，請重新選擇');</p><p><b>　　exit;&l

131、t;/b></p><p><b>　　end;</b></p><p>　　inherited;</p><p>　　ischecked:=0;</p><p><b>　　end;</b></p><p><b>　　end.</b></

132、p><p><b>　　4.2.3運(yùn)行結(jié)果</b></p><p>　　運(yùn)行結(jié)果截圖如圖4-2所示。</p><p>　　圖4-2讀者檔案管理截圖</p><p>　　第五章 圖書管理模塊設(shè)計(jì)</p><p>　　5.1完成圖書類別設(shè)置功能</p><p><b>