【導(dǎo)讀】也在不斷成倍增長(zhǎng)。面對(duì)龐大的信息量，就需要有圖書(shū)管理系統(tǒng)來(lái)提高圖。書(shū)管理工作的效率。通過(guò)這樣的系統(tǒng)，我們可以做到信息的規(guī)范管理和快。速查詢，從而減少了管理方面的工作量。第一章簡(jiǎn)要介紹了本系統(tǒng)的設(shè)計(jì)總體線路。第二章概述了管理信息系。述、數(shù)據(jù)庫(kù)設(shè)計(jì)等內(nèi)容。第四章介紹了本系統(tǒng)的具體實(shí)現(xiàn)。系統(tǒng)開(kāi)發(fā)過(guò)程中結(jié)論及使用過(guò)程中的體會(huì)進(jìn)行了總結(jié)。

　　

【正文】 之 后再 借！ 39。, mtwarning,[mbOk], 0)。 :=false。 :=false。 end。 ()。 ()。 if then begin 。 :=0。 :=length()。 end。 close。 if (not ) and (not ) then :=true。 flag:=false。 end。 if flag then begin 。 :=0。 :=length()。 end。 end。 end。 32 //還書(shū) procedure (Sender: TObject)。 var str,s3:string。 cq:string。 var_BookTotalNum:integer。 var_BorrowNum:integer。 begin if strToint()0 then begin {添加罰款情況 } :=39。罰款情況 39。 。 :=true。 。 (39。天數(shù) 39。).Value:=。 (39。讀者編號(hào) 39。).Value:=。 (39。書(shū)籍編號(hào) 39。).Value:=。 (39。罰款數(shù)額 39。).Value:=。 (39。 罰 款 日 期39。).value:=formatdatetime(39。yymmdd39。,now())。 。 。 cq:=39。超期 39。 end else begin cq:=39。否 39。 end。 { 刪除記錄 } str:=39。delete * from 借 書(shū) 情 況 where 書(shū) 籍 編 號(hào)=39。+39。39。39。39。++39。39。39。39。 :=str。 。 33 {庫(kù)存量 +1} str:=39。select 總庫(kù)存量 from 書(shū) 庫(kù) 管 理 where 書(shū) 籍 編 號(hào)=39。+39。39。39。39。++39。39。39。39。 :=False。 :=str。 :=True。 if and then begin exit。 end。 var_BookTotalNum:=strToint(varTostr([39?？値?kù)存量 39。].Value))。 var_BookTotalNum:=var_BookTotalNum+1。 str:=39。update 書(shū) 庫(kù) 管 理 set 書(shū)庫(kù)管理 . 總 庫(kù) 存 量=39。+intTostr(var_BookTotalNum)。 str:=str+39。 where 書(shū)庫(kù)管理 .書(shū)籍編號(hào) =39。+39。39。39。39。++39。39。39。39。 :=str。 。 {已借冊(cè)數(shù) 1} str:=39。select 已借冊(cè)數(shù) from 讀者管理 where 讀者管理 .讀者編號(hào) =39。 str:=str+39。39。39。39。++39。39。39。39。 :=False。 :=str。 :=True。 var_BorrowNum:=strToint(varTostr([39。已借冊(cè)數(shù) 39。].Value))。 var_BorrowNum:=var_BorrowNum1。 str:=39。update 讀者管理 set 已借冊(cè)數(shù) =39。+intTostr(var_BorrowNum)。 str:=str+39。 where 讀者管理 .讀者編號(hào) =39。+39。39。39。39。++39。39。39。39。 :=str。 。 {更改是否借出 } str:=39。update 書(shū)庫(kù)管理 set 是否借出 =39。+39。39。39。39。+39。否 39。+39。39。39。39。 34 str:=str+39。 where 書(shū)籍編號(hào) =39。+39。39。39。39。++39。39。39。39。 :=str。 。 //添寫(xiě)還書(shū)信息 :=false。 :=39。select * from 還書(shū)情況 39。 。 。 (39。讀者編號(hào) 39。).AsString:= 。 (39。 書(shū) 籍 編 號(hào)39。).AsString:= 。 (39。 還 書(shū) 日 期39。).Value:=formatdatetime(39。yymmdd39。,now())。 。 。 {設(shè)初值 } messagedlg(39。還書(shū)成功 !39。,mtconfirmation,[mbok],0)。 :=false。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 :=39。39。 35 :=False。 :=GetCurrentDateTime。 if then begin 。 。 showhowmanybooks() end。 if then begin s3:=39。select , , , ,名稱 , , , , , 39。 s3:=s3+39。 from ((圖書(shū)類別 a inner join 書(shū)庫(kù)管理 b on 碼 = ) inner join 借書(shū)情況 c on = )where c.讀者編號(hào) =39。39。39。++39。39。39。39。 。 。 。 (s3)。 :=true。 end。 end。 在 的集成開(kāi)發(fā)環(huán)境中創(chuàng)建好圖書(shū)管理系統(tǒng)后，并無(wú)意味著全部工作已完成，此時(shí)生成的應(yīng)用程序只能在 的集成環(huán)境中運(yùn)行，要想使應(yīng)用程序能夠脫離 的集成開(kāi)發(fā)環(huán)境，首先要對(duì)圖書(shū)管理程序進(jìn)行編譯并且生成 .exe 或其他類 型的文件，然后調(diào)用打包和展開(kāi)向?qū)?chuàng)建安裝程序。 編譯應(yīng)用程序 編譯圖書(shū)管理程序就是將創(chuàng)建的應(yīng)用程序以及它的工程文件合并成 36 一個(gè)可執(zhí)行文件。在發(fā)布圖書(shū)管理應(yīng)用程序之前，首先應(yīng)該使用測(cè)試和調(diào)試工具對(duì)改應(yīng)用程序進(jìn)行前面測(cè)試，在排除了所有可能的錯(cuò)誤后，才可以開(kāi)始對(duì)應(yīng)用程序進(jìn)行編譯。 編譯應(yīng)用程序的主要目的如下； ? 使應(yīng)用程序轉(zhuǎn)入和運(yùn)行更快。 ? 給發(fā)布應(yīng)用程序作準(zhǔn)備。 ? 使用應(yīng)用程序更安全。 將應(yīng)用程序進(jìn)行編譯后， 將工程中的所有文件進(jìn)行組織并將這些工程文件轉(zhuǎn)化成一個(gè)可執(zhí)行的文件 .exe。 提供 APP 對(duì)象來(lái)存儲(chǔ)應(yīng)用程序的有關(guān)信息屬性，例如，公司名，產(chǎn)品名，版本以及其他相關(guān)信息。在設(shè)計(jì)中，可以通過(guò)這些屬性來(lái)告訴用戶一些重要的信息，在應(yīng)用程序運(yùn)行時(shí)用 代碼讀出這些屬性值，也可以在 Windows 資源管理器中觀察應(yīng)用程序?qū)ο蟮陌姹拘畔傩灾?。右擊編譯過(guò)的 .exe 文件，然后從快捷菜單中選擇“屬性”命令打開(kāi)“屬性”對(duì)話框的版本標(biāo)簽，就可以看到應(yīng)用程序的版本信息。 當(dāng)完成當(dāng)前工程的 APP 對(duì)象的屬性后，就可以編譯代碼了。 支持兩種編譯格式： P 代碼和本地代碼。選擇 P 代碼 格式編譯的應(yīng)用程序生成的可執(zhí)行文件較小，選擇本地代碼編譯的應(yīng)用程序生成的可執(zhí)行文件要大的多，但是可執(zhí)行文件的運(yùn)行速度比較快。 因此，圖書(shū)管理系統(tǒng)采用的視本地代碼的編譯格式。 打包應(yīng)用程序 創(chuàng)建 應(yīng)用程序后，可以將創(chuàng)建的圖書(shū)管理應(yīng)用程序通過(guò)磁盤(pán)，關(guān)盤(pán)，網(wǎng)絡(luò)等途徑自由發(fā)布，一般來(lái)說(shuō)，發(fā)布應(yīng)用程序必須經(jīng)過(guò)下面的兩個(gè)步驟： 打包 必須將應(yīng)用程序文件打包為一個(gè)或多個(gè)可以部署到選定位置的 .cab 文件（ .cab 文件是一種壓縮文件），對(duì)于某些類型的軟件包，還必須為其創(chuàng)建安裝程序。 部署 必 須將打包的應(yīng)用程序放置到適當(dāng)?shù)奈恢茫员阌脩魜?lái)安裝應(yīng)用程序。 可以使用兩種工具來(lái)打包和發(fā)布應(yīng)用程序。 ? 打包和展開(kāi)向?qū)В?Package and Deployment） 37 ? 安裝軟件提供的安裝工具包。 打包和展開(kāi)向?qū)ㄟ^(guò)提供有關(guān)如何配置 .cab 文件的選項(xiàng)，使發(fā)布應(yīng)用程序所包含的許多步驟得以自動(dòng)運(yùn)行，這是用戶一般所采用的方法。 使用打包和展開(kāi)向?qū)нM(jìn)行打包的第一個(gè)步驟就是選擇一個(gè)工程，然后單擊打包按鈕，開(kāi)始創(chuàng)建一個(gè)可以發(fā)布的應(yīng)用程序。第三步，如果沒(méi)有編譯工程，打包和展開(kāi)向?qū)?huì)要求編譯工程。工程編譯完成 后，向?qū)г儐?wèn)想制作什么類型的包，我們這里使用向?qū)е谱靼惭b程序。當(dāng)向?qū)瓿芍谱靼惭b包以后，它會(huì)自動(dòng)生成一個(gè)帶有很多重要信息的報(bào)告。 發(fā)布應(yīng)用程序的步驟 將圖書(shū)管理系統(tǒng)打包后，制作安裝程序的過(guò)程并沒(méi)有結(jié)束，必須將打包后的應(yīng)用程序發(fā)布到一個(gè)媒體上，比如軟盤(pán)，光盤(pán)等，發(fā)布圖書(shū)管理系統(tǒng)的主要步驟如下：選擇“圖書(shū)管理系統(tǒng)”這個(gè)包，然后指定把這個(gè)包發(fā)布到指定文件夾中，選擇發(fā)布的媒體，就可以完成“圖書(shū)管理系統(tǒng)”的發(fā)布工作了。 38 第五章 結(jié)論及體會(huì) 隨著學(xué)校規(guī)模的不斷擴(kuò)大，學(xué)生數(shù)量的急劇增加，有關(guān)學(xué)生的各種信息量也在不斷成倍增長(zhǎng)。面對(duì)龐大的信息量，就需要有圖書(shū)管理系統(tǒng)來(lái)提高學(xué)生管理工作的效率。 傳統(tǒng)手工的圖書(shū)管理，管理過(guò)程繁瑣而復(fù)雜，執(zhí)行效率低，并且易于出錯(cuò)。通過(guò)這樣的系統(tǒng)，我們可以做到信息的規(guī)范管理和快速查詢，實(shí)現(xiàn)了圖書(shū)管理的系統(tǒng)化、規(guī)范化和自動(dòng)化，這樣不僅減少了管理工作量，還提高了管理效率，降低了管理成本。 在軟件的編寫(xiě)過(guò)程中，我充分體會(huì)了軟件編程工作者的辛苦，因?yàn)槊恳粋€(gè)細(xì)微的細(xì)節(jié)都必須十分的注意，如果稍有不慎，就會(huì)全盤(pán)皆輸，而且往往很多的時(shí)候，程序我自己覺(jué)得非常的正確，但是就是編譯通不過(guò)，在查找錯(cuò)誤的過(guò)程 中，面臨著否認(rèn)自己的過(guò)程，非常的痛苦，而且由于自己的經(jīng)驗(yàn)及各方面的能力的不足，所以進(jìn)展的速度非常的緩慢，往往幾天的時(shí)間還沒(méi)有一點(diǎn)進(jìn)展。 在開(kāi)始編寫(xiě)程序的時(shí)候，我看到別人的軟件功能非常的詳細(xì)，而且界面非常的漂亮，總希望自己的軟件也非常的完善，但是，經(jīng)過(guò)二個(gè)月的學(xué)習(xí)，發(fā)現(xiàn)編一個(gè)優(yōu)秀的軟件決不是一蹴而就的事情，需要長(zhǎng)時(shí)間的積累和經(jīng)驗(yàn)，而這個(gè)方面又是我的弱項(xiàng)，因此，在朋友的幫助下，我終于認(rèn)清自己的不足及劣勢(shì)，不要貪圖大而全，只要盡我所能，編制一個(gè)實(shí)用簡(jiǎn)單的軟件也是件很不容易的事情。 在反反復(fù)復(fù)的學(xué)習(xí)及不恥下問(wèn)之下， 我的辛勤努力有了匯報(bào)，終于做出了一個(gè)簡(jiǎn)單的軟件，雖然這個(gè)軟件的功能非常的簡(jiǎn)單，而且我想，在實(shí)際的運(yùn)用中，肯定會(huì)有所不足，因?yàn)閳D書(shū)管理工作的內(nèi)容非常的豐富，我涉及到的僅僅是學(xué)生管理的一部分簡(jiǎn)單內(nèi)容，離實(shí)際的客戶需求肯定還有一定的差距。但是，它畢竟代表了我二個(gè)月辛勤的結(jié)晶。 由于我的知識(shí)淺薄，經(jīng)驗(yàn)不足及閱歷頗淺，因此，在該系統(tǒng)的設(shè)計(jì)方面還有很多不足，比如功能過(guò)少，界面不夠醒目等問(wèn)題，我會(huì)在工作的使用過(guò)程中，根據(jù)工作的具體要求不斷的修改，完善，爭(zhēng)取使該系統(tǒng)慢慢趨向完美。 在本系統(tǒng)的設(shè)計(jì)過(guò)程和論文編寫(xiě)過(guò)程中，很多老 師、同事和朋友都給與了我許多無(wú)私的幫助，尤其是我的導(dǎo)師給我的論文提出了很多寶貴的修 39 改意見(jiàn)，在這里，我向這些無(wú)私幫助我的人表示衷心的感謝。 參考文獻(xiàn) 《 開(kāi)發(fā)人員指南》 任旭鈞 王永生 馮澤波等譯 機(jī)械工業(yè)出版社 2021 年 6 月第一版 《數(shù)據(jù)庫(kù)設(shè)計(jì)與編程實(shí)例詳解》 電子工業(yè)出版社 2021 年 02月第一版 《編程技巧及故障排除即時(shí)通 (Delphi 篇 )》 清華天則工作室編著 兵器工業(yè)出版社 2021 年 02 月第一版 《引人入勝 Install Shield （含盤(pán)）》 張君編著 上海書(shū)店 2021 年 11 月第一版 《 教程》 新智工作室編著 電子工業(yè)出版社 2021 年03 月第一版 《企業(yè)管理的計(jì)算機(jī)化》 威廉謝爾 上?？茖W(xué)技術(shù)文獻(xiàn)出版社 2021年