【導(dǎo)讀】貨、銷售、錢流、庫存、統(tǒng)計(jì)及查賬。通過一個(gè)典型超市進(jìn)銷存管理。重要性不言而喻。但是，目前超市在具體的業(yè)務(wù)流程處理過程中仍然。達(dá)到理想的效果。做的進(jìn)銷存管理軟件。在設(shè)計(jì)過程中最大限度滿足用戶的要求，因此，該系統(tǒng)具有較強(qiáng)的實(shí)用性和針對性。本系統(tǒng)界面友好，操作簡單，可。維護(hù)性強(qiáng)，功能完備。本論文介紹了進(jìn)銷存管理信息系統(tǒng)開發(fā)的全過。出了系統(tǒng)的使用說明和系統(tǒng)設(shè)計(jì)的心得體會(huì)。

　　

【正文】 中點(diǎn)選“ TBitBtn”組件，添加到窗體上，分別命名為“ BitBtn1”、“ BitBtn2”，設(shè)置 BitBtn1 組件的 Caption 屬性為“保存”，通過 Glyph 屬性為其指定圖標(biāo)。設(shè)置 BitBtn2 組件的 Caption 屬性為“退出”，通過 Glyph 屬性為其指定圖標(biāo)。 2．程序相關(guān)代碼 在窗體的 OnShow 事件處理過程 中如果為修改，將要修改的記錄顯示在窗體的編輯框中。代碼如下： procedure (Sender: TObject)。 begin inherited。 //調(diào)用父類的同名方法 try if =True then //判斷是否為修改 with do begin :=fieldbyname(39。fullnamed39。).AsString。 :=fieldbyname(39。tradecode39。).AsString。 :=fieldbyname(39。name39。).AsString。 :=fieldbyname(39。type39。).AsString。 :=fieldbyname(39。standard39。).AsString。 :=fieldbyname(39。unit39。).AsString。 :=fieldbyname(39。produce39。).AsString。 :=fieldbyname(39。provideinf39。).AsString。 :=fieldbyname(39。memo39。).AsString。 :=inttostr(fieldbyname(39。upperlimit39。).AsInteger)。 :=inttostr(fieldbyname(39。lowerlimit39。).AsInteger)。 end else begin (sender)。 //如果為添加操作調(diào)用過程 getspbh得到編號(hào) :=。 end。 except end。 end。 調(diào)用 getspbh 過程得到商品編號(hào)。 getspbh 過程完整代碼如下： procedure (sender:Tobject)。 //得到商品編號(hào) begin 。 if =0 then spbh:=39。T39。+formatfloat(39。0000039。,1) //格式化編號(hào) else spbh:=39。T39。+Formatfloat(39。0000039。,strtoint(copy([0].AsString,2,5))+1)。 end。 進(jìn)貨單錄入模塊 設(shè)計(jì) 進(jìn)貨單錄入窗體主要功能是錄入進(jìn)貨的相關(guān)信息，在該模塊中支持多行錄入，可以調(diào)用其他信息提示窗體。進(jìn)貨單錄入模塊運(yùn)行結(jié)果如圖 516 所示。 圖 516 進(jìn)貨單錄入模塊運(yùn)行界面 1．窗體設(shè)計(jì)步驟 （ 1）從基礎(chǔ)窗體繼承一個(gè)窗體，命名為“ F_jhd”，設(shè)置其 Caption 屬性為“進(jìn)貨單錄入”。 （ 2）在窗體上添加 TLabel 組件、 TEdit 組件、 TDateTimePicker 組件，用于輸入信息。在“ Additional”組件頁中點(diǎn)選“ TStringGrid”組件，添加到窗體上，命名為“ StringGrid1”。設(shè)置 StringGrid1 組件的 RowCount 屬性為“ 10”；ColCount 屬性為“ 10”。 （ 3）在窗體上添加 TSpeedButton 組件，通過 Glyph 屬性為其指定圖標(biāo)。添加 TBitBtn 組件，用于完成“保存”、“取消”功能。 （ 4）在窗體上添加 TPanel 組件，命名為“ Panel1”，設(shè)置其 Caption 屬性為空。用于顯示統(tǒng)計(jì)應(yīng)付金額。 （ 5）在窗體上添加 TADOQuery組件，命名為“ ADOQuery1”，設(shè)置其 Connection屬性為“ ”。 2．程序 相關(guān)代碼 在窗體的 OnShow 事件處理過程中初始化相關(guān)信息。代碼如下： procedure (Sender: TObject)。 begin inherited。 :=1。 //窗體標(biāo)記 :=now()。 //初始化為當(dāng)天日期 with do //設(shè)置列標(biāo)題 begin Cells[1,0]:=39。商品編號(hào) 39。 Cells[2,0]:=39。商品全稱 39。 Cells[3,0]:=39。商品型號(hào) 39。 Cells[4,0]:=39。商品規(guī)格 39。 Cells[5,0]:=39。單位 39。 Cells[6,0]:=39。產(chǎn)地 39。 Cells[7,0]:=39。數(shù)量 39。 Cells[8,0]:=39。進(jìn)貨價(jià) 39。 Cells[9,0]:=39。金額 39。 end。 with adoquery1 do begin close。 。 (39。select * from tb_warehouse_main39。)。 Open。 end。 (sender)。 //調(diào)用過程 getspbh取得編號(hào) :=spbh。 end。 雙擊 TStringGrid 組件左側(cè)的按鈕動(dòng)態(tài)創(chuàng)建信息提示窗體。 代碼如下： procedure (Sender: TObject)。 begin inherited。 //調(diào)用父類的同名方法 (TF_kcspxz, F_kcspxz)。 。 。 end。 在彈出的信息提示窗體的【確定】按鈕單擊事件處理過程中將數(shù)據(jù)添加到TStringGrid 組件中。代碼如下： if =1 then //往進(jìn)貨單錄入窗體添加數(shù)據(jù) begin for xh:=1 to do begin if Trim([1,xh])=39。39。 then //查找第幾行為空 begin grow:=xh。 break。 end。 end。 for xh:=0 to do //將數(shù)據(jù)庫的數(shù)據(jù)讀出 begin gcol:=xh。 if xh=2 then gcol:=gcol+1。 [xh+1,grow]:=[gcol].Value。 //將 數(shù)據(jù)添加到單元格中 end。 [8,grow]:=[8].Value。 。 :=7。 :=grow。 end。 總結(jié) 在這個(gè)軟件設(shè)計(jì)的最初，我即按照老師的要求一步一步往下做，努力作好需求分析。因?yàn)樵谲浖拈_發(fā)過程中需求分析是十分重要的。在初步了解的基礎(chǔ)上，我根據(jù)老師給予的關(guān)于 進(jìn)銷存管理 系統(tǒng)設(shè)計(jì)思路的講解，對系統(tǒng)進(jìn)行了詳細(xì)的需求分析。這樣就使我對于系統(tǒng)的開發(fā)有了一個(gè)大致的思路。在最初的幾個(gè)星期里，我一直在做完善需求分析的重復(fù)工作。這樣就為下一步的設(shè)計(jì)打下了堅(jiān)實(shí)的基礎(chǔ)。 到了數(shù)據(jù)庫設(shè)計(jì)階段，首先 選擇了 SQL Server 2021 作為數(shù)據(jù)庫管理系統(tǒng)。因?yàn)槲?所 需要的數(shù)據(jù)庫 是比較 復(fù)雜 的 ，經(jīng)過一段時(shí)間的努力，我 的 數(shù)據(jù)庫建立成功了。 下一階段就到了編程階段了，在這個(gè)階段我們首先考慮的是界面，一個(gè)界面設(shè)計(jì)的好壞直接關(guān)系到使用者的方便程度，于是老師提出的要求就是實(shí)用。在實(shí)用的基礎(chǔ)上盡量美觀大方。我經(jīng)過反復(fù)的改正后，界面固定下來。然后就進(jìn)入編寫程序階段，在編程過程中，我借鑒了很多資料，同時(shí)也請教了其他有經(jīng)驗(yàn)的同學(xué)。在可以實(shí)現(xiàn)同一功能的多個(gè)控件中經(jīng)過仔細(xì)研究，確定了最優(yōu)的控件。這樣在老師的要求和幫助下，我的界面逐 漸得以完善并最終確定下來，到了真正編寫代碼的時(shí)候，我在需求分析做的努力逐漸顯示出來，因?yàn)樵谶@個(gè)過程中，我?guī)缀鯖]有遇到什么十分棘手的問題，各項(xiàng)功能也隨之增加。在經(jīng)過和老師的交流討論之后，我的設(shè)計(jì)也逐漸進(jìn)入了尾聲。這樣，我的設(shè)計(jì)就基本上完成了。 在接下來的時(shí)間里，我繼續(xù)對設(shè)計(jì)進(jìn)行優(yōu)化，包括界面的美觀，以及程序的設(shè)計(jì)。在嚴(yán)格的測試后，逐漸使系統(tǒng)不再出現(xiàn)大的錯(cuò)誤 ,能夠很穩(wěn)定的運(yùn)行。 參考文獻(xiàn) [1] Simon C[M].北京 :清華大學(xué)出版社 ,2021。 [2] Jeffrey .NET 框架程序設(shè)計(jì) [M].北京 :機(jī)械工業(yè)出版社 ,2021。 [3] James Design Patterns[M].北京 :電子工業(yè)出版社 ,2021。 [4] Richard Network Programming[M].北京 :電子工業(yè)出版社 ,2021。 [5] 劉曉華 .精通 .NET核心技術(shù) [M].北京 :電子工業(yè)出版社 ,2021。 [6] 狄龍 (Darin Dillon)..NET 開發(fā)人員調(diào)試策略 [M].北京 :清華大學(xué)出版社 ,2021。 [7] 劉友話 ..Net環(huán)境下數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)技術(shù) [M].北京 :科學(xué)出版社 ,2021。 [8]賽奎春等 .Visual Basic 精彩編程 200例 .機(jī)械工業(yè)出版社 ,2021。 [9]高春艷等 .Visual Basic 數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。 [10]王國輝等 .Visual FoxPro 數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。 [11]張振坤等 .Power Builder 數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。 [12]鄭驍鵬等 .Delphi數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。 [13]李文立等 .PowerBuilder 精彩編程 200例 .機(jī)械工業(yè)出版社 ,2021。 [14]董韶華等 .Visual FoxPro 精彩編程 200例 .機(jī)械工業(yè)出版社 ,2021。 [15]王國輝等 .ASP數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。 [16]趙智勇等 .Delphi工程應(yīng)用與項(xiàng)目實(shí)踐 .機(jī)械工業(yè)出版社 ,2021。 [17]李俊民等 .Visual Basic 工程應(yīng)用與項(xiàng)目實(shí)踐 .機(jī)械工業(yè)出版社 ,2021。 [18]阮偉良等 .Visual C＋＋工程應(yīng)用與項(xiàng)目實(shí)踐 .機(jī)械工業(yè)出版社 ,2021。 [19]李楠等 .JSP工程應(yīng)用與項(xiàng)目實(shí)踐 .機(jī)械工業(yè)出版社 ,2021。 [20]李南南等 .ASP工程應(yīng)用與項(xiàng)目實(shí)踐 .機(jī)械工業(yè)出版社 ,2021。 [21]李俊民等 .Visual Basic 信息系統(tǒng)開發(fā)實(shí)例精選 .機(jī)械工業(yè)出版社 ,2021。 [22]李南南等 .ASP 信息系統(tǒng)開發(fā)實(shí)例精選 .機(jī)械工業(yè)出版社 ,2021。 [23]劉強(qiáng)等 .Delphi 信息系統(tǒng)開發(fā)實(shí)例精選 .機(jī)械工業(yè)出版社 ,2021。 [24]張雨等 .Visual foxpro 數(shù)據(jù)庫開發(fā)關(guān)鍵技術(shù)與 實(shí)例應(yīng)用 .人民郵電出版社 ,2021。 [25]張振坤等 .PoweBuilder 數(shù)據(jù)庫開發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用 .人民郵電出版社 ,2021。 [26]宋昆等 .Delphi 數(shù)據(jù)庫開發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用 .人民郵電出版社 ,2021。 [27]李艷等 .Visual basic 數(shù)據(jù)庫開發(fā)關(guān)鍵技術(shù)與實(shí)例應(yīng)用 .人民郵電出版社 ,2021。 [28]明日科技 .Visual C++ 管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析 .人民郵電出版社 ,2021。 [29]明日科技 .Visual Basic 管理信息系統(tǒng)完整項(xiàng)目實(shí)例剖析 .人民郵電出版社 ,2021。 [30]李嚴(yán)等 .SQL Server數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。 [31]高春燕等 . Access數(shù)據(jù)庫開發(fā)實(shí)例解析 .機(jī)械工業(yè)出版社 ,2021。