delphi服裝廠管理系統(tǒng)畢業(yè)設(shè)計

1、<p>　　第1章 緒論- 2 -</p><p>　　1.1應(yīng)用背景- 2 -</p><p>　　1.2系統(tǒng)開發(fā)的目的與意義- 3 -</p><p>　　1.3系統(tǒng)開發(fā)技術(shù)背景- 4 -</p><p>　　1.3.1 Delphi介紹- 4 -</p><p>　　1.3.2 SQL Se

2、ver2000介紹- 5 -</p><p>　　第2章 系統(tǒng)可行性研究- 7 -</p><p>　　2.1開發(fā)可行性研究- 7 -</p><p>　　2.2經(jīng)濟可行性研究- 7 -</p><p>　　2.3操作可行性研究- 8 -</p><p>　　2.4技術(shù)可行性研究- 8 -</p&g

3、t;<p>　　第3章 系統(tǒng)需求分析- 9 -</p><p>　　3.1用戶工作流程- 9 -</p><p>　　3.2用戶業(yè)務(wù)需求- 9 -</p><p>　　第4章 系統(tǒng)概要設(shè)計- 11 -</p><p>　　4.1設(shè)計思想- 11 -</p><p>　　4.2設(shè)計原則- 1

4、1 -</p><p>　　4.3系統(tǒng)流程分析- 12 -</p><p>　　4.4數(shù)據(jù)字典- 13 -</p><p>　　4.5功能需求- 17 -</p><p>　　4.6性能需求- 17 -</p><p>　　4.7運行需求- 18 -</p><p>　　第5章 系統(tǒng)

5、詳細設(shè)計- 19 -</p><p>　　5.1系統(tǒng)功能結(jié)構(gòu)圖- 19 -</p><p>　　5.2系統(tǒng)功能設(shè)計- 19 -</p><p>　　5.3系統(tǒng)E-R圖- 21 -</p><p>　　5.4數(shù)據(jù)庫表設(shè)計- 21 -</p><p>　　5.5功能模塊設(shè)計- 23 -</p>&

6、lt;p>　　5.5.1系統(tǒng)登錄模塊- 23 -</p><p>　　5.5.2人事管理模塊- 24 -</p><p>　　5.5.3工資管理模塊- 26 -</p><p>　　5.5.4倉庫管理模塊- 27 -</p><p>　　5.5.5客戶管理模塊- 29 -</p><p>　　5.5.6

7、系統(tǒng)管理模塊- 29 -</p><p>　　第6章 系統(tǒng)測試運行- 31 -</p><p>　　6.1測試方案設(shè)計- 31 -</p><p>　　6.2測試過程及結(jié)果- 32 -</p><p>　　6.2.1系統(tǒng)登錄模塊測試- 32 -</p><p>　　6.2.2人事管理模塊測試- 33 -&

8、lt;/p><p>　　6.2.3工資管理模塊測試- 36 -</p><p>　　6.2.4倉庫管理模塊測試- 38 -</p><p>　　6.2.5客戶管理模塊測試- 40 -</p><p>　　6.2.6系統(tǒng)管理模塊測試- 41 -</p><p>　　6.3系統(tǒng)的優(yōu)缺點分析及改進方案- 42 -<

9、;/p><p><b>　　致謝- 44 -</b></p><p>　　參考文獻- 45 -</p><p><b>　　附錄- 46 -</b></p><p><b>　　第1章 緒論</b></p><p><b>　　1.1應(yīng)用背

10、景</b></p><p>　　隨著現(xiàn)代科學(xué)技術(shù)的迅猛發(fā)展，計算機技術(shù)已經(jīng)滲透到各個領(lǐng)域，成為各行業(yè)必不可少的工具，特別是Internet技術(shù)的推廣和信息高速公路的建立，使IT產(chǎn)業(yè)在市場競爭中越發(fā)顯示出其獨特的優(yōu)勢，步入信息化時代，有巨大的數(shù)據(jù)信息等待加工處理和傳輸，這使得對數(shù)據(jù)庫的進一步開發(fā)和利用顯得尤為迫切。在這種信息環(huán)境下，對信息的手工管理已經(jīng)遠遠落后于信息化管理。</p><

11、;p>　　作為國內(nèi)的一些小型服裝加工廠，他們的信息化程度遠遠落后于大中型服裝公司。然而這些小型服裝廠的信息資源也亟待存儲和處理，這些小型的服裝加工廠要跟上時代的發(fā)展要求，適應(yīng)市場的激烈競爭，就需要高效的處理方式和管理方法。因此，加快小型服裝加工廠的信息化進程是必不可少的。</p><p>　　實習(xí)期間，我對服裝廠的業(yè)務(wù)流程進行了仔細的考察，了解了服裝廠管理人員的管理需求。針對這些問題，開發(fā)了這套小型服裝加工

12、廠的管理系統(tǒng)。在開發(fā)過程中，針對當(dāng)前小型服裝廠管理人員的管理特點和技術(shù)人員的實際水平，采用了基于Windows圖形用戶界面這一易學(xué)易用的操作環(huán)境，在系統(tǒng)設(shè)計過程中，盡量采用易懂易讀的人機界面，使用戶可以在短期內(nèi)完全掌握。把系統(tǒng)的正確性放在首位，力求數(shù)據(jù)的完整和處理的正確性。并且在此基礎(chǔ)上優(yōu)化程序代碼，加速系統(tǒng)運行和減少對系統(tǒng)資源的占用。</p><p>　　1.2系統(tǒng)開發(fā)的目的與意義</p><

13、;p>　　在市場競爭日益激烈的今天，信息技術(shù)已成為企業(yè)賴以提升競爭力的重要手段。但據(jù)有關(guān)調(diào)查顯示，目前我國服裝企業(yè)信息化的應(yīng)用普及率非常低，在軟件應(yīng)用上，實現(xiàn)軟件管理的企業(yè)也少之又少。</p><p>　　由于服裝產(chǎn)業(yè)是傳統(tǒng)產(chǎn)業(yè)，我國服裝企業(yè)的生產(chǎn)管理方式一直比較落后，目前，我國大多數(shù)服裝企業(yè)屬民營企業(yè)，企業(yè)的決策者往往集管理者、執(zhí)行者等多種身份于一身，他們多靠經(jīng)驗來管理著自己的企業(yè)。服裝行業(yè)對信息化的重視

14、程度參差不齊，企業(yè)應(yīng)用水平也高低懸殊，信息化在服裝行業(yè)顯得步履艱難。</p><p>　　目前國內(nèi)主要做服裝行業(yè)管理系統(tǒng)的軟件公司主要有百盛軟件、羅斯軟件、道訊軟件、伯駿軟件等，但由于從事服裝行業(yè)管理系統(tǒng)開發(fā)的公司較少，這種管理系統(tǒng)的價位都相對較高。國外的軟件雖好但由于國外服裝行業(yè)與國內(nèi)服裝行業(yè)的不同，一般都不會選擇國外軟件。</p><p>　　開發(fā)的本系統(tǒng)就是針對這些問題所設(shè)計的，開發(fā)

15、費用較小，一般的小型服裝加工廠都能承擔(dān)；使用方便，便于服裝廠管理者的學(xué)習(xí)使用。服裝公司的管理人員可以根據(jù)本系統(tǒng)所反映的信息進行分析，從而做出正確的決策，加快管理效率。</p><p>　　1.3系統(tǒng)開發(fā)技術(shù)背景</p><p>　　開發(fā)本系統(tǒng)所選擇的前臺工具為Delphi 7，數(shù)據(jù)庫為SQL Server2000。</p><p>　　1.3.1 Delphi介紹&

16、lt;/p><p>　　Delphi是由Borland公司推出的可視化編程環(huán)境，它使用了Windows圖形用戶界面的先進技術(shù)，將面向?qū)ο蟮恼Z言功能與方便的可視化開發(fā)環(huán)境的結(jié)合在一起，以其快速的程序開發(fā)，強大的數(shù)據(jù)庫處理功能和完善的面向?qū)ο蟊磉_能力被許多程序員所鐘愛。與Visual C++相比，它更加簡單、易于掌握，但在功能上卻絲毫不遜色；與Visual Basic相比，它功能更強大、更實用。因此，可以說Delphi同

17、時兼?zhèn)淞薞isual C++的功能強大和Visual Basic的簡單易學(xué)。</p><p>　　Delphi最初是作為Pascal產(chǎn)品線的修訂版出現(xiàn)的，由于在測試期間就表現(xiàn)出許多優(yōu)秀的特性，Borland公司決定將其作為單獨的工具進行開發(fā)，最終在1995年3月發(fā)布了第一個版本，即Delphi1.0。由于Borland將子公司CodeGear賣給Embarcadero技術(shù)公司，現(xiàn)在的最高版本名為CodeGear.

18、RAD.Studio.2010版。但編程人員最常使用的仍然是Delphi7。</p><p>　　Delphi的主要特點：</p><p>　　1.直接編譯生成可執(zhí)行代碼，編譯速度快。由于Delphi編譯器采用了條件編譯和選擇鏈接技術(shù)，使用它生成的執(zhí)行文件更加精煉，運行速度更快。</p><p>　　2.支持將存取規(guī)則分別交給客戶機或服務(wù)器處理的兩種方案，而且允許開

19、發(fā)人員建立一個簡單的部件或部件集合，封裝起所有的規(guī)則，并獨立于服務(wù)器和客戶機，所有的數(shù)據(jù)轉(zhuǎn)移通過這些部件來完成。</p><p>　　3.提供了許多快速方便的開發(fā)方法，使開發(fā)人員能用盡可能少的重復(fù)性工作完成各種不同的應(yīng)用。</p><p>　　4.具有可重用性和可擴展性。</p><p>　　5.具有強大的數(shù)據(jù)存取功能。</p><p>　　

20、6.擁有強大的網(wǎng)絡(luò)開發(fā)能力。</p><p>　　7.Delphi使用獨特的VCL類庫，使得編寫出的程序顯得條理清晰，VCL是現(xiàn)在最優(yōu)秀的類庫。</p><p>　　1.3.2 SQL Sever2000介紹</p><p>　　SQL Server 是一個關(guān)系數(shù)據(jù)庫管理系統(tǒng)。它最初是由Microsoft Sybase 和Ashton-Tate三家公司共同開發(fā)的，于

21、1988 年推出了第一個OS/2 版本。</p><p>　　SQL Server 2000 是Microsoft 公司推出的SQL Server 數(shù)據(jù)庫管理系統(tǒng)，該版本繼承了SQL Server 7.0 版本的優(yōu)點，同時又比它增加了許多更先進的功能。具有使用方便可伸縮性好與相關(guān)軟件集成程度高等優(yōu)點，可跨越從運行Microsoft Windows 98 的膝上型電腦到運行Microsoft Windows 200

22、0 的大型多處理器的服務(wù)器等多種平臺使用。</p><p>　　SQL Server是當(dāng)前非常流行的數(shù)據(jù)庫管理系統(tǒng)之一，擁有廣泛的用戶群體。</p><p>　　第2章 系統(tǒng)可行性研究</p><p>　　2.1開發(fā)可行性研究</p><p>　　在IT行業(yè)中從業(yè)的工作人員一般都要求掌握計算機技術(shù)，具有一定的軟硬件基礎(chǔ)，會使用各種管理軟件，

23、熟悉IT產(chǎn)品。對于服裝廠的普通工作人員，他們對電腦了解很少，只有辦公室人員可能對電腦比較了解。但是本系統(tǒng)針對這些問題設(shè)計的使用方法簡單，對計算機基礎(chǔ)的要求不高。因此，只要在系統(tǒng)投入使用時對員工進行少量的培訓(xùn)，使員工掌握系統(tǒng)的功能和使用方法，那么系統(tǒng)就能夠順利運行。</p><p>　　2.2經(jīng)濟可行性研究</p><p>　　因為通過網(wǎng)絡(luò)傳遞信息可以不受距離的限制，因此可以節(jié)約許多的人力和

24、物力，方便管理，也可以減少不必要的開支，同時該系統(tǒng)可以提高小型服裝廠的管理效率，對整個服裝廠經(jīng)濟效益的提高也會右?guī)椭?，所以從?jīng)濟上來說完全是可行的。</p><p>　　1.小型服裝廠可以承擔(dān)系統(tǒng)的開發(fā)費用。</p><p>　　針對小型服裝廠以加工為主、利潤較薄、員工較少的特點，我們開發(fā)的這套管理系統(tǒng)使用簡便，開發(fā)費用也相對較少。因此，對于大多數(shù)小型服裝加工廠都完全有能力承擔(dān)這些開發(fā)費用

25、。</p><p>　　2.系統(tǒng)可以為企業(yè)增加經(jīng)濟效益。</p><p>　　管理系統(tǒng)是一個信息化、智能化和先進管理理念的集合體。而管理是一個動態(tài)過程，在其運行過程中要采取多項措施。所以在管理中獲得的經(jīng)濟效益是一個綜合效益，要對它進行直接定量的分析是比較困難的。一般來說新系統(tǒng)帶來的經(jīng)濟效益是簡單的，其最主要的表現(xiàn)就是減少了企業(yè)管理的費用和人力開支。一些繁瑣的事情都可以通過新系統(tǒng)來加以分析解

26、決，不僅節(jié)省了大量的時間，還為企業(yè)的各項決策提供了寶貴的資料，為企業(yè)帶來巨大的經(jīng)濟效益。</p><p>　　2.3操作可行性研究</p><p>　　本系統(tǒng)采用的是基于Windows的圖形用戶界面，該系統(tǒng)是大家非常熟悉的操作系統(tǒng)，對于那些有一點的計算機知識的人員來說，可以非常輕松的上手。而整個服裝廠管理系統(tǒng)采用的都是友好的交互界面，簡潔明了，不需要造作人員對數(shù)據(jù)庫進行深入的了解。由此可知

27、該系統(tǒng)的操作是可行的，有必要開發(fā)該系統(tǒng)。</p><p>　　2.4技術(shù)可行性研究</p><p>　　開發(fā)該系統(tǒng)所使用的技術(shù)是Delphi和SQL Server 2000系統(tǒng)，這兩大技術(shù)已發(fā)展成熟，沒有技術(shù)上的難點。</p><p>　　綜合以上四個方面的可行性研究，該系統(tǒng)具有很高的開發(fā)可行性，無論是從技術(shù)上或者經(jīng)濟上還是操作上。因此，可以設(shè)計該服裝廠管理系統(tǒng)的數(shù)

28、據(jù)流程圖，建立數(shù)據(jù)字典。</p><p>　　第3章 系統(tǒng)需求分析</p><p><b>　　3.1用戶工作流程</b></p><p>　　用戶要對公司內(nèi)的人事信息、工資信息、客戶信息、倉庫信息進行管理，對各種信息進行添加和維護。用戶在添加時要檢測數(shù)據(jù)的完整性，對各種信息的維護也要做好登記，如倉庫的出入庫信息。用戶對各種信息的情況進行查詢

29、和打印。</p><p><b>　　3.2用戶業(yè)務(wù)需求</b></p><p>　　1.人事管理。能夠?qū)镜膯T工進行分類管理，新員工的添加和員工的刪除、修改等功能。</p><p>　　2.工資管理。實現(xiàn)工資的查詢和打印。</p><p>　　3.倉庫管理。能夠?qū)}庫物品進行管理，實現(xiàn)物品的添加、刪除和修改，并對物品

30、的出入庫信息做好登記。</p><p>　　4.客戶管理。實現(xiàn)新客戶的添加和客戶信息的刪除、修改。</p><p>　　5.系統(tǒng)管理。主要分為用戶賬號管理和系統(tǒng)自身管理。用戶賬號管理實現(xiàn)用戶的添加、刪除和修改；系統(tǒng)自身管理實現(xiàn)系統(tǒng)備份和系統(tǒng)退出。</p><p>　　整個小型服裝廠管理系統(tǒng)的功能結(jié)構(gòu)圖如：</p><p>　　圖3-1 系統(tǒng)功

31、能結(jié)構(gòu)圖</p><p>　　第4章 系統(tǒng)概要設(shè)計</p><p><b>　　4.1設(shè)計思想</b></p><p>　　1.系統(tǒng)分成幾個相對獨立的模塊，但對這些模塊都藥進行集中式管理。</p><p>　　2.分層的模塊化程序設(shè)計思想，整個系統(tǒng)采用模塊化結(jié)構(gòu)設(shè)計。作為應(yīng)用程序有較強的可操作性和擴展性。</p&

32、gt;<p>　　3.合理的數(shù)據(jù)流設(shè)計，在應(yīng)用系統(tǒng)設(shè)計中，相對獨立的模塊間以數(shù)據(jù)流相互連接，使各模塊間的耦合性較低，方便系統(tǒng)運行，提高系統(tǒng)安全性。</p><p><b>　　4.2設(shè)計原則</b></p><p>　　為了使本系統(tǒng)功能齊全完備，操作簡便，最大限度的提高軟件的質(zhì)量，從而滿足用戶的實際需要，在設(shè)計開發(fā)過程中遵循了如下原則：</p>

33、;<p>　　(1)合法性原則：依據(jù)大多數(shù)小型服裝廠的工作規(guī)定以及要求，參照實際的工作情況，進行諸如倉庫的管理、人員分工等工作。</p><p>　　(2)實用性原則：適合工廠管理工作的實際需求，并能夠處理一些特殊情況的要求，此外，盡可能預(yù)留空間，以便擴充功能。</p><p>　　(3)準確性原則：對輸入的相關(guān)資料建立檢錯機制，及時報錯，使用戶能夠及時準確的輸入合法資料(如

34、：字符數(shù)字限制等)。</p><p>　　(3)易操作原則：要求設(shè)計的系統(tǒng)功能齊全，界面友好，操作方便，必要的地方進行提示。</p><p>　　(5)源程序可讀性原則：為了便于其他設(shè)計，維護人員讀懂代碼或以后的代碼修改，軟件升級維護，即可能做好代碼注釋工作。</p><p>　　(6)優(yōu)化原則：為了達到優(yōu)化的目的，合理的運用窗口，菜單，對象等的繼承，為每個窗口創(chuàng)建

35、類，便于調(diào)用，把前臺與數(shù)據(jù)庫的連接做成單獨的類，便于維護，也節(jié)省了每個窗口都連接的復(fù)雜程度，使程序簡潔明了，也方便了將來的維護。</p><p>　　(7)安全性原則：可以為該系統(tǒng)的用戶設(shè)置用戶權(quán)限。</p><p><b>　　4.3系統(tǒng)流程分析</b></p><p>　　系統(tǒng)流程就是用戶進入本服裝廠管理系統(tǒng)后的工作過程。由于系統(tǒng)對不同的賬

36、號設(shè)置了不同的權(quán)限（本系統(tǒng)的權(quán)限共分三種：系統(tǒng)管理員、操作員、普通員工），因此，每種用戶進入系統(tǒng)后的操作流程都不太一樣。</p><p>　　流程可分為兩大部分：用戶登錄和業(yè)務(wù)操作。用戶登陸部分主要是通過用戶的用戶名和密碼進行身份驗證，驗證合格的依據(jù)權(quán)限進入系統(tǒng)，然后依據(jù)權(quán)限進行各項操作，驗證未通過的給出錯誤信息。</p><p>　　整個系統(tǒng)的流程圖如下：</p><

37、p>　　圖4-1 系統(tǒng)流程圖</p><p><b>　　4.4數(shù)據(jù)字典</b></p><p><b>　　文件條目</b></p><p>　　1.文件名：員工清單</p><p>　　組成{員工編號+員工姓名+性別+部門編號+出生日期+聯(lián)系電話+住址+個人照片+備注}</p>

38、<p>　　組織：按員工編號遞增</p><p>　　2.文件名：部門清單</p><p>　　組成{部門編號+部門名稱+部門描述}</p><p>　　組織：按部門編號遞增</p><p>　　3.文件名：獎懲信息清單</p><p>　　組成{員工編號+員工姓名+獎懲月份+獎懲日+獎懲類別+獎懲內(nèi)容+

39、獎懲金額+備注}</p><p>　　組織：按員工編號遞增</p><p>　　4.文件名：工種清單</p><p>　　組成{部門編號+工種名稱+價格+單位+基本工資}</p><p>　　組織：按部門編號遞增</p><p>　　5.文件名：工作績效表</p><p>　　組成{員工編號+部

40、門編號+工種名稱+工作件數(shù)+工資年份}</p><p>　　組織：按員工編號遞增</p><p>　　6.文件名：供應(yīng)商清單</p><p>　　組成{供應(yīng)商代碼+供應(yīng)商名稱+供應(yīng)商地址+聯(lián)系人+聯(lián)系電話+備注}</p><p>　　組織：按供應(yīng)商代碼遞增</p><p>　　7.文件名：物品信息清單</p>

41、;<p>　　組成{物品代碼+物品名稱+物品規(guī)格+計量單位+單位價格+供應(yīng)商代碼}</p><p>　　組織：按物品代碼遞增</p><p>　　8.文件名：庫存清單</p><p>　　組成：{物品編碼+物品數(shù)量+物品單位}</p><p>　　組織：按物品編碼遞增</p><p>　　9.文件名：物品

42、出入庫清單</p><p>　　組成{出入庫編號+物品編碼+物品數(shù)量+單位+出入日期+操作員}</p><p>　　組織：按出入庫編號遞增</p><p>　　10.文件名：客戶信息清單</p><p>　　組成{客戶編碼+客戶全稱+客戶簡稱+地址+電話+聯(lián)系人+聯(lián)系人電話+開戶銀行+銀行賬號+郵箱+郵政編碼+備注}</p>&

43、lt;p>　　組織：按客戶編碼遞增</p><p>　　11.文件名：用戶賬號清單</p><p>　　組成{用戶名+密碼+權(quán)限級別}</p><p><b>　　組織：按用戶名遞增</b></p><p><b>　　加工說明</b></p><p>　　1.加工名：

44、（1）員工、供應(yīng)商、客戶信息查詢</p><p>　　加工邏輯：根據(jù)輸入要查詢的員工信息、供貨商或客戶信息，檢索出相應(yīng)的結(jié)果。</p><p>　　輸入流：員工信息查詢，供應(yīng)商信息查詢，客戶信息查詢，發(fā)出員工、供應(yīng)商、客戶清單查詢請求。</p><p>　　輸出流：員工信息清單、供應(yīng)商信息清單、客戶信息清單。</p><p>　　2.加工名：

45、（1）員工、供應(yīng)商、客戶信息更新</p><p>　　加工邏輯：根據(jù)輸入的員工、供應(yīng)商、客戶信息更新對應(yīng)的員工、供應(yīng)商、客戶清單。</p><p>　　3.輸入流：新員工、新供應(yīng)商、新客戶或原有信息的修改。</p><p>　　輸出流：員工信息清單、供應(yīng)商信息清單、客戶信息清單。</p><p>　　加工名：（2）員工工資信息查詢</p

46、><p>　　加工邏輯：根據(jù)要查看的工資要求檢索出符合要求的工資信息。</p><p>　　輸入流：員工工資信息查詢，發(fā)出查詢請求。</p><p>　　輸出流：員工工資信息清單。</p><p>　　4.加工名：（2）員工工資更新</p><p>　　加工邏輯：根據(jù)每月員工的績效情況對工資信息進行更新。</p>

47、;<p>　　輸入流：每月員工的工資績效的輸入和獎懲信息的輸入。</p><p>　　輸出流：工資信息清單。</p><p>　　5.加工名：（3）庫存信息查詢</p><p>　　加工邏輯：選擇要查看庫存信息的條件，檢索出符合條件的庫存信息。</p><p>　　輸入流：庫存信息查詢，發(fā)出查詢請求。</p>&l

48、t;p>　　輸出流：庫存信息清單。</p><p>　　6.加工名：（3）庫存信息更新</p><p>　　加工邏輯：工廠內(nèi)部每天都有大量的原材料和產(chǎn)成品的出入庫操作，根據(jù)這些出入庫信息對庫存信息進行更新。</p><p>　　輸入流：出入庫請求，出入庫登記清單。</p><p>　　輸出流：庫存信息清單。</p><

49、;p>　　7.加工名：（4）用戶信息更新</p><p>　　加工邏輯：管理員根據(jù)變動對用戶的信息進行更新操作。</p><p>　　輸入流：新用戶的添加，原用戶的修改維護。</p><p>　　輸出流：用戶信息清單。</p><p><b>　　4.5功能需求</b></p><p>　　

50、本系統(tǒng)采用自定向下方法開發(fā)，其功能模塊主要有如下幾個部分：人事信息管理模塊、工資管理模塊、倉庫管理模塊、客戶管理模塊和系統(tǒng)模塊。具體的功能描述如下：</p><p>　　人事管理，功能是對員工信息進行查詢、添加、修改和刪除。</p><p>　　工資管理，功能是實現(xiàn)對獎懲信息的查詢、添加、修改和刪除，以及工資的查詢。</p><p>　　倉庫管理，功能是實現(xiàn)對庫存信

51、息的查詢、添加、修改和刪除。</p><p>　　客戶管理，功能是實現(xiàn)對客戶信息的查詢、添加、修改和刪除。</p><p>　　系統(tǒng)管理，功能是實現(xiàn)對用戶賬號信息的查詢、添加、修改和刪除，以及對系統(tǒng)數(shù)據(jù)的備份。</p><p><b>　　4.6性能需求</b></p><p><b>　　(1)數(shù)據(jù)精確度&l

52、t;/b></p><p>　　工廠的人員工資，物品單價、總額全部采用浮點數(shù)。</p><p><b>　　(2)時間特性</b></p><p>　　該管理系統(tǒng)軟件從啟動到進入系統(tǒng)登錄界面的時間正常情況下應(yīng)少于5秒，錄入并更新數(shù)據(jù)的時間正常情況下少于2秒。</p><p><b>　　(3)適用性<

53、;/b></p><p>　　該管理系統(tǒng)軟件適用于Windows 2000/xp及以上操作系統(tǒng)。</p><p><b>　　4.7運行需求</b></p><p><b>　　(1)用戶界面</b></p><p>　　本系統(tǒng)采用Delphi7設(shè)計，用戶交互界面采用的是基于Windows的窗

54、口界面。</p><p><b>　　(2)硬件接口</b></p><p>　　運行本系統(tǒng)的硬件基本要求如下：</p><p>　　CPU：Intel P3及以上；</p><p>　　內(nèi)存：256MB及以上；</p><p>　　硬盤：10GB及以上。</p><p>

55、<b>　　(3)軟件接口</b></p><p>　　數(shù)據(jù)庫服務(wù)器：Microsoft SQL Server 2000。</p><p>　　第5章 系統(tǒng)詳細設(shè)計</p><p>　　5.1系統(tǒng)功能結(jié)構(gòu)圖</p><p>　　圖5-1 系統(tǒng)功能結(jié)構(gòu)圖</p><p><b>　　5.

56、2系統(tǒng)功能設(shè)計</b></p><p>　　本系統(tǒng)共包括五大模塊，分別是人事管理模塊、工資管理模塊、倉庫管理模塊、客戶管理模塊、系統(tǒng)管理模塊。每個模塊的具體功能如下：</p><p>　　1.人事管理模塊功能：</p><p><b>　　員工信息的查詢:</b></p><p><b>　　員工信

57、息的添加：</b></p><p>　　員工信息的維護,包括修改和刪除。</p><p>　　2.工資管理模塊功能：</p><p>　　部門工作種類基本工資信息查詢；</p><p>　　部門工作種類信息的添加；</p><p>　　部門工作種類信息的維護，包括修改和刪除；</p><

58、p>　　員工工作績效的查詢；</p><p>　　員工工作績效的添加；</p><p>　　員工工作績效的維護，包括修改和刪除；</p><p><b>　　工資信息的查詢。</b></p><p>　　3.倉庫管理模塊功能：</p><p><b>　　倉庫物品信息查詢；<

59、/b></p><p><b>　　物品信息添加；</b></p><p><b>　　物品信息維護；</b></p><p><b>　　出入庫信息添加；</b></p><p><b>　　出入庫信息維護；</b></p><

60、p><b>　　出入庫信息查詢。</b></p><p>　　4.客戶管理模塊功能：</p><p><b>　　客戶信息查詢；</b></p><p><b>　　客戶信息添加；</b></p><p><b>　　客戶信息維護。</b></

61、p><p>　　5.系統(tǒng)管理模塊功能：</p><p><b>　　用戶帳號信息查詢；</b></p><p><b>　　用戶信息添加；</b></p><p>　　用戶信息維護，包括密碼的修改和用戶刪除；</p><p><b>　　系統(tǒng)備份。</b>&

62、lt;/p><p><b>　　5.3系統(tǒng)E-R圖</b></p><p>　　圖5-2 系統(tǒng)E-R圖</p><p><b>　　5.4數(shù)據(jù)庫表設(shè)計</b></p><p>　　由數(shù)據(jù)模型利用SQL Server 2000進行數(shù)據(jù)庫的詳細設(shè)計，其基本表的設(shè)計如下：</p><p&g

63、t;　　表5-1 員工基本信息表</p><p>　　表5-2 部門信息表</p><p>　　表5-3 工種價格表</p><p><b>　　表5-4 供應(yīng)商表</b></p><p>　　表5-5 物品信息表</p><p>　　表5-6 物品庫存表</p><p>

64、　　表5-7 物品出入庫表</p><p>　　表5-8 客戶基礎(chǔ)信息表</p><p>　　圖5-9 工作績效表</p><p>　　圖5-10 用戶賬號表</p><p>　　圖5-11 獎懲記錄表表</p><p><b>　　5.5功能模塊設(shè)計</b></p><p&g

65、t;　　5.5.1系統(tǒng)登錄模塊</p><p>　　功能：本模塊的主要功能是對用戶身份進行，驗證只有系統(tǒng)的合法用戶才能進入系統(tǒng),若輸入錯誤信息，系統(tǒng)會自動提示錯誤。</p><p><b>　　圖5-3 登陸窗口</b></p><p>　　在進行系統(tǒng)登錄過程中，登錄模塊將調(diào)用數(shù)據(jù)庫里的用戶清單，并對賬號和密碼進行驗證，只有輸入了正確的賬號和密

66、碼后，系統(tǒng)登錄才會成功。在登錄模塊中，對系統(tǒng)的嘗試登錄次數(shù)進行了限制，禁止用戶無終止的進行系統(tǒng)登錄嘗試，在本系統(tǒng)中，當(dāng)用戶對系統(tǒng)的三次登錄失敗后，系統(tǒng)將提示無權(quán)登陸的信息，自動退出。實現(xiàn)代碼見附錄1。</p><p>　　5.5.2人事管理模塊</p><p>　　功能：該模塊主要包含兩部分，部門信息和員工信息。部門信息主要實現(xiàn)對部門信息的查詢、維護、添加操作；員工信息主要實現(xiàn)員工的條件查

67、詢、添加和維護操作。</p><p>　　該人事管理模塊的用例圖：</p><p>　　圖5-4 人事管理模塊用例圖</p><p>　　人事管理模塊活動圖：</p><p>　　圖5-5 人事管理模塊活動圖</p><p>　　1.對部門信息的操作大致為點擊選擇部門信息，進入部門信息顯示窗口，該窗口利用DBGrid控

68、件顯示所有的部門信息。單擊添加按鈕進入添加窗口；單擊DBGrid中要維護的信息，再單擊維護按鈕就進入了修改刪除窗口，然后進行相應(yīng)的修改刪除工作，實現(xiàn)DBGrid中信息到維護窗口中的代碼見附錄2 。</p><p>　　2.對員工信息的操作大致為點擊選擇菜單員工信息進入員工信息窗口，顯示所有的員工信息，可以選擇不同的查詢條件進行查詢。單擊添加按鈕進入添加員工信息的窗口，由于員工的基本信息中存儲有照片，故保存方法較為

69、復(fù)雜，具體代碼見附錄3。和部門信息相同，單擊DBGrid中要維護的信息，再單擊維護按鈕即可進入維護窗口，修改后實現(xiàn)保存的代碼見附錄4。</p><p>　　5.5.3工資管理模塊</p><p>　　功能：本部分包含四部分：工種信息的管理：包括不同不同部門的工作種類以及基本工資；員工獎懲記錄的查詢、維護和添加；員工績效的查詢、添加和維護；員工工資的計算和查詢以及打印。</p>

70、<p><b>　　用例圖：</b></p><p>　　圖5-6 工資管理模塊用例圖</p><p>　　工資管理模塊活動圖：</p><p>　　圖5-7 工資管理模塊活動圖</p><p>　　對工種信息和獎懲信息的操作，與員工信息相仿，點擊進入工種信息窗口進行添加、維護等操作，但在獎懲信息的操作界面中

71、需要輸入日期的文本框只允許輸入數(shù)字，具體實現(xiàn)代碼見附錄5。</p><p>　　對工資信息主要實現(xiàn)查詢和打印的功能。</p><p>　　5.5.4倉庫管理模塊</p><p>　　功能：實現(xiàn)供應(yīng)商信息的查詢、錄入、維護等操作，庫存信息的查詢、錄入、維護等操作，并在物品出入庫時，登記物品出入庫信息表。物品信息主要包括供應(yīng)商、物品規(guī)格、價格等信息。</p>

72、<p><b>　　用例圖：</b></p><p>　　圖5-8 倉庫管理模塊用例圖</p><p>　　倉庫管理模塊活動圖：</p><p>　　圖5-9 倉庫管理模塊活動圖</p><p>　　5.5.5客戶管理模塊</p><p>　　功能：對公司的客戶進行統(tǒng)一管理，在模塊中

73、實現(xiàn)對新客戶的錄入和對老客戶的維護。</p><p><b>　　用例圖：</b></p><p>　　圖5-10 客戶管理模塊用例圖</p><p>　　5.5.6系統(tǒng)管理模塊</p><p>　　功能：該模塊也包含兩部分，第一就是對用戶賬號的管理，給登陸本系統(tǒng)的人員分配權(quán)限，管理用戶名和密碼；第二是對系統(tǒng)本身的管理，

74、系統(tǒng)的退出和備份。</p><p><b>　　用例圖：</b></p><p>　　圖5-11 系統(tǒng)管理模塊用例圖</p><p>　　系統(tǒng)管理模塊活動圖：</p><p>　　圖5-12 系統(tǒng)管理模塊活動圖</p><p>　　第6章 系統(tǒng)測試運行</p><p>&

75、lt;b>　　6.1測試方案設(shè)計</b></p><p>　　完成對流程的編碼后最重要的事情就是對系統(tǒng)的測試工作了，測試在系統(tǒng)設(shè)計階段有兩個時期，通常在編寫每個模塊后做單元測試，另一個時期是對系統(tǒng)的綜合測試。</p><p>　　在模塊測試時我們主要從以下幾個方面考慮：</p><p><b>　　1. 模塊接口；</b>&l

76、t;/p><p>　　2. 局部數(shù)據(jù)結(jié)構(gòu)；</p><p>　　3. 重要執(zhí)行通道；</p><p>　　4. 出錯處理通道；</p><p>　　5. 影響上述方面的邊界條件。</p><p>　　測試時進行代碼審查，從數(shù)據(jù)類型，變量聲明，數(shù)據(jù)結(jié)構(gòu)進行審查，然后進行功能測試，從輸入一些簡單的數(shù)據(jù)開始執(zhí)行一遍，觀測運行期間

77、變量的變化，運行中值的變化范圍。改變測試方案來變換另一個角度進行測試，發(fā)現(xiàn)錯誤并記錄，修改代碼，測試條件使程序通過多層分支，判別運行結(jié)果從而完成模塊測試。</p><p>　　總體測試是組裝軟件的系統(tǒng)技術(shù)，本系統(tǒng)測試采用漸增集成測試，即測試單一模塊，將測試完的模塊加入系統(tǒng)中，進行一次系統(tǒng)測試，依次類推將所有模塊加入系統(tǒng)中，在具體測試時，采用自頂向下的結(jié)合方式，從主控模塊開始，沿各控制層向下移動，逐漸把所有模塊結(jié)合

78、了。</p><p>　　6.2測試過程及結(jié)果</p><p>　　6.2.1系統(tǒng)登錄模塊測試</p><p>　　系統(tǒng)登錄模塊的主要功能就是要求登錄人員輸入登錄口令，若口令不正確則提示錯誤信息，要求重新輸入，若輸入超過三次，系統(tǒng)自動關(guān)閉。下面為各種情況的測試結(jié)果。</p><p>　　圖6-1 密碼輸入錯誤測試結(jié)果</p>&

79、lt;p>　　圖6-2 錯誤次數(shù)超過三次的測試結(jié)果</p><p>　　圖6-3 用戶名和密碼正確登錄的主界面（管理員）</p><p>　　6.2.2人事管理模塊測試</p><p>　　該模塊主要包含兩部分，部門信息和員工信息，對兩種信息進行的操作都包含查詢、添加、刪除和修改。此模塊的測試就已員工信息為例，進行各種操作的測試，測試結(jié)果具體如下：</p

80、><p>　　圖6-4 員工基本信息窗口</p><p>　　圖6-5 以員工性別為女條件的查詢結(jié)果</p><p>　　圖6-6 添加新員工測試結(jié)果</p><p>　　圖6-7 刪除員工測試結(jié)果</p><p>　　部門信息的操作與員工信息的操作大體相同，經(jīng)過測試所有功能均能正常實現(xiàn)，在此就不再贅述。</p>

81、;<p>　　6.2.3工資管理模塊測試</p><p>　　工資管理模塊主要包括不同部門的工作種類信息，員工的獎懲信息，績效信息以及員工的工資信息。對工作種類的信息、獎懲信息以及績效信息實現(xiàn)的功能有查詢、添加、刪除和修改，經(jīng)過測試均能實現(xiàn)。對于同一員工可以對應(yīng)多條獎懲信息，而這些獎懲信息都需要在工資中進行體現(xiàn)，在工資查詢中我對員工的獎懲信息進行了合并，合并結(jié)果為正則為獎金，結(jié)果為負則為罰金。工資信

82、息由系統(tǒng)進行自動核算，對工資只能進行查詢操作，不能增刪改。測試結(jié)果如下圖：</p><p>　　圖6-8 員工獎懲信息窗口</p><p>　　圖6-9 員工工資查詢窗口</p><p>　　圖6-10 查看員工工資詳細信息</p><p>　　在系統(tǒng)中，也實現(xiàn)了對數(shù)據(jù)的限制，比如在員工的績效信息的添加窗口中，工作件數(shù)和績效年月一欄中的限制為

83、只能輸入數(shù)字不能輸入其他字符。如若輸入其他字符文本框不接受也不顯示，現(xiàn)測試如下：</p><p>　　圖6-11 字符限制測試結(jié)果</p><p>　　6.2.4倉庫管理模塊測試</p><p>　　倉庫管理模塊主要包含供應(yīng)商信息、倉庫物品信息管理和出入庫登記的操作。對供應(yīng)商和倉庫物品的管理也都包含查詢、添加、修改和刪除操作，經(jīng)測試所有功能均能實現(xiàn)，在此也不多述。對

84、出入庫的登記操作也會對庫存信息產(chǎn)生影響，下面就進行出庫測試，具體測試結(jié)果如下圖：</p><p>　　圖6-12 出庫操作前的庫存信息</p><p>　　圖6-13 出入庫操作數(shù)據(jù)</p><p>　　圖6-14 出庫操作成功后的庫存信息</p><p>　　6.2.5客戶管理模塊測試</p><p>　　客戶管理模

85、塊主要就是對客戶信息的查詢、添加、修改和刪除操作，經(jīng)過各項測試，各模塊的功能都能正常實現(xiàn)，具體的操作過程和對員工信息的操作大致相同，在此就不再贅述?？蛻粜畔⒋翱谌缦拢?lt;/p><p>　　圖6-15 客戶信息窗口</p><p>　　6.2.6系統(tǒng)管理模塊測試</p><p>　　系統(tǒng)管理模塊主要實現(xiàn)的就是對用戶信息的各項操作，并對個登陸用戶進行權(quán)限的分配，還有對系

86、統(tǒng)本身的備份工作?，F(xiàn)測試如下：</p><p>　　圖6-16 用戶密碼修改測試結(jié)果</p><p>　　圖6-17 用戶信息及權(quán)限</p><p>　　圖6-18 系統(tǒng)備份窗口</p><p>　　6.3系統(tǒng)的優(yōu)缺點分析及改進方案</p><p>　　在有限的時間里經(jīng)過努力，小型服裝管理系統(tǒng)初具規(guī)模，本系統(tǒng)在需求分析

87、時所需要的功能都已完成。在系統(tǒng)與后臺數(shù)據(jù)庫連接時使用了ADO的方法，將ADO的連接單獨寫成一個類，這樣整個系統(tǒng)的連接都可以通過此類來完成，只需在需要時調(diào)用即可，而不必在每次需要時都用ADO控件連接。在系統(tǒng)中對信息進行添加、刪除、修改操作時，都可以通過頁面切換完成，不需要每次都點擊主頁面，這樣就提高了工作效率。界面比較實用，系統(tǒng)穩(wěn)定性好，在不同的計算機上都可以很平穩(wěn)的運行。系統(tǒng)的查詢功能完備，可以滿足用戶的各種查詢要求。查詢信息準確無誤，

88、完整詳細、迅速方便。</p><p>　　但由于系統(tǒng)完成的比較倉促，系統(tǒng)中也存在著一些不足和缺憾，比如界面的設(shè)計，并沒有達到統(tǒng)一且美觀的效果，窗口較多；系統(tǒng)的功能也較少，并不能滿足一個服裝廠的全部使用要求?？赡芟到y(tǒng)中還存在著一些未知的錯誤，實際使用的過程中會被發(fā)現(xiàn)，在運行過程中針對出現(xiàn)的錯誤不斷對系統(tǒng)進行完善。</p><p>　　本系統(tǒng)在現(xiàn)有基礎(chǔ)上，對于后端數(shù)據(jù)庫系統(tǒng)的設(shè)計有待在又節(jié)約數(shù)

89、據(jù)庫資源和又便于客戶端查詢更方便的基礎(chǔ)上進一步完善和協(xié)調(diào)。隨著計算機技術(shù)的不斷發(fā)展和更新以及人力物力的投入，本系統(tǒng)的功能將會得到更加完善的改進。希望在以后能夠?qū)Χ鄠€服裝廠做更深一步的調(diào)研，在原由系統(tǒng)的基礎(chǔ)上不斷添加新功能。</p><p><b>　　※ ※ ※ ※ ※</b></p><p><b>　　致謝</b></p>&l

90、t;p>　　經(jīng)過艱苦努力，我終于完成了整個系統(tǒng)的全部設(shè)計過程，并使該系統(tǒng)達到可實際應(yīng)用的階段。</p><p>　　軟件設(shè)計是一個精細漫長的過程。在整個過程中，都需要周密的計劃和安排，每一步驟，都需要按照軟件工程標準來完成。在設(shè)計中，我始終堅持理論指導(dǎo)實踐原則，并通過實踐來加強理論的學(xué)習(xí)，通過實習(xí)鍛煉，我熟悉了軟件的一般過程，加強了對實際問題的處理能力。實踐證明，在高科技突飛猛進的時代，光靠課堂所學(xué)的知識是

91、遠遠不夠的，必須依靠實踐去不斷的深化認識，尤其是計算機科學(xué)，操作性和實踐性很強，只有加強實際的動手能力，才能更好的掌握這一現(xiàn)代化工具。</p><p>　　這次設(shè)計過程，無論是從技術(shù)上還是對環(huán)境的適應(yīng)能力上講，對我今后步入社會都打下了一個良好的基礎(chǔ)。在畢業(yè)設(shè)計過程中，遇到了一些困難，主要表現(xiàn)了技術(shù)和經(jīng)驗的欠缺，但通過老師的幫助和自己的努力努力，終于一一克服了。</p><p>　　在整個畢

92、業(yè)設(shè)計期間，得到了劉老師以及同學(xué)的大力支持和幫助，在此表示衷心的感謝！</p><p><b>　　參考文獻</b></p><p>　　[1] 啟明工作室.Delphi+SQL Server數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)與實例[M].北京：人民郵電出版社，2005</p><p>　　[2] 明日科技、宋坤、鄒天思.Delphi數(shù)據(jù)庫系統(tǒng)開發(fā)完全手冊[M

93、].北京：人民郵電出版社，2006；</p><p>　　[3] 求是科技.Delphi信息管理系統(tǒng)開發(fā)實例導(dǎo)航[M].北京：人民郵電出版社，2005</p><p>　　[4] 求是科技、周新會、周金根.Delphi數(shù)據(jù)庫通用模塊及典型系統(tǒng)開發(fā)實例導(dǎo)航[M].北京：人民郵電出版社，2006</p><p>　　[5] 王珊、薩師煊.數(shù)據(jù)庫系統(tǒng)概論（第四版）[M].

94、北京：高等教育出版社，2006</p><p>　　[6] 鄭阿奇.SQL Server實用教程（第二版）[M].北京：電子工業(yè)出版社，2008</p><p>　　[7] 沈才梁. Delphi 7.0程序設(shè)計教程（修訂本）[M].北京：清華大學(xué)出版社，2007</p><p><b>　　附錄</b></p><p>

95、;　　1．登陸界面確定按鈕的代碼</p><p>　　with datam1.adoq1 do//以用戶名和密碼為條件從用戶帳號表中查詢數(shù)據(jù)，</p><p>　　//有返回值則輸入正確，否則輸入錯誤。</p><p><b>　　begin</b></p><p><b>　　close;</b>

96、</p><p>　　sql.Clear;</p><p>　　sql.Add('select * from Yhzhb where(yhm=:a)and(mm=:b)');</p><p>　　parameters.ParamByName('a').Value:=trim(user_ed.Text);</p><

97、p>　　parameters.ParamByName('b').Value:=trim(pwd_ed.Text);</p><p><b>　　open;</b></p><p><b>　　end;</b></p><p>　　if datam1.adoq1.RecordCount>0 the

98、n</p><p><b>　　begin</b></p><p>　　czymc:=datam1.adoq1.fieldbyname('yhm').AsString;</p><p>　　mainfrm.StatusBar1.Panels[3].Text:=czymc;</p><p>　　mainfr

99、m.ljb.Caption:=datam1.adoq1.fieldbyname('jb').AsString;</p><p>　　crkdj.lczy.Caption:=czymc;</p><p>　　user_ed.Clear;</p><p>　　pwd_ed.Clear;</p><p>　　mainfrm.Show

100、;</p><p>　　loginfrm.hide;</p><p><b>　　end</b></p><p><b>　　else</b></p><p><b>　　begin</b></p><p>　　if i<3 then</p&

101、gt;<p><b>　　begin</b></p><p>　　application.MessageBox('用戶名或密碼不正確，請重新輸入！','提示',0+64);</p><p>　　user_ed.Clear;</p><p>　　pwd_ed.Clear;</p><

102、;p>　　user_ed.SetFocus;</p><p><b>　　inc(i);</b></p><p><b>　　end</b></p><p><b>　　else</b></p><p><b>　　begin</b></p&g

103、t;<p>　　application.MessageBox('對不起，您無權(quán)使用本系統(tǒng)！','提示',0+64);</p><p>　　application.Terminate;</p><p><b>　　end;</b></p><p><b>　　end;</b>&l

104、t;/p><p>　　2．Dbgrid中信息到文本框的轉(zhuǎn)換，以部門信息維護為例</p><p>　　procedure Tbmxxfrm.DBGrid1CellClick(Column: TColumn);</p><p><b>　　begin</b></p><p>　　bmxxxg.ebmbh.Text:=DBGrid

105、1.Fields[0].AsString;</p><p>　　bmxxxg.ebmmc.Text:=DBGrid1.Fields[1].AsString;</p><p>　　bmxxxg.ebmms.Text:=DBGrid1.Fields[3].AsString;</p><p><b>　　end;</b></p><

106、;p>　　3．員工信息添加界面的保存按鈕代碼</p><p>　　procedure Tygxxtjfrm.bbcClick(Sender: TObject);</p><p><b>　　var</b></p><p>　　picture1:tpicture;</p><p>　　bmbh,sex:string;

107、</p><p><b>　　begin</b></p><p>　　if trim(eygbh.Text)='' then //驗證員工編號是否輸入。未輸入則進行提示，若已經(jīng)輸入則驗證是否重復(fù)。</p><p><b>　　begin</b></p><p>　　applicati

108、on.MessageBox('請輸入員工編號！','提示',64);</p><p><b>　　end</b></p><p><b>　　else</b></p><p><b>　　begin</b></p><p>　　with data

109、m1.adoq8 do</p><p><b>　　begin</b></p><p><b>　　close;</b></p><p>　　sql.Clear;</p><p>　　sql.Add('select * from ygjbxxb where ygbh=:a');<

110、;/p><p>　　parameters.ParamByName('a').Value:=trim(eygbh.Text);</p><p><b>　　open;</b></p><p><b>　　end;</b></p><p>　　if datam1.adoq8.RecordCo

111、unt>0 then</p><p><b>　　begin</b></p><p>　　application.MessageBox('該員工編號已存在！','提示',64);</p><p><b>　　end</b></p><p><b>　　

112、else</b></p><p><b>　　begin</b></p><p>　　if trim(eygxm.Text)='' then //驗證員工姓名是否已輸入。</p><p><b>　　begin</b></p><p>　　application.Mes

113、sageBox('請輸入員工姓名！','提示',64);</p><p><b>　　end</b></p><p><b>　　else</b></p><p><b>　　begin</b></p><p>　　if trim(combobo

114、x1.Text)='' then //驗證員工所在部門是否已選擇。若已選擇提取出部門編號。</p><p><b>　　begin</b></p><p>　　application.MessageBox('請選擇所在部門！','提示',64);</p><p><b>　　end&

115、lt;/b></p><p><b>　　else</b></p><p><b>　　begin</b></p><p>　　with datam1.adoq8 do</p><p><b>　　begin</b></p><p><b&g

116、t;　　close;</b></p><p>　　sql.Clear;</p><p>　　sql.Add('select * from bmxxb where bmmc=:a');</p><p>　　parameters.ParamByName('a').Value:=trim(combobox1.Text);<

117、/p><p><b>　　open;</b></p><p><b>　　end;</b></p><p>　　if datam1.adoq8.RecordCount>0 then</p><p><b>　　begin</b></p><p>　　b

118、mbh:=datam1.adoq8.fieldbyname('bmbh').AsString;</p><p><b>　　end;</b></p><p>　　if xb1.Checked then //讀取性別信息。</p><p><b>　　begin</b></p><p>

119、;<b>　　sex:='男';</b></p><p><b>　　end;</b></p><p>　　if xb2.Checked then</p><p><b>　　begin</b></p><p><b>　　sex:='女

120、9;;</b></p><p><b>　　end;</b></p><p>　　if openpicturedialog1.FileName<>'' then//驗證照片是否已選擇。照片保存方法不同。</p><p>　　//若照片已選擇，保存方法為：先把必要項和照片保存，再利用update修改以插入其

121、他數(shù)據(jù)。</p><p>　　//若照片未選擇，保存方法為insert。</p><p><b>　　begin</b></p><p>　　picture1:=tpicture.Create;</p><p>　　picture1.LoadFromFile(extractfilename(openpicturedial

122、og1.FileName));//獲取照片內(nèi)容。</p><p>　　with datam1.adoq8 do//通過查詢的方法打開數(shù)據(jù)集，便于插入操作。</p><p><b>　　begin</b></p><p><b>　　close;</b></p><p>　　sql.Clear;<

123、;/p><p>　　sql.Add('select * from ygjbxxb');</p><p><b>　　open;</b></p><p><b>　　insert;</b></p><p>　　fieldbyname('ygbh').AsString:=ey

124、gbh.Text;</p><p>　　fieldbyname('ygxm').AsString:=eygxm.Text;</p><p>　　fieldbyname('xb').AsString:=sex;</p><p>　　fieldbyname('bmbh').AsString:=bmbh;</p>

125、<p>　　fieldbyname('zp').Assign(picture1);</p><p>　　post;//提交。</p><p><b>　　end;</b></p><p>　　//以下就是用update的方法插入其他項。</p><p>　　with datam1.adoq8

126、 do</p><p><b>　　begin</b></p><p><b>　　close;</b></p><p>　　sql.Clear;</p><p>　　sql.Add('update ygjbxxb set csrq=:b,tel=:c,zz=:d,bz=:e where y

127、gbh=:a');</p><p>　　parameters.ParamByName('a').Value:=trim(eygbh.Text);</p><p>　　parameters.ParamByName('b').Value:=formatdatetime('yyyy-mm-dd',datetimepicker1.Date);