書店管理系統(tǒng) 目 錄：摘要 4前言 7第一章設(shè)計(jì)目標(biāo) 8 1.1理論應(yīng)用 8 1.2工具使用 8 1.3應(yīng)用開發(fā) 8 1.4報(bào)告編寫 8第二章系統(tǒng)設(shè)計(jì)說明 8 2.1系統(tǒng)簡(jiǎn)介 8 2.2數(shù)據(jù)庫設(shè)計(jì) 8 2.2.1實(shí)體聯(lián)系圖設(shè)計(jì) 82.2.2關(guān)系定義 9 2.3應(yīng)用程序設(shè)計(jì) 112.3.1業(yè)務(wù)流程圖 112.3.2系統(tǒng)結(jié)構(gòu)圖 112.4系統(tǒng)框架的選擇 12 2.5界面設(shè)計(jì) 12 第三章部分程序代碼和實(shí)現(xiàn)功能 12 3.1系統(tǒng)登陸部分 12 3.2書籍查詢部分 13 第四章數(shù)據(jù)庫相關(guān) 20 第五章最終應(yīng)用程序運(yùn)行說明 21 5.1系統(tǒng)登陸 21 5.2用戶權(quán)限管理 23 5.3會(huì)員分組管理 23 5.4新到書籍編目 24 5.5書籍資料維護(hù) 25 5.6辦理會(huì)員卡 26 5.7會(huì)員信息維護(hù) 26 5.8借閱和歸還 26 5.9查詢信息 28 5.10 關(guān)于本系統(tǒng) 29第六章總結(jié) 31第七章參考文獻(xiàn) 31書店管理系統(tǒng)摘 要 時(shí)代在發(fā)展，人的求知欲也在不斷的增長(zhǎng)，我們需要不斷的提升自己的競(jìng)爭(zhēng)力，書籍成了我們幫助我們提高自身能力的有效也是很普遍的工具。書籍每時(shí)每刻都在推陳出新，信息量的更新很龐大。 信息時(shí)代高速發(fā)展的今天，書店的信息化管理卻沒有得到很好的普及和發(fā)展，特別是很多小型的書店出于成本增加等原因而沒有為自己的書店建立一個(gè)電腦記錄的信息管理，殊不知投入了更大的人員方面的投入，反而增加了一定的成本，又使工作人員陷入繁瑣的數(shù)據(jù)中，出錯(cuò)的幾率也因此增大，上述這些事實(shí)迫使我們必須適應(yīng)時(shí)代的要求，利用電腦有序而高效地管理各項(xiàng)信息。為了優(yōu)化書店管理模式，提高人力工作效率，我設(shè)計(jì)了這個(gè)書店管理系統(tǒng)，可以很方便書店管理員進(jìn)行高效的書籍和會(huì)員等相關(guān)管理。系統(tǒng)將會(huì)提供各種權(quán)限供不同的用戶群使用，書店管理員可以使用整套系統(tǒng)的所有功能，新增書籍入庫，書籍信息維護(hù)，會(huì)員信息維護(hù)，書籍借閱記錄等，都可以輕松實(shí)現(xiàn)。另外簡(jiǎn)約美觀的界面會(huì)讓我們的工作環(huán)境煥然一新，這在一定程度上也能提高管理人員的工作熱情和工作效率。當(dāng)然，還存在很多需要改進(jìn)的地方，也需要用戶在使用過程中對(duì)我提出改進(jìn)意見。 關(guān)鍵詞 數(shù)據(jù)庫 課程設(shè)計(jì) 書店管理 Delphi Abstract The time is developing, humans intellectual curiosity also in the unceasing growth, we needed to promote own unceasingly competitive power, the books to become us to help us to sharpen own ability effectively also is the very universal tool.The books all are weeding through the old to bring forth the new every time, the information content renewal is very huge. The information age high speed development today, bookstores informationization management has not obtained the very good popularization and the development actually, but very are specially many the small bookstore stemming from reasons and so on cost increase not to establish the information management for own bookstore which a computer records, had never realized invested the bigger personnel aspect investment, Instead increased certain cost, also causes the staff to fall into in the tedious data, makes a mistake therefore the probability also increases, the above these facts force us to have to adapt the time request, but manages each information highly effective using the computer order.In order to optimize the bookstore to manage the pattern, enhances the manpower working efficiency, I have designed this bookstore management system management system, may the very convenient bookstore managers carry on highly effective correlation management and so on the books and member.The system will be able to provide each jurisdiction for the different user group use, the bookstore manager may use the entire wrap systematic all functions, the additional books warehousing, the books information maintenance, The member information maintenance, the books borrow the record and so on, all may with ease realize.Moreover the brief artistic contact surface can let our working conditions be changed beyond recognition, this also can enhance administrative personnels work enthusiasm and the working efficiency to a certain extent.Certainly, but also has the place which very many needs to improve, also needs the user to give the improvement comment in the use process to me.Key words database curriculum designs the bookstore to manage Delphi前言平時(shí)我們?cè)趯W(xué)校附近的書店買書你就會(huì)發(fā)現(xiàn)，現(xiàn)在很多書店的信息管理依然比較滯后，一般都采用紙筆加計(jì)算器人工管理的方法。對(duì)于較小型的書店，這種原始的管理方式還能應(yīng)付，但對(duì)于種類繁多、數(shù)量龐大的較大型書店來說，這種原始落后的管理已經(jīng)遠(yuǎn)遠(yuǎn)不能滿足，不但工作繁瑣，出錯(cuò)的幾率也是很大的，大大降低了工作效率。另外現(xiàn)在比較有先見之明的書店都慢慢發(fā)展自己的特色業(yè)務(wù)，比如會(huì)員制度，針對(duì)會(huì)員有免費(fèi)借閱書籍的業(yè)務(wù)，要求是每月消費(fèi)達(dá)到一定金額，據(jù)悉這種舉措很受市場(chǎng)的歡迎，極大的帶動(dòng)了帶動(dòng)了書店的消費(fèi)，為書店自身的發(fā)展積累了一定的資金和管理經(jīng)驗(yàn)。除此之外還有各色名目繁多的會(huì)員活動(dòng)等等，給讀者一種心理上的優(yōu)越感，刺激了消費(fèi)。為了優(yōu)化書店管理模式，我嘗試開發(fā)了這個(gè)書店綜合管理系統(tǒng)，讓用戶很方便的通過這套系統(tǒng)管理書店的日常事務(wù)和繁瑣數(shù)據(jù)，讓用戶在整潔的環(huán)境下輕松的進(jìn)行書店的日常業(yè)務(wù)的開展。 第一章 設(shè)計(jì)目標(biāo)1.1 理論應(yīng)用 運(yùn)用數(shù)據(jù)庫設(shè)計(jì)理論設(shè)計(jì)一個(gè)較完善的有實(shí)際意義的數(shù)據(jù)庫結(jié)構(gòu) 1.2 工具使用 掌握目前流行數(shù)據(jù)庫管理系統(tǒng)工具和前端應(yīng)用開發(fā)工具 1.3 應(yīng)用開發(fā) 為數(shù)據(jù)庫開發(fā)相應(yīng)應(yīng)用程序，構(gòu)成完整的數(shù)據(jù)庫應(yīng)用系統(tǒng) 1.4 報(bào)告編寫 使用計(jì)算機(jī)按照規(guī)定格式編寫高質(zhì)量的設(shè)計(jì)報(bào)告 第二章 系統(tǒng)設(shè)計(jì)說明2.1 系統(tǒng)簡(jiǎn)介 隨著時(shí)代的飛速發(fā)展和電腦的普及應(yīng)用，信息智能化的社會(huì)正在向我們迎面走來。相比以前靠紙筆記錄信息的時(shí)代，電腦的智能化管理將給我們的生活帶來極大的便利性。針對(duì)現(xiàn)今書店管理信息化的滯后，這次課設(shè)我設(shè)計(jì)了一款面向書店的綜合管理系統(tǒng)，可供系統(tǒng)管理員和一般用戶使用，可以十分便利的增加、記錄、查詢和修改書籍的各種信息：包括書號(hào)、書名、作者、出版社、定價(jià)和分類等，并在此基礎(chǔ)上設(shè)計(jì)了現(xiàn)在書店廣泛采用的VIP會(huì)員功能，會(huì)員可以注冊(cè)成不同級(jí)別的VIP會(huì)員，享受不同的免費(fèi)圖書借閱的優(yōu)惠，同時(shí)管理員也可以十分方便的新增、查詢和修改會(huì)員信息。 2.2 數(shù)據(jù)庫設(shè)計(jì) 2.2.1 實(shí)體聯(lián)系圖設(shè)計(jì) 在這個(gè)實(shí)體聯(lián)系圖設(shè)計(jì)中，主要有用戶、客戶、書籍三個(gè)實(shí)體，擁有各自的屬性，三者之間，用戶同時(shí)管理客戶和圖書的信息，具體的E-R圖設(shè)計(jì)見圖2-1所示。 2.2.2 關(guān)系定義（數(shù)據(jù)字典） 分別定義了字段名，數(shù)據(jù)類型，可否為空和相關(guān)說明等，具體見如下表2-1 表2-7。 2.3 應(yīng)用程序設(shè)計(jì) 2.3.1 業(yè)務(wù)流程圖 2.3.2 系統(tǒng)結(jié)構(gòu)圖 2.4 系統(tǒng)構(gòu)架的選擇 在系統(tǒng)構(gòu)架上，我選擇了C/S（Client/Server）形式，這是一種比較常見的形式。我選用Delphi作為集成開發(fā)環(huán)境，通過ADO數(shù)據(jù)庫接口連接數(shù)據(jù)庫，在Delphi 中用嵌入SQL 語言訪問數(shù)據(jù)庫。 2.5 界面設(shè)計(jì) 在界面的設(shè)計(jì)上，為了使界面更加美觀，另外下載了兩個(gè)Delphi的編寫界面的控件，這個(gè)在實(shí)際的使用過程中比較麻煩，核心就是界面控件的正確安裝，復(fù)雜又需要耐心。整個(gè)界面設(shè)計(jì)的思想是合并和拆分，把功能不相關(guān)的窗體分開，把相近功能的窗體用page形式整合在一起，使用時(shí)較為清晰，功能也較為完整，雖然還有一些不甚完善之處，但應(yīng)該也算一個(gè)小小的嘗試吧。 第三章 部分程序代碼和實(shí)現(xiàn)功能3.1 登陸系統(tǒng)部分 /* procedure TEnter_Form.Enter_BtnClick(Sender: TObject); /登錄系統(tǒng) var DLYB_Q:TQuery; Password:string; begin DLYB_Q:=TQuery.Create(nil); DLYB_Q.DatabaseName:=DataPath; DLYB_Q.SQL.Clear; DLYB_Q.SQL.Add(Select MM,QXID From DLYB Where Name=:FName); /SQL語言嵌入 DLYB_Q.ParamByName(FName).AsString:=XM_CB.Text; DLYB_Q.Open; if DLYB_Q.RecordCount>0 then begin Password:=DLYB_Q.FieldValuesMM; if MM_E.Text=Password then begin self.Hide; QS:=DLYB_Q.FieldValuesQXID; with TMainForm.Create(nil) do try showmodal; finally free; end; end else begin MessageBox(0,密碼錯(cuò)誤請(qǐng)重新輸入！,密碼錯(cuò)誤,MB_OK or MB_ICONERROR); MM_E.Text:=; /MM_E.SetFocus; end; end; DLYB_Q.Close; FreeAndNil(DLYB_Q); end; /* 3.2 書籍查詢部分（含模糊查詢） /* procedure TCX_F.KSCX_FBtnClick(Sender: TObject); /開始查詢 begin if ASH_FRBtn.Checked then/按書號(hào) if MHCX_FCB.Checked then begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost From); TSXX_Q.SQL.Add( TSJBXX A,TSLB B Where (A.TSBH Like :TSBH) and A.Class=B.ClassID); TSXX_Q.ParamByName(TSBH).AsString:=%+GJZ_CB.Text+%; TSJG_DS.DataSet:=TSXX_Q;/第二種數(shù)據(jù)庫動(dòng)態(tài)連接 TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end else begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost); TSXX_Q.SQL.Add( From TSJBXX A,TSLB B Where (A.TSBH=:TSBH) and A.Class=B.ClassID); TSXX_Q.ParamByName(TSBH).AsString:=GJZ_CB.Text; TSJG_DS.DataSet:=TSXX_Q; TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end; if ASM_FRBtn.Checked then /按書名 if MHCX_FCB.Checked then begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost From); TSXX_Q.SQL.Add( TSJBXX A,TSLB B Where (A.Name Like :Name) and A.Class=B.ClassID); TSXX_Q.ParamByName(Name).AsString:=%+GJZ_CB.Text+%; TSJG_DS.DataSet:=TSXX_Q;/第二種數(shù)據(jù)庫動(dòng)態(tài)連接 TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end else begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost); TSXX_Q.SQL.Add( From TSJBXX A,TSLB B Where (A.Name=:Name) and A.Class=B.ClassID); TSXX_Q.ParamByName(Name).AsString:=GJZ_CB.Text; TSJG_DS.DataSet:=TSXX_Q; TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end; if AZZ_FRBtn.Checked then /按作者 if MHCX_FCB.Checked then begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost From); TSXX_Q.SQL.Add( TSJBXX A,TSLB B Where (A.Auther Like :Auther) and A.Class=B.ClassID); TSXX_Q.ParamByName(Auther).AsString:=%+GJZ_CB.Text+%; TSJG_DS.DataSet:=TSXX_Q;/第二種數(shù)據(jù)庫動(dòng)態(tài)連接 TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end else begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost); TSXX_Q.SQL.Add( From TSJBXX A,TSLB B Where (A.Auther=:Auther) and A.Class=B.ClassID); TSXX_Q.ParamByName(Auther).AsString:=GJZ_CB.Text; TSJG_DS.DataSet:=TSXX_Q; TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end; if ACBS_FRBtn.Checked then /按出版社 if MHCX_FCB.Checked then begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost From); TSXX_Q.SQL.Add( TSJBXX A,TSLB B Where (A.CBS Like :CBS) and A.Class=B.ClassID); TSXX_Q.ParamByName(CBS).AsString:=%+GJZ_CB.Text+%; TSJG_DS.DataSet:=TSXX_Q;/第二種數(shù)據(jù)庫動(dòng)態(tài)連接 TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end else begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost); TSXX_Q.SQL.Add( From TSJBXX A,TSLB B Where (A.CBS=:CBS) and A.Class=B.ClassID); TSXX_Q.ParamByName(CBS).AsString:=GJZ_CB.Text; TSJG_DS.DataSet:=TSXX_Q; TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end; if ALB_FRBtn.Checked then /按類別 if MHCX_FCB.Checked then begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost From); TSXX_Q.SQL.Add( TSJBXX A,TSLB B Where (B.ClassName Like :ClassName) and A.Class=B.ClassID); TSXX_Q.ParamByName(ClassName).AsString:=%+GJZ_CB.Text+%; TSJG_DS.DataSet:=TSXX_Q;/第二種數(shù)據(jù)庫動(dòng)態(tài)連接 TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end else begin TSXX_Q.Close; TSXX_Q.SQL.Clear; TSXX_Q.SQL.Add(Select TSBH,Name,Auther,ClassName,CBS,Cost); TSXX_Q.SQL.Add( From TSJBXX A,TSLB B Where (B.ClassName=:ClassName) and A.Class=B.ClassID); TSXX_Q.ParamByName(ClassName).AsString:=GJZ_CB.Text; TSJG_DS.DataSet:=TSXX_Q; TSJG_DG.Columns0.FieldName:=TSBH; TSJG_DG.Columns1.FieldName:=Name; TSJG_DG.Columns2.FieldName:=Auther; TSJG_DG.Columns3.FieldName:=ClassName; TSJG_DG.Columns4.FieldName:=CBS; TSJG_DG.Columns5.FieldName:=Cost; TSXX_Q.Open; TS_Lable.Caption:=Format(共 %d 條記錄,TSXX_Q.RecordCount); end; end; /* procedure TCX_F.MHCX_FCBClick(Sender: TObject); /選中書籍模糊查詢 begin TSXX_Q.Close; TS_Lable.Caption:=共有 0 條記錄; end; /*第四章 數(shù)據(jù)庫相關(guān)在Delphi自帶的Database Desktop平臺(tái)下，我們可以很方便的查看并修改相關(guān)的數(shù)據(jù)內(nèi)容，下面貼出其運(yùn)行時(shí)的部分截圖。包含用戶及其權(quán)限，客戶及其組名書籍及其分類等等。如圖4-1和圖4-2。 圖4-1 Database Desktop平臺(tái)數(shù)據(jù)圖a 圖4-2 Database Desktop平臺(tái)數(shù)據(jù)圖b 第五章 最終應(yīng)用程序運(yùn)行說明5.1 系統(tǒng)登陸 不用的用戶登陸系統(tǒng)將會(huì)擁有不同的使用權(quán)限（登陸的用戶不可以涉及的信息管理方面將會(huì)使灰色顯示，點(diǎn)擊無反應(yīng)），在下拉框中可以選擇（如圖5-1），如果用戶輸入密碼錯(cuò)誤將會(huì)有錯(cuò)誤提示（如圖5-2），點(diǎn)擊確定后繼續(xù)新一次輸入，正常登陸后，如果有會(huì)員借閱書籍過期，系統(tǒng)自動(dòng)彈出提示窗口（如圖5-3）。 圖5-1 登陸多用戶選擇 圖5-2 密碼輸入錯(cuò)誤提示窗口 圖5-3 借閱過期彈出窗口 5.2 用戶權(quán)限管理 這個(gè)只能由管理員進(jìn)行操作，在這里可以添加，修改，刪除系統(tǒng)可登陸用戶，甚至連超級(jí)管理員都可以刪除，由于刪除操作不可恢復(fù)，所以選定刪除對(duì)象點(diǎn)擊刪除之后會(huì)有警告（如圖5-4），以防管理員誤操作導(dǎo)致資料丟失，我認(rèn)為這樣比較人性化，并充分考慮到不可確定的因素。 圖5-4 在用戶權(quán)限管理窗口刪除某用戶時(shí)出現(xiàn)警告窗口 5.3 會(huì)員分組管理 在這里可以設(shè)置會(huì)員分組，同樣也提供了添加，修改，刪除等操作，讓擁有權(quán)限的管理員輕松修改會(huì)員等級(jí)制度和各級(jí)別會(huì)員所能享受到的優(yōu)惠度（如圖5-5），方便書店經(jīng)營者根據(jù)自己的經(jīng)營戰(zhàn)略調(diào)整相關(guān)信息。 圖5-5 會(huì)員等級(jí)制的修改等操作 5.4 新到書籍編目 新到書籍編目即新書入庫，所有選項(xiàng)都是活動(dòng)的，但是一旦給定編號(hào)入庫，之后的書籍信息維護(hù)就不能更改其編號(hào)了，另外如果輸入格式有誤，比如日期格式（如圖5-6），如果不慎輸入錯(cuò)誤就會(huì)出現(xiàn)提示窗口，其他選項(xiàng)出錯(cuò)提示類似，當(dāng)一切都正確輸入后點(diǎn)擊入庫書籍就進(jìn)入了你的數(shù)據(jù)庫并顯示入庫成功提示窗口供你確認(rèn)（如圖5-7），之后停留在新書入庫界面等待下個(gè)新書信息的錄入。 圖5-6 日期格式輸入錯(cuò)誤提示 圖5-7 新書入庫成功 5.5 書籍資料維護(hù) 書籍維護(hù)分為書籍修改刪除，書籍類別編輯兩個(gè)子操作，前者可以通過書籍編號(hào)進(jìn)行定位，找出書籍的相關(guān)資料并進(jìn)行編輯（如圖5-8），注意這個(gè)時(shí)候編號(hào)選項(xiàng)框是灰色的，表示不可編輯，這也就是我上面所提到的書籍一旦入庫成功，編號(hào)就是唯一的，不能修改的。同樣在后者窗口中，用戶也可以很方便的對(duì)書籍分類進(jìn)行一系列的修改（如圖5-9）。 圖5-8 編號(hào)定位書籍后修改和刪除資料 圖5-9 書籍類別編輯 5.6 辦理會(huì)員卡 辦理會(huì)員卡的時(shí)候主要需要錄入編號(hào)，姓名等相關(guān)資料（如圖5-10）。 圖5-10 錄入相關(guān)信息辦理會(huì)員卡 5.7 會(huì)員信息維護(hù) 圖5-11 會(huì)員信息定位修改等 5.8 借閱和歸還 借閱和歸還在一個(gè)窗口中出現(xiàn)，在選擇要進(jìn)行的操作之后轉(zhuǎn)換窗口，這里默認(rèn)借閱操作，首先面對(duì)的是書籍編號(hào)的輸入（如圖5-12），出現(xiàn)相關(guān)信息后再要求輸入會(huì)員卡號(hào)，當(dāng)用戶選擇歸還操作時(shí)窗口變化，首先是會(huì)員卡號(hào)的輸入，確定之后便會(huì)出現(xiàn)所借書目，選擇某書籍確定出現(xiàn)剩余的相關(guān)信息（如圖5-13），如果過期應(yīng)繳費(fèi)就非零了（如圖5-14）。 圖5-12 借閱操作 圖5-13 歸還操作a 圖5-14 歸還操作b 5.9 查詢信息 查詢信息包括查詢書籍，會(huì)員和借閱信息，分別都可以按多種方式查詢，比如卡號(hào)，姓名，書號(hào)，出版社等等，只要用戶提供關(guān)鍵字我們就可以得到所需要的相關(guān)信息，這里特別提到的是模糊查詢方式，這在現(xiàn)實(shí)生活中是比較常見而且比較有效的。如圖5-15圖5-18。 圖5-15 書籍信息查詢 圖5-16 會(huì)員信息查詢 圖5-17 個(gè)人借閱信息查詢 圖5-18過期借閱信息查詢 5.10 關(guān)于本系統(tǒng) 圖5-19 應(yīng)用系統(tǒng)說明 這次數(shù)據(jù)庫設(shè)計(jì)的過程中，我使用集成開發(fā)環(huán)境Delphi7，用Delphi開發(fā)數(shù)據(jù)庫確實(shí)有其便利性，在界面設(shè)計(jì)及程序易讀性上都非常的便利。由于以前較多的使用過C/C+來編程，對(duì)Delphi沒有很多的了解，在語言的學(xué)習(xí)上沒有花太多功夫，以致于在安裝控件的時(shí)候有點(diǎn)摸不著頭，在調(diào)試涉及到數(shù)據(jù)庫的代碼時(shí)，也花了不少時(shí)間，有些莫名其妙的問題現(xiàn)在仍然沒有弄明白，可能是學(xué)習(xí)得還不夠吧。最后還是馬馬虎虎的作出來了，當(dāng)然還存在著很多問題，在程序的功能設(shè)計(jì)上因?yàn)闀r(shí)間不充足加上自己沒有實(shí)際參加過書店的日常管理，很多問題都沒有考慮周全，另外考慮問題多多少少都存在不夠全面的問題，在程序設(shè)計(jì)的時(shí)候主要都是按著程序正常運(yùn)行或者說按著自己想要其發(fā)生的方向去設(shè)計(jì)，沒有很重視在程序遇到不常規(guī)的數(shù)據(jù)，發(fā)生不正常的情況時(shí)應(yīng)該有的應(yīng)付措施，我覺得在這個(gè)方面比較缺乏一種隊(duì)全局的把握和對(duì)異常處理的考慮，今后一定要加強(qiáng)。 通過這次數(shù)據(jù)庫的設(shè)計(jì)，我對(duì)整個(gè)數(shù)據(jù)庫設(shè)計(jì)的過程有了一些了解，在程序語言的學(xué)習(xí)上也有了新的進(jìn)步，在不斷的遇到問題到解決問題的過程中學(xué)到很多寶貴的經(jīng)驗(yàn)。雖然還存在許多不足，但學(xué)習(xí)的過程已讓我收獲頗豐，期待以后有機(jī)會(huì)能取得更大的進(jìn)步吧。 第七章 參考文獻(xiàn)1Delphi 7數(shù)據(jù)庫項(xiàng)目案例導(dǎo)航周興華, 李增民, 臧洪光編著清華大學(xué)出版社，2005年 2Delphi數(shù)據(jù)庫開發(fā)經(jīng)典案例解析王晟, 萬科編著清華大學(xué)出版社, 2005年 3Delphi 7基礎(chǔ)教程宋一兵, 趙景波, 李春艷等編著機(jī)械工業(yè)出版社, 2005年- 30 -