書(shū)店管理系統(tǒng)畢業(yè)論文1

《書(shū)店管理系統(tǒng)畢業(yè)論文1》由會(huì)員分享，可在線閱讀，更多相關(guān)《書(shū)店管理系統(tǒng)畢業(yè)論文1（30頁(yè)珍藏版）》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。

1、 書(shū)店管理系統(tǒng) 目 錄： 摘要 ……………………………………………………………………………………4 前言 ……………………………………………………………………………………7 第一章  設(shè)計(jì)目標(biāo) ………………………………… ………………8      1.1  理論應(yīng)用 …………………………………………8      1.2  工具使用 ………………………………………8      1.3

2、60; 應(yīng)用開(kāi)發(fā) ……………………………………8      1.4  報(bào)告編寫(xiě) ………………………………………8 第二章  系統(tǒng)設(shè)計(jì)說(shuō)明 ………………………………………8      2.1  系統(tǒng)簡(jiǎn)介 ………………………………………8      2.2  數(shù)據(jù)庫(kù)設(shè)計(jì) ……………………………8 2.2.1  實(shí)體聯(lián)系圖設(shè)計(jì) …………………………

3、………8      2.2.2  關(guān)系定義 …………………………………9      2.3  應(yīng)用程序設(shè)計(jì) ……………………………… 11      2.3.1  業(yè)務(wù)流程圖 ……………………………… 11      2.3.2  系統(tǒng)結(jié)構(gòu)圖 …………………………………… 11 2.4  系統(tǒng)框架

4、的選擇 ………………………………………… 12    2.5  界面設(shè)計(jì) ……………………………………………… 12 第三章  部分程序代碼和實(shí)現(xiàn)功能 …………………………… 12      3.1  系統(tǒng)登陸部分 …………………………………… 12      3.2  書(shū)籍查詢(xún)部分 …………………………………… 13 第四章  數(shù)據(jù)庫(kù)相關(guān) ……………………………………………

5、 20 第五章  最終應(yīng)用程序運(yùn)行說(shuō)明 ………………………………… 21      5.1  系統(tǒng)登陸 ………………………………………… 21      5.2  用戶(hù)權(quán)限管理 …………………………………… 23      5.3  會(huì)員分組管理 ……………………………………… 23      5.4  新到書(shū)籍編目 …

6、…………………………… 24      5.5  書(shū)籍資料維護(hù) ………………………… 25      5.6  辦理會(huì)員卡 ………………………………… 26      5.7  會(huì)員信息維護(hù) ………………………… 26      5.8  借閱和歸還 …………………………………… 26      5.

7、9  查詢(xún)信息 ……………………………………… 28      5.10 關(guān)于本系統(tǒng) …………………………… 29 第六章  總結(jié) ……………………………………… 31 第七章  參考文獻(xiàn) ………………………………… 31 書(shū)店管理系統(tǒng) 摘 要 時(shí)代在發(fā)展，人的求知欲也在不斷的增長(zhǎng)，我們需要不斷的提升自己的競(jìng)爭(zhēng)力，書(shū)籍成了我們幫助我們提高自身能力的有效也是很普遍的工具。書(shū)籍每時(shí)每刻都在推陳出新，信息量的更

8、新很龐大。 信息時(shí)代高速發(fā)展的今天，書(shū)店的信息化管理卻沒(méi)有得到很好的普及和發(fā)展，特別是很多小型的書(shū)店出于成本增加等原因而沒(méi)有為自己的書(shū)店建立一個(gè)電腦記錄的信息管理，殊不知投入了更大的人員方面的投入，反而增加了一定的成本，又使工作人員陷入繁瑣的數(shù)據(jù)中，出錯(cuò)的幾率也因此增大，上述這些事實(shí)迫使我們必須適應(yīng)時(shí)代的要求，利用電腦有序而高效地管理各項(xiàng)信息。為了優(yōu)化書(shū)店管理模式，提高人力工作效率，我設(shè)計(jì)了這個(gè)書(shū)店管理系統(tǒng)，可以很方便書(shū)店管理員進(jìn)行高效的書(shū)籍和會(huì)員等相關(guān)管理。系統(tǒng)將會(huì)提供各種權(quán)限供不同的用戶(hù)群使用，書(shū)店管理員可以使用整套系統(tǒng)的所有功能，新增書(shū)籍入庫(kù)，書(shū)籍信息維護(hù)，會(huì)員信息維護(hù)，書(shū)籍借閱記錄

9、等，都可以輕松實(shí)現(xiàn)。另外簡(jiǎn)約美觀的界面會(huì)讓我們的工作環(huán)境煥然一新，這在一定程度上也能提高管理人員的工作熱情和工作效率。當(dāng)然，還存在很多需要改進(jìn)的地方，也需要用戶(hù)在使用過(guò)程中對(duì)我提出改進(jìn)意見(jiàn)。 關(guān)鍵詞 數(shù)據(jù)庫(kù) 課程設(shè)計(jì) 書(shū)店管理 Delphi Abstract The time is developing, human's intellectual curiosity also in the unceasing growth, we needed to promote own unceasingly competitive power, th

10、e 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, bookstore's informationi

11、zation 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 inves

12、ted 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 effectiv

13、e 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

14、 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 t

15、he 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 personnel's work enthusiasm and the working efficiency to a certain extent.Certainly, but also has the pla

16、ce 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é)校附近的書(shū)店買(mǎi)書(shū)你就會(huì)發(fā)現(xiàn)，現(xiàn)在很多書(shū)店的信息管理依然比較滯后，一般都采用紙筆加計(jì)算器人工管理的方法。對(duì)于較小型的書(shū)店，這種原始的管理方式還能應(yīng)付，但對(duì)于種類(lèi)繁

17、多、數(shù)量龐大的較大型書(shū)店來(lái)說(shuō)，這種原始落后的管理已經(jīng)遠(yuǎn)遠(yuǎn)不能滿足，不但工作繁瑣，出錯(cuò)的幾率也是很大的，大大降低了工作效率。另外現(xiàn)在比較有先見(jiàn)之明的書(shū)店都慢慢發(fā)展自己的特色業(yè)務(wù)，比如會(huì)員制度，針對(duì)會(huì)員有免費(fèi)借閱書(shū)籍的業(yè)務(wù)，要求是每月消費(fèi)達(dá)到一定金額，據(jù)悉這種舉措很受市場(chǎng)的歡迎，極大的帶動(dòng)了帶動(dòng)了書(shū)店的消費(fèi)，為書(shū)店自身的發(fā)展積累了一定的資金和管理經(jīng)驗(yàn)。除此之外還有各色名目繁多的會(huì)員活動(dòng)等等，給讀者一種心理上的優(yōu)越感，刺激了消費(fèi)。為了優(yōu)化書(shū)店管理模式，我嘗試開(kāi)發(fā)了這個(gè)書(shū)店綜合管理系統(tǒng)，讓用戶(hù)很方便的通過(guò)這套系統(tǒng)管理書(shū)店的日常事務(wù)和繁瑣數(shù)據(jù)，讓用戶(hù)在整潔的環(huán)境下輕松的進(jìn)行書(shū)店的日常業(yè)務(wù)的開(kāi)展。

18、 第一章 設(shè)計(jì)目標(biāo) 1.1 理論應(yīng)用 運(yùn)用數(shù)據(jù)庫(kù)設(shè)計(jì)理論設(shè)計(jì)一個(gè)較完善的有實(shí)際意義的數(shù)據(jù)庫(kù)結(jié)構(gòu) 1.2 工具使用 掌握目前流行數(shù)據(jù)庫(kù)管理系統(tǒng)工具和前端應(yīng)用開(kāi)發(fā)工具 1.3 應(yīng)用開(kāi)發(fā) 為數(shù)據(jù)庫(kù)開(kāi)發(fā)相應(yīng)應(yīng)用程序，構(gòu)成完整的數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng) 1.4 報(bào)告編寫(xiě) 使用計(jì)算機(jī)按照規(guī)定格式編寫(xiě)高質(zhì)量的設(shè)計(jì)報(bào)告 第二章 系統(tǒng)設(shè)計(jì)說(shuō)明 2.1 系統(tǒng)簡(jiǎn)介     隨著時(shí)代的飛速發(fā)展和電腦的普及應(yīng)用，信息智能化的社會(huì)正在向我們迎面走來(lái)。

19、相比以前靠紙筆記錄信息的時(shí)代，電腦的智能化管理將給我們的生活帶來(lái)極大的便利性。針對(duì)現(xiàn)今書(shū)店管理信息化的滯后，這次課設(shè)我設(shè)計(jì)了一款面向書(shū)店的綜合管理系統(tǒng)，可供系統(tǒng)管理員和一般用戶(hù)使用，可以十分便利的增加、記錄、查詢(xún)和修改書(shū)籍的各種信息：包括書(shū)號(hào)、書(shū)名、作者、出版社、定價(jià)和分類(lèi)等，并在此基礎(chǔ)上設(shè)計(jì)了現(xiàn)在書(shū)店廣泛采用的VIP會(huì)員功能，會(huì)員可以注冊(cè)成不同級(jí)別的VIP會(huì)員，享受不同的免費(fèi)圖書(shū)借閱的優(yōu)惠，同時(shí)管理員也可以十分方便的新增、查詢(xún)和修改會(huì)員信息。 2.2 數(shù)據(jù)庫(kù)設(shè)計(jì) 2.2.1 實(shí)體聯(lián)系圖設(shè)計(jì) 在這個(gè)實(shí)體聯(lián)系圖設(shè)計(jì)中，主要有用戶(hù)、客戶(hù)、書(shū)籍三個(gè)實(shí)體，擁有各自的屬性，三者之

20、間，用戶(hù)同時(shí)管理客戶(hù)和圖書(shū)的信息，具體的E-R圖設(shè)計(jì)見(jiàn)圖2-1所示。 2.2.2 關(guān)系定義（數(shù)據(jù)字典） 分別定義了字段名，數(shù)據(jù)類(lèi)型，可否為空和相關(guān)說(shuō)明等，具體見(jià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）形式，這是一種比較常見(jiàn)的形式。我選用Delphi作為集成開(kāi)發(fā)環(huán)境，通過(guò)ADO數(shù)據(jù)庫(kù)接口連接數(shù)據(jù)庫(kù)，在D

21、elphi 中用嵌入SQL 語(yǔ)言訪問(wèn)數(shù)據(jù)庫(kù)。 2.5 界面設(shè)計(jì) 在界面的設(shè)計(jì)上，為了使界面更加美觀，另外下載了兩個(gè)Delphi的編寫(xiě)界面的控件，這個(gè)在實(shí)際的使用過(guò)程中比較麻煩，核心就是界面控件的正確安裝，復(fù)雜又需要耐心。整個(gè)界面設(shè)計(jì)的思想是合并和拆分，把功能不相關(guān)的窗體分開(kāi)，把相近功能的窗體用page形式整合在一起，使用時(shí)較為清晰，功能也較為完整，雖然還有一些不甚完善之處，但應(yīng)該也算一個(gè)小小的嘗試吧。 第三章 部分程序代碼和實(shí)現(xiàn)功能 3.1 登陸系統(tǒng)部分 //*******************************************************

22、**************************** 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;   

23、DLYB_Q.SQL.Add('Select MM,QXID From DLYB Where Name=:FName'); //SQL語(yǔ)言嵌入   DLYB_Q.ParamByName('FName').AsString:=XM_CB.Text;   DLYB_Q.Open;   if DLYB_Q.RecordCount>0 then     begin       Passw

24、ord:=DLYB_Q.FieldValues['MM'];       if MM_E.Text=Password then         begin           self.Hide;           QS:=D

25、LYB_Q.FieldValues['QXID'];           with TMainForm.Create(nil) do             try               showmodal

26、;             finally               free;             end;        &

27、#160;end         else begin           MessageBox(0,'密碼錯(cuò)誤請(qǐng)重新輸入！','密碼錯(cuò)誤',MB_OK or MB_ICONERROR);           MM_E.Text:='';  &#

28、160;        //MM_E.SetFocus;         end;     end;   DLYB_Q.Close;   FreeAndNil(DLYB_Q); end; //************************************************************************

29、*********** 3.2 書(shū)籍查詢(xún)部分（含模糊查詢(xún)） //*********************************************************************************** procedure TCX_F.KSCX_FBtnClick(Sender: TObject);     //開(kāi)始查詢(xún) begin   if ASH_FRBtn.Checked then        

30、60;         //按書(shū)號(hào)     if MHCX_FCB.Checked then       begin         TSXX_Q.Close;         TSXX_Q.SQL.Clear;  &#

31、160;      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');        

32、; TSXX_Q.ParamByName('TSBH').AsString:='%'+GJZ_CB.Text+'%';         TSJG_DS.DataSet:=TSXX_Q;            //第二種數(shù)據(jù)庫(kù)動(dòng)態(tài)連接         

33、TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].FieldName:='Auther';         TSJG_DG.Co

34、lumns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:='Cost';         TSXX_Q.Open;

35、60;       TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end       else begin         TSXX_Q.Close;      &

36、#160;  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'); &

37、#160;       TSXX_Q.ParamByName('TSBH').AsString:=GJZ_CB.Text;         TSJG_DS.DataSet:=TSXX_Q;         TSJG_DG.Columns[0].FieldName:='TSBH';    

38、0;    TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].FieldName:='Auther';         TSJG_DG.Columns[3].FieldName:='ClassName';     

39、60;   TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:='Cost';         TSXX_Q.Open;         TS_Lable.Caption:=Format(

40、'共 %d 條記錄',[TSXX_Q.RecordCount]);       end;   if ASM_FRBtn.Checked then               //按書(shū)名     if MHCX_FCB.Checked then      

41、 begin         TSXX_Q.Close;         TSXX_Q.SQL.Clear;         TSXX_Q.SQL.Add('Select TSBH,Name,Auther,ClassName,CBS,Cost From');      

42、;   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_

43、DS.DataSet:=TSXX_Q;            //第二種數(shù)據(jù)庫(kù)動(dòng)態(tài)連接         TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name'; &#

44、160;       TSJG_DG.Columns[2].FieldName:='Auther';         TSJG_DG.Columns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';  &#

45、160;      TSJG_DG.Columns[5].FieldName:='Cost';         TSXX_Q.Open;         TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);      &#

46、160;end       else begin         TSXX_Q.Close;         TSXX_Q.SQL.Clear;         TSXX_Q.SQL.Add('Select TSBH,Name,Auther,ClassName,CBS,Cos

47、t');         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;       

48、60; TSJG_DS.DataSet:=TSXX_Q;         TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].Field

49、Name:='Auther';         TSJG_DG.Columns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:=

50、'Cost';         TSXX_Q.Open;         TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end;   if AZZ_FRBtn.Checked then   &#

51、160;           //按作者     if MHCX_FCB.Checked then       begin         TSXX_Q.Close;         TSXX_Q.SQL.Clear;

52、        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');      

53、;   TSXX_Q.ParamByName('Auther').AsString:='%'+GJZ_CB.Text+'%';         TSJG_DS.DataSet:=TSXX_Q;            //第二種數(shù)據(jù)庫(kù)動(dòng)態(tài)連接      

54、0;  TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].FieldName:='Auther';        &#

55、160;TSJG_DG.Columns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:='Cost';         TSXX

56、_Q.Open;         TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end       else begin         TSXX_Q.Close;    

57、;     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.

58、ClassID');         TSXX_Q.ParamByName('Auther').AsString:=GJZ_CB.Text;         TSJG_DS.DataSet:=TSXX_Q;         TSJG_DG.Columns[0].FieldName:='TSBH'; &#

59、160;       TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].FieldName:='Auther';         TSJG_DG.Columns[3].FieldName:='ClassName';  &

60、#160;      TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:='Cost';         TSXX_Q.Open;         TS_La

61、ble.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end;   if ACBS_FRBtn.Checked then               //按出版社     if MHCX_FCB.Checked then  &#

62、160;    begin         TSXX_Q.Close;         TSXX_Q.SQL.Clear;         TSXX_Q.SQL.Add('Select TSBH,Name,Auther,ClassName,CBS,Cost From');  &

63、#160;      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+'%';      

64、0;  TSJG_DS.DataSet:=TSXX_Q;            //第二種數(shù)據(jù)庫(kù)動(dòng)態(tài)連接         TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:=&

65、#39;Name';         TSJG_DG.Columns[2].FieldName:='Auther';         TSJG_DG.Columns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='C

66、BS';         TSJG_DG.Columns[5].FieldName:='Cost';         TSXX_Q.Open;         TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);   &

67、#160;   end       else begin         TSXX_Q.Close;         TSXX_Q.SQL.Clear;         TSXX_Q.SQL.Add('Select TSBH,Name,Authe

68、r,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;     

69、;    TSJG_DS.DataSet:=TSXX_Q;         TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.

70、Columns[2].FieldName:='Auther';         TSJG_DG.Columns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Column

71、s[5].FieldName:='Cost';         TSXX_Q.Open;         TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end;   if ALB_FRBtn.Checked then

72、0;              //按類(lèi)別     if MHCX_FCB.Checked then       begin         TSXX_Q.Close;         TSXX

73、_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');  &

74、#160;      TSXX_Q.ParamByName('ClassName').AsString:='%'+GJZ_CB.Text+'%';         TSJG_DS.DataSet:=TSXX_Q;            //第二種數(shù)據(jù)庫(kù)動(dòng)態(tài)連接  

75、60;      TSJG_DG.Columns[0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].FieldName:='Auther';    &

76、#160;    TSJG_DG.Columns[3].FieldName:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:='Cost';     

77、60;   TSXX_Q.Open;         TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end       else begin         TSXX_Q.C

78、lose;         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.Class

79、Name=:ClassName) and A.Class=B.ClassID');         TSXX_Q.ParamByName('ClassName').AsString:=GJZ_CB.Text;         TSJG_DS.DataSet:=TSXX_Q;         TSJG_DG.Columns[

80、0].FieldName:='TSBH';         TSJG_DG.Columns[1].FieldName:='Name';         TSJG_DG.Columns[2].FieldName:='Auther';         TSJG_DG.Columns[3].FieldNa

81、me:='ClassName';         TSJG_DG.Columns[4].FieldName:='CBS';         TSJG_DG.Columns[5].FieldName:='Cost';         TSXX_Q.Open;    &

82、#160;    TS_Lable.Caption:=Format('共 %d 條記錄',[TSXX_Q.RecordCount]);       end; end; //*********************************************************************************** procedure TCX_F.MHCX_FCBClick(Sender: TObject);   

83、;      //選中書(shū)籍模糊查詢(xún) begin   TSXX_Q.Close;   TS_Lable.Caption:='共有 0 條記錄'; end; //*********************************************************************************** 第四章 數(shù)據(jù)庫(kù)相關(guān) 在Delphi自帶的Database Desktop平臺(tái)下，我們可以很方便的查看并修改相關(guān)的數(shù)據(jù)內(nèi)容，下面貼出其運(yùn)行時(shí)的部分

84、截圖。包含用戶(hù)及其權(quán)限，客戶(hù)及其組名書(shū)籍及其分類(lèi)等等。如圖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)行說(shuō)明 5.1 系統(tǒng)登陸 不用的用戶(hù)登陸系統(tǒng)將會(huì)擁有不同的使用權(quán)限（登陸的用戶(hù)不可以涉及的信息管理方面將會(huì)使灰色顯示，點(diǎn)擊無(wú)反應(yīng)），在下拉框中可以選擇（如圖5-1），如果用戶(hù)輸入密碼錯(cuò)誤將會(huì)有錯(cuò)誤提示（如圖5-2），點(diǎn)擊確定后繼續(xù)新一次輸入，正常登陸后，如果有會(huì)員借閱書(shū)籍過(guò)期，系統(tǒng)自動(dòng)彈出提示窗口（如圖5-3）。 圖5-1 登陸多用戶(hù)選擇 圖5-2

85、 密碼輸入錯(cuò)誤提示窗口 圖5-3 借閱過(guò)期彈出窗口 5.2 用戶(hù)權(quán)限管理 這個(gè)只能由管理員進(jìn)行操作，在這里可以添加，修改，刪除系統(tǒng)可登陸用戶(hù)，甚至連超級(jí)管理員都可以刪除，由于刪除操作不可恢復(fù)，所以選定刪除對(duì)象點(diǎn)擊刪除之后會(huì)有警告（如圖5-4），以防管理員誤操作導(dǎo)致資料丟失，我認(rèn)為這樣比較人性化，并充分考慮到不可確定的因素。 圖5-4 在用戶(hù)權(quán)限管理窗口刪除某用戶(hù)時(shí)出現(xiàn)警告窗口 5.3 會(huì)員分組管理 在這里可以設(shè)置會(huì)員分組，同樣也提供了添加，修改，刪除等操作，讓擁有權(quán)限的管理員輕松修改會(huì)員等級(jí)制度和各級(jí)別會(huì)員所能享受到的優(yōu)惠度（如圖5-5），方便書(shū)

86、店經(jīng)營(yíng)者根據(jù)自己的經(jīng)營(yíng)戰(zhàn)略調(diào)整相關(guān)信息。 圖5-5 會(huì)員等級(jí)制的修改等操作 5.4 新到書(shū)籍編目 新到書(shū)籍編目即新書(shū)入庫(kù)，所有選項(xiàng)都是活動(dòng)的，但是一旦給定編號(hào)入庫(kù)，之后的書(shū)籍信息維護(hù)就不能更改其編號(hào)了，另外如果輸入格式有誤，比如日期格式（如圖5-6），如果不慎輸入錯(cuò)誤就會(huì)出現(xiàn)提示窗口，其他選項(xiàng)出錯(cuò)提示類(lèi)似，當(dāng)一切都正確輸入后點(diǎn)擊入庫(kù)書(shū)籍就進(jìn)入了你的數(shù)據(jù)庫(kù)并顯示入庫(kù)成功提示窗口供你確認(rèn)（如圖5-7），之后停留在新書(shū)入庫(kù)界面等待下個(gè)新書(shū)信息的錄入。 圖5-6 日期格式輸入錯(cuò)誤提示 圖5-7 新書(shū)入庫(kù)成功 5.5 書(shū)籍資料維護(hù) 書(shū)籍維護(hù)分為書(shū)籍修改

87、刪除，書(shū)籍類(lèi)別編輯兩個(gè)子操作，前者可以通過(guò)書(shū)籍編號(hào)進(jìn)行定位，找出書(shū)籍的相關(guān)資料并進(jìn)行編輯（如圖5-8），注意這個(gè)時(shí)候編號(hào)選項(xiàng)框是灰色的，表示不可編輯，這也就是我上面所提到的書(shū)籍一旦入庫(kù)成功，編號(hào)就是唯一的，不能修改的。同樣在后者窗口中，用戶(hù)也可以很方便的對(duì)書(shū)籍分類(lèi)進(jìn)行一系列的修改（如圖5-9）。 圖5-8 編號(hào)定位書(shū)籍后修改和刪除資料 圖5-9 書(shū)籍類(lèi)別編輯 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 借閱

88、和歸還 借閱和歸還在一個(gè)窗口中出現(xiàn)，在選擇要進(jìn)行的操作之后轉(zhuǎn)換窗口，這里默認(rèn)借閱操作，首先面對(duì)的是書(shū)籍編號(hào)的輸入（如圖5-12），出現(xiàn)相關(guān)信息后再要求輸入會(huì)員卡號(hào)，當(dāng)用戶(hù)選擇歸還操作時(shí)窗口變化，首先是會(huì)員卡號(hào)的輸入，確定之后便會(huì)出現(xiàn)所借書(shū)目，選擇某書(shū)籍確定出現(xiàn)剩余的相關(guān)信息（如圖5-13），如果過(guò)期應(yīng)繳費(fèi)就非零了（如圖5-14）。 圖5-12 借閱操作 圖5-13 歸還操作a 圖5-14 歸還操作b 5.9 查詢(xún)信息 查詢(xún)信息包括查詢(xún)書(shū)籍，會(huì)員和借閱信息，分別都可以按多種方式查詢(xún)，比如卡號(hào)，姓名，書(shū)號(hào)，出版社等等，只要用戶(hù)提供關(guān)鍵字我們就可以得到所需

89、要的相關(guān)信息，這里特別提到的是模糊查詢(xún)方式，這在現(xiàn)實(shí)生活中是比較常見(jiàn)而且比較有效的。如圖5-15～圖5-18。 圖5-15 書(shū)籍信息查詢(xún) 圖5-16 會(huì)員信息查詢(xún) 圖5-17 個(gè)人借閱信息查詢(xún) 圖5-18過(guò)期借閱信息查詢(xún) 5.10 關(guān)于本系統(tǒng) 圖5-19 應(yīng)用系統(tǒng)說(shuō)明 這次數(shù)據(jù)庫(kù)設(shè)計(jì)的過(guò)程中，我使用集成開(kāi)發(fā)環(huán)境Delphi7，用Delphi開(kāi)發(fā)數(shù)據(jù)庫(kù)確實(shí)有其便利性，在界面設(shè)計(jì)及程序易讀性上都非常的便利。由于以前較多的使用過(guò)C/C++來(lái)編程，對(duì)Delphi沒(méi)有很多的了解，在語(yǔ)言的學(xué)習(xí)上沒(méi)有花太多功夫，以致于在安裝控件的時(shí)候有點(diǎn)摸不著頭，在調(diào)

90、試涉及到數(shù)據(jù)庫(kù)的代碼時(shí)，也花了不少時(shí)間，有些莫名其妙的問(wèn)題現(xiàn)在仍然沒(méi)有弄明白，可能是學(xué)習(xí)得還不夠吧。最后還是馬馬虎虎的作出來(lái)了，當(dāng)然還存在著很多問(wèn)題，在程序的功能設(shè)計(jì)上因?yàn)闀r(shí)間不充足加上自己沒(méi)有實(shí)際參加過(guò)書(shū)店的日常管理，很多問(wèn)題都沒(méi)有考慮周全，另外考慮問(wèn)題多多少少都存在不夠全面的問(wèn)題，在程序設(shè)計(jì)的時(shí)候主要都是按著程序正常運(yùn)行或者說(shuō)按著自己想要其發(fā)生的方向去設(shè)計(jì)，沒(méi)有很重視在程序遇到不常規(guī)的數(shù)據(jù)，發(fā)生不正常的情況時(shí)應(yīng)該有的應(yīng)付措施，我覺(jué)得在這個(gè)方面比較缺乏一種隊(duì)全局的把握和對(duì)異常處理的考慮，今后一定要加強(qiáng)。 通過(guò)這次數(shù)據(jù)庫(kù)的設(shè)計(jì)，我對(duì)整個(gè)數(shù)據(jù)庫(kù)設(shè)計(jì)的過(guò)程有了一些了解，在程序語(yǔ)言的學(xué)習(xí)

91、上也有了新的進(jìn)步，在不斷的遇到問(wèn)題到解決問(wèn)題的過(guò)程中學(xué)到很多寶貴的經(jīng)驗(yàn)。雖然還存在許多不足，但學(xué)習(xí)的過(guò)程已讓我收獲頗豐，期待以后有機(jī)會(huì)能取得更大的進(jìn)步吧。 第七章 參考文獻(xiàn) 1．《Delphi 7數(shù)據(jù)庫(kù)項(xiàng)目案例導(dǎo)航》  周興華, 李增民, 臧洪光編著  清華大學(xué)出版社，2005年 2．《Delphi數(shù)據(jù)庫(kù)開(kāi)發(fā)經(jīng)典案例解析》  王晟, 萬(wàn)科編著  清華大學(xué)出版社, 2005年 3．《Delphi 7基礎(chǔ)教程》  宋一兵, 趙景波, 李春艷等編著    機(jī)械工業(yè)出版社, 2005年 - 30 -