1、精選文件課程設(shè)計設(shè)計主題：超市銷售管理系統(tǒng)學(xué)生名稱：潘小濤學(xué)號： 20052408專業(yè)班：計算機(jī)科學(xué)和技術(shù)05-2班2008年9月23日1 .設(shè)計要求1 .信息要求本系統(tǒng)應(yīng)該至少包含關(guān)于超市所有貨物管理的基本信息，包括進(jìn)貨信息和銷售信息等。 它們必須包含商品的基本信息，如商品編號、商品名、標(biāo)準(zhǔn)、產(chǎn)地、單位、進(jìn)口價格、批發(fā)價格、零售價等，以及客戶的基本信息，如客戶編號、客戶名稱、聯(lián)系人、聯(lián)系電話號碼、地址、客戶郵箱、銀行賬號等。2 .功能要求本系統(tǒng)的基本功能要求如下所示到貨商品的信息維護(hù)，包括簡單的查詢、修改、刪除、添加等功能銷售商品的信息維護(hù)，包括簡單查詢、修改、刪除、添加等功能客戶信息維護(hù)，

2、包括簡單查詢、更改、刪除、添加等功能系統(tǒng)用戶的信息維護(hù)，包括簡單的查詢、修改、刪除、添加、權(quán)限分配等功能系統(tǒng)信息的備份、還原2 .軟件環(huán)境和開發(fā)工具1 .電腦和Win XP Pro2.Delphi 7.03.SQL Server 20003 .需求分析在對這個超市的銷售管理系統(tǒng)進(jìn)行了深入的業(yè)務(wù)流程分析后，制作了數(shù)據(jù)流圖。從流程圖可以看出，各操作員在看到信息前必須登錄到該管理系統(tǒng)，各操作員的信息保存在操作員信息表中。 用戶登錄系統(tǒng)后，就能看到商品的銷售管理信息和顧客信息。 另外，也可以查詢并選擇自己想要的信息。4 .數(shù)據(jù)庫設(shè)計1 .概念設(shè)計從需求分析的結(jié)果中得到的用ER圖表表示的概念設(shè)計結(jié)果如下

3、圖表所示銷售調(diào)整進(jìn)貨調(diào)整商品信息查詢刪除用戶更改用戶信息添加新用戶刪除客戶客戶信息的變更添加新客戶追加新商品修改商品信息刪除商品超市銷售信息管理系統(tǒng)商品信息管理客戶信息管理用戶信息管理銷售管理查詢銷售信息管理庫存量調(diào)整2 .邏輯設(shè)計根據(jù)分析，整個銷售系統(tǒng)所需的數(shù)據(jù)表如下商品信息：商品編號、商品名、規(guī)格、產(chǎn)地、單位、進(jìn)口價格、批發(fā)價格、零售價等客戶信息：客戶編號、客戶名稱、聯(lián)系方式、聯(lián)系電話、地址、客戶郵箱、銀行賬號等操作員信息：操作員號碼、操作員名稱、操作員密碼、操作員等級等銷售信息：銷售編號、顧客編號、顧客名稱、商品編號、商品名、單價、數(shù)量、金額、銷售時間等。5 .系統(tǒng)設(shè)計這個超市的銷售信息

4、管理系統(tǒng)是一個比較小型的數(shù)據(jù)庫系統(tǒng)，只要保存文本信息，就因為是一個小的領(lǐng)域問題，作為一個小型的數(shù)據(jù)庫系統(tǒng)，因為數(shù)據(jù)量最多是一百千條左右，所以在微軟的SQL Server的背景下操作員信息表包含操作員編號、操作員名稱、操作員密碼、操作員等級。 操作員號碼是主代碼商品信息表、商品編號、商品名、規(guī)格、產(chǎn)地、單位、進(jìn)口價格、批發(fā)價格、零售價等商品編號為主代碼：客戶信息表，包括客戶編號、客戶名稱、聯(lián)系人、聯(lián)系電話號碼、地址、客戶郵箱、銀行賬號等。 其中，客戶號碼是主代碼銷售信息表中包含銷售編號、顧客編號、顧客名、商品編號、商品名、單價、數(shù)量、金額、銷售時間等。 銷售號碼是主代碼庫存信息表。 包含商品編號

5、、商品名、庫存數(shù)量、庫存金額等。 商品號碼是主代碼6 .系統(tǒng)的操作說明和執(zhí)行結(jié)果打開Project.exe后，顯示登錄畫面輸入正確的用戶名和密碼進(jìn)入系統(tǒng)后，會顯示以下錯誤信息系統(tǒng)的主界面：商品信息管理界面：客戶信息管理界面：操作員信息管理界面：銷售查詢界面：銷售管理界面：庫存調(diào)整接口：7 .進(jìn)程列表因為系統(tǒng)是圖形信息管理系統(tǒng)，所以使用Delphi來實現(xiàn)。 進(jìn)程列表太冗馀，這里只顯示其中的重要部分。1 .用戶登錄部：程序表單1 .位Bt n1 click (發(fā)送器：對象ect )var用戶名稱，用戶密碼，sqlstr :字符串；begin用戶名稱：=trim (edit1. text )用戶路徑

6、：=trim (edit2. text )sqlstr:=select *from操作員信息表where (操作員名=username )and (操作員密碼=userpass )adoquery1.Close；adoquery1.SQL.Clear；adoquery1.SQL.Add(sqlstr )adoquery1.Open；if adoquery1.記錄計數(shù)0 thenbeginself.Visible:=false；b:=true；應(yīng)用程序.創(chuàng)建表單(mainn，mainn )mainn.ShowModal；mainn.Free；關(guān)閉；結(jié)束elsebeginifi3PSbeginAp

7、plication.MessageBox (用戶名或密碼不正確。 請再輸入一次。 提示，0 64 )Edit1.Clear；Edit2.Clear；Edit1.SetFocus；國際電信聯(lián)盟結(jié)束elsebeginApplication.MessageBox (對不起，您沒有使用本系統(tǒng)的權(quán)限。 提示，0 64 )應(yīng)用程序.終端ate；結(jié)束；結(jié)束；結(jié)束；程序表單1 .位btn2 click (發(fā)件人：對象ect )begin關(guān)閉；結(jié)束；程序表單1 .表單關(guān)閉(發(fā)件人：主題)beginPS=假then應(yīng)用程序.終端ate；結(jié)束；程序表單1 .格式(發(fā)件人：主題)begin結(jié)束；結(jié)束2 .商品信息管理

8、代碼：varspinfor: Tspinfor；實施公司。$R *.dfm程序tsp infor.edit value；beginedit1. text :=inttostr (adoquery1. field by name (商品編號).Value )edit2. text :=adoquery1. field by name (商品名).Value；edit3. text :=adoquery1. field by name (規(guī)格).Value；edit4. text :=adoquery1. field by name (產(chǎn)地).Value；edit5. text :=adoquer

9、y1. field by name (單位).Value；edit6. text :=浮動工作人員(adoquery1. field by name (提供).Value；edit7. text :=浮動工作人員(adoquery1. field by name (批準(zhǔn)價格).Value；edit8. text :=浮動工人(adoquery1. field by name (零售價).Value )結(jié)束；proceduretspinfor.formshow (sender : tobject )beginadoquery1.Close；adoquery1.SQL.Clear；adoquery

10、1.SQL.Add(select *from商品基礎(chǔ)信息表)adoquery1.Open；adoquery1.First；編輯值；bit BTN4.啟用：=假；結(jié)束；程序tsp infor.cleared it；beginedit1.Clear；edit2.Clear；edit3.Clear；編輯4 .清除；edit5.Clear；edit6.Clear；編輯7 .清除；edit8.清除器；結(jié)束；proceduretspinfor.bit Bt n1 click (發(fā)送器： tobject ect )beginif not adoquery1.bof thenbeginadoquery1.Pr

11、ior；self.editvalue；結(jié)束elsebit btn1 .啟用：=假；bit btn2 .啟用：=true；結(jié)束；proceduretspinfor.bit btn2 click (發(fā)送器： tobject ect )beginif not adoquery1.Eof thenbeginadoquery1.Next；編輯值；結(jié)束elsebit btn2 .啟用：=假；bit btn1 .啟用：=true；結(jié)束；proceduretspinfor.bit btn3 click (發(fā)送器： tobject ect )vari :集成電路；begincleareditadoquery1.

12、Close；adoquery1.SQL.Clear；adoquery1.SQL.Add(select max (商品編號) as ss from商品基礎(chǔ)信息表)adoquery1.Open；I :=問題1 .字段按名稱(ss ) .值1；edit1.Text:=inttostr(i )edit2.SetFocus；bit BTN4.啟用的：=真；結(jié)束；proceduretspinfor.bit BTN 4點擊(發(fā)件人： tobject ect )beginif (編輯1 .文本)和(編輯2 .文本)和(編輯3 .文本)和(編輯4 .文本)和(編輯5 .文本)和(編輯6 .文本)和(編輯7 .文

13、本)和(編輯8 .文本) thenbeginadoquery1.Close；adoquery1.SQL.Clear；插入商品基礎(chǔ)信息表values(:a、b、c、d、e、f、g、h )；adoquery1. parameters.param by name (a ).value :=strtoint (edit1. text )adoquery1. parameters.param by name (b ).value :=edit2. text；adoquery1. parameters.param by name (c ).value :=edit3. text；adoquery1. pa

14、rameters.param by name (d ).value :=edit4. text；adoquery1. parameters.param by name (e ).value :=edit5. text；adoquery1. parameters.param by name (f ).value :=strtofloat (edit6. text )；adoquery1. parameters.param by name (g ).value :=strtofloat (edit7. text )；adoquery1. parameters.param by name (h ).value :=strtofloat (edit8. text )；adoquery1.ExecSQL；show message (