【正文】 bject)。,mb_iconinformation+mb_ok)。 確 定 還 原39。 procedure (Sender: TObject)。 end。 CopyFile(PChar(DataFile),PChar(+39。 if FileExists(+39。 浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 38 end。 。 。,mb_iconinformation+mb_yesno)=IDNo then exit。),39。 Open。 begin 。 。,MB_ICONinformation+mb_ok)。今日銷售額為 39。 procedure (Sender: TObject)。 begin 。 :=false。\date\。 end。 begin if then begin :=false。 procedure (Sender: TObject)。 end。 end。 procedure (Sender: TObject)。另外，系統(tǒng)能及時開發(fā)完成也得益于同組同學(xué)之間的密切協(xié)作，這里一并表示感謝！ 浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 33 附錄 主要 程序清單 Main_Form: TMain_Form。此外，本軟件對于數(shù)據(jù)的一致性的問題也通過程序進(jìn)行了有效的解決。 強度測試及性能測試：測試系統(tǒng)的能力最高實際限度，即軟件在一些超負(fù)荷的情況，功能實現(xiàn)情況，如要求軟件某一行為的大量重復(fù)、輸入大量的數(shù)據(jù)、對數(shù)據(jù)庫大量復(fù)雜 性的查詢等。因此，軟件測試在面向?qū)ο缶幊汤锔哂兴闹匾浴? 備份系統(tǒng) 備份系統(tǒng)有助于提高系統(tǒng)的健壯性，在系統(tǒng)崩潰后可以把損失降到最低限度。 主要使用 Label 和 panl 以及 manu 等控件實現(xiàn)的。 （ 7）幫助：提供系統(tǒng)信息及系統(tǒng)應(yīng)用提示。再使用另一表格顯示分別從各個廠商進(jìn)貨的金額，還有一個文本框用于顯示此時間段的總進(jìn)貨金額。 退貨登記過程比較復(fù)雜，退貨登記模塊的程序 流程圖如下圖 41 所示： 浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 24 登錄模塊的流程圖如下圖 42 所示： 應(yīng)用程序設(shè)計 本系統(tǒng)總體的功能是實現(xiàn)小型超市銷售管理的系統(tǒng)化、規(guī)?；妥詣踊唧w包括如下功能模塊： （ 1）系統(tǒng)登錄：包括用戶登錄、修改密碼、添加新用戶、退出系統(tǒng)等。 表 33 produce_type_t 表 字段名 數(shù)據(jù)類型 說明 p_type 數(shù)字 p_name 文本 字段大小為 50 E、 sell_back_t 表（已售商品表）中包括有流水編號、條碼、商品名、單價、數(shù)量、銷售日期等字段。 我們使用的數(shù)據(jù)庫系統(tǒng)是 Windowa Access 20xx。 在系統(tǒng)開放性方面，按照軟件工程開發(fā)規(guī)范實現(xiàn)系統(tǒng)的開放性，既便于擴(kuò)充又便于升級，以適應(yīng)今后企業(yè)管理發(fā)展及銷售體系改革的需求。數(shù)據(jù)訪問方法為使用 ADO（ Active 數(shù)據(jù)對象 Active Data Objects）通過 ODBC 的方法同數(shù)據(jù)庫接口。 投入：除軟件開發(fā)成本，一臺中等電腦，現(xiàn)價 4000 元左右，完全可以良好的運行系統(tǒng)，完成硬件平臺的要求，而且經(jīng)濟(jì)實用。因此我們開發(fā)并應(yīng)用此系統(tǒng)，能夠適應(yīng)企業(yè)發(fā)展的需要，提高了工作效率，很好地實現(xiàn)了信息數(shù)據(jù)的規(guī)范化管理。 ★銷售時把相應(yīng)數(shù)量的商品從現(xiàn)存商品庫中減去 ，并記錄于另外的一個銷售庫中，以便日后查看和統(tǒng)計銷售信息。 可行性研究 這個階段要解決的關(guān)鍵問題是“對上一階段所確定的問題有無行得通的解決辦法”。所以銷售管理的規(guī)范化、自動化已經(jīng)是必然的要求。在應(yīng)用系統(tǒng)的開發(fā)中，用戶操作界面的設(shè)計十分重要，程序員往往要花費大量的時間和精力，編寫大段代碼來設(shè)計浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 13 一個友好的用戶操作界面。用戶將 數(shù)據(jù)放入數(shù)據(jù)庫的目的就在于日后能快速查找出需要的數(shù)據(jù)。表的結(jié)構(gòu)與日常工作中使用的表格，如學(xué)生成績單，物料清單和材料銷售單一樣，是由列（字段）和行（記錄）組成。而不同的數(shù)據(jù)庫是按不同的數(shù)據(jù)結(jié)構(gòu)來聯(lián)系和組織的。 Microsoft Access 簡介 Access 是一種關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。 綜上所述，雖然 Delphi 的各個版本提供多種數(shù)據(jù)庫的連接和訪問方法，但在同一個應(yīng)用程序中，開發(fā)者幾乎不可能同時選用多種連接方法，因而選擇合適方法是一個必須在開發(fā)前仔細(xì)考慮的問題。 Delphi 通過 ADO 技術(shù)可讓開發(fā)者快速訪問關(guān)系或非關(guān)系型數(shù)據(jù)庫，但使用時需安裝 ADO 的數(shù)據(jù)庫引擎。 除了保留以前版本的強大功能之浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 10 處，更在數(shù)據(jù)庫程序開發(fā)方面提供了強有力的支持，使程序員完全可能輕松開發(fā)出復(fù)雜且功能強大的數(shù)據(jù)庫程序。 數(shù)據(jù)庫技術(shù)是計算機應(yīng)用領(lǐng)域中非常重要的技術(shù)，隨著計算機應(yīng)用的不斷深入，數(shù)據(jù)庫的重要性日益被人們所認(rèn)識，它已成為信息管理、辦公自動、計算機輔助設(shè)計等方面的重要手段。無論是一個銷售公司還是一個銷售商店，都有很多的銷售數(shù)據(jù)需要管理。 系統(tǒng)中解決了企業(yè)管理事務(wù)中的進(jìn)貨、銷售、存貨等情況的問題以及相關(guān)統(tǒng)計工作。 銷售管理系統(tǒng)是企業(yè)管理機制中的重要組成部分，通過對企業(yè)銷售管理系統(tǒng)的銷售管理機制進(jìn)行調(diào)查研究，開發(fā)了本銷售管理系統(tǒng)。 企業(yè)的銷售管理是企業(yè)發(fā)展的關(guān)鍵環(huán)節(jié)，一個好的銷售管理體制將給企業(yè)帶來很可觀的經(jīng)濟(jì)效益。凡是計算機中用來描述事物的記靈，統(tǒng)稱為數(shù)據(jù)。 Delphi強大的易用的特點得到程序員的青睞。通過 ADO 技術(shù)可方便的訪問各種類型的數(shù)據(jù)庫，尤其對于 OLEDB 類型的數(shù)據(jù)庫， ADO 更是訪問數(shù)據(jù)庫的標(biāo)準(zhǔn)接口。因浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 11 此也是 Delphi和 Kylix 的核心數(shù)據(jù)訪問。 ADO 組件的使用使得 DELPHI 在訪問數(shù)據(jù)的類型和采用的技術(shù)方面都有了很 大的突破。 數(shù)據(jù)庫通常分為層次式數(shù)據(jù)庫、網(wǎng)絡(luò)式數(shù)據(jù)庫和關(guān)系式數(shù)據(jù)庫三種。所以說，表就是我們用以存儲數(shù)據(jù)的倉庫。 數(shù)據(jù)管理包括兩項基本的任務(wù)，首先是將數(shù)據(jù)組織起來并存儲在數(shù)據(jù)庫表中，這就是我們在前面介紹的數(shù)據(jù)庫表的查詢或檢索，這是數(shù)據(jù)管理中極其重要的功能。 一個好的數(shù)據(jù)庫系統(tǒng)不但要有高質(zhì)量的數(shù)據(jù)管理功能和高效率的數(shù)據(jù)查詢能力，而且還需要有一個用戶友好的操作界面。企業(yè)規(guī)模的不斷擴(kuò) 大，客戶不斷增加，銷售業(yè)務(wù)也隨之猛增，手工管理紛繁復(fù)雜的銷售數(shù)據(jù)已經(jīng)不能滿足需要。同時該系統(tǒng)應(yīng)不浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 15 可避免的涉及到庫存商品基本信息、供應(yīng)商信息、客戶信息的維護(hù)和處理及進(jìn)貨統(tǒng)計、銷售統(tǒng)計等統(tǒng)計及查詢處理。 銷售管理系統(tǒng)具體任務(wù)要求和運行過程 系統(tǒng)的功能要求即用戶對目標(biāo)系統(tǒng)數(shù)據(jù)處理功能所提出的要求，主要考慮以下銷售管理需求： ★進(jìn)貨時入庫登記，以便日后查看和統(tǒng)計進(jìn)貨情況。 浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 16 對現(xiàn)有系統(tǒng)的分析 公司規(guī)模的不斷擴(kuò)大，與客戶間的往來業(yè)務(wù)也越來越多，手工管理這些紛繁復(fù)雜數(shù)據(jù)的方式已經(jīng)不適應(yīng)企業(yè)發(fā)展的要求，實現(xiàn)數(shù)據(jù)規(guī)范化、自動化的電腦管理，是一個管理規(guī)范、動作高效的企業(yè)單位的必然要求。對于規(guī)模不很大，經(jīng)費有限的單位在經(jīng)濟(jì)上是可以接受的，并且本系統(tǒng)實施后可以顯著提高效率，很快就可以體現(xiàn)經(jīng)濟(jì)效益。數(shù)據(jù)庫的建立使用的是 office 20xx 中的 Microsoft Access 。 在通用性設(shè)計方面，以標(biāo)準(zhǔn)化為基礎(chǔ)，通過信息流程和管理過程的合理模型化、管理對象的模型化，使得系統(tǒng)具有一定的通用性和規(guī)范性。如果把前面的討論看成是數(shù)據(jù)庫的邏輯設(shè)計，下面的問題將是數(shù)據(jù)庫的具體物理實現(xiàn)。具體設(shè)置如表 33 所示。這里僅列舉兩個典型程序流程圖。使用一個表格顯示所選時間段的全部進(jìn)貨數(shù)據(jù)，包括進(jìn)貨編號、商品名、生產(chǎn)廠商、產(chǎn)品型號、單價、數(shù)量、總金額、進(jìn)貨日期、業(yè)務(wù)員編號等。如果是員工信 息或進(jìn)貨商信息有變化，還可以對員工表和進(jìn)貨商表可以進(jìn)行修改數(shù)據(jù)，其他的表則不能進(jìn)行修改，防止有人制造假數(shù)據(jù)。它是系統(tǒng)的結(jié)構(gòu)匡架，便于對整個系統(tǒng)的觀摩、管理 。 商品查詢 該窗體以圖形化的界面，簡單直觀的向使用者提供商品的查詢功能，使用者可以通過已知商品信息迅速查詢到與此種商品相關(guān)的信息，同時，也可用過 分類信息反查其 它 商品狀況。 盡管面向?qū)ο蠹夹g(shù)的基本思想保證了軟件應(yīng)該有更高的質(zhì)量，但無論采用什么樣的編程技術(shù)，編程人員的錯誤都是不可避免的，而且由于面向?qū)ο蠹夹g(shù)開發(fā)的軟件代碼重用率高，更需要嚴(yán)格測試，避免錯誤的繁衍。功能測試是系統(tǒng)測試最常用和必須的測試，通常還會以正式的軟件說明書為測試標(biāo)準(zhǔn)。并提 供部分系統(tǒng)維護(hù)功能 ,使用戶方便進(jìn)行用戶名稱和密碼的更改， 提高了軟件的安全性和健壯性 。他無論在理論上還 是在實踐中，都給與我很大的幫助，使我得到不少的提高這對于我以后的工作和學(xué)習(xí)都有一種巨大的幫助，感謝他耐心的輔導(dǎo)。 end。 :=true。 end。 end。 procedure (Sender: TObject)。 begin 。+extractfilepath()+39。 if 1 then begin :=false。 procedure (Sender: TObject)。 end。 messagebox(handle,PChar(39。今日盤點 39。39。 procedure (Sender: TObject)。)。 39。確定清空 39。 end。 。 begin 。 try if not then exit。 end else begin for i:= to do := i。,mb_iconinformation+mb_ok)。 end。,39。還原數(shù)據(jù) 39。 end。 sqlstr:string。 。select * from use_t where 1=139。39。39。 if recordcount0 then begin UseName:=[1].asstring。密碼或用戶名不正確 39。 end。then showmessage(39。 end。+extractfilepath()+39。 with adoquery2 do begin if not active then open。 end。 end。 (39。 ADOQuery2:= (self)。 end。用戶名不能為空 39。你是非法用戶，請不要盜用別人的軟件 39。),snd_async)。39。39。39。 。Data Source=39。 end. Login_Form: TLogin_Form。,39。 CopyFile(PChar(),PChar(DataFile),true)。\date\39。,39。 Messagebox(handle,39。 存 在 數(shù) 據(jù) 庫 重 名 ， 是 否 覆 蓋 ？ 39。 implementation {$R *.dfm} procedure (Sender: TObject)。 procedure (Sender: TObject)。 begin with datamodule1 do begin 。 execute。 end。+FieldByName(39。 begin with do begin close。 end。 procedure (Sender: TObject)。).AsString+39。 (39。 浙江工業(yè)大學(xué)專科畢業(yè)設(shè)計論文 36 begin 。 :=false。 if not then 。39。 :=true。 end else begin :=true。 :=false。 begin if then begin 浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 34 :=false。 procedure (Sender: TObject)。 begin 。比如功能不是很完善、用戶界面不夠美觀，出錯處理不夠等多方面問題。 本系統(tǒng)在經(jīng)過編譯運行之后進(jìn)行了以上測試，例如：我們?yōu)榱藴y試系統(tǒng)的安全機制，而采采不同應(yīng)用權(quán)限級別的用戶進(jìn)行登錄，結(jié)果驗證了系統(tǒng)的安全性；浙江工業(yè)大學(xué)?？飘厴I(yè)設(shè)計論文 29 當(dāng)我們以具有系統(tǒng)管理員身體的用戶名稱和密碼登錄系統(tǒng)時，則我們會享愛管理系統(tǒng)的一切權(quán)限，可以進(jìn)行的有管理工作，包括添加新用戶、修改用戶密碼、修改數(shù)據(jù)庫數(shù)據(jù)等；當(dāng)我們以具有一級客戶端權(quán)限的用戶名 稱和密碼登錄系