【導(dǎo)讀】的方案等各方面的內(nèi)容。主要是讓使用者了解此系統(tǒng)，使他們能更好的運(yùn)用本系統(tǒng)，使此系統(tǒng)發(fā)揮出應(yīng)有的作用。的進(jìn)銷存過程進(jìn)行詳細(xì)的分析,實(shí)現(xiàn)了對(duì)超市的進(jìn)貨、銷售和庫存的科學(xué)管理。理和傳輸，這使得對(duì)數(shù)據(jù)庫的進(jìn)一步開發(fā)和利用顯得尤為迫切。作為國內(nèi)市場的一些中小超市，他們?cè)谛畔⒒^程中的步伐要落后大中型超市，就需要有高效的處理方式和管理方法，因此加快超市的電算化進(jìn)程是必不可少的。的生產(chǎn)資料，支付工資和其他費(fèi)用，繳納稅金并實(shí)現(xiàn)利潤。實(shí)習(xí)期間，我們通過對(duì)市場的調(diào)查，針對(duì)現(xiàn)在各中小超市對(duì)銷售業(yè)務(wù)的實(shí)際需要，在開發(fā)過程中，我們針對(duì)當(dāng)前各超市管理特點(diǎn)和技術(shù)人員。過程中，我們盡量采用一些易懂易讀的接口界面，使用戶可以在短期內(nèi)完全掌握。我們?cè)O(shè)計(jì)的系統(tǒng)在功能上極貼近中小超市的使用要求。統(tǒng)的正確性放在首位，力求數(shù)據(jù)的完整，處理的正確性。加速系統(tǒng)運(yùn)行和減少對(duì)系統(tǒng)資源的占用。作為一家中小型超市，他們的主要業(yè)務(wù)是

　　

【正文】 表 3：用戶表 字段名 數(shù)據(jù)類型 長度 (字節(jié) ) 備注 用戶名 文本 20 密碼 數(shù)字 8 表 4：銷售 表 字段名 數(shù)據(jù)類型 長度（字節(jié)） 備注 單據(jù)編號(hào) 文本 20 主鍵 商品編號(hào) 文本 20 單位 文本 8 單價(jià) 貨幣 16 數(shù)量 數(shù)字 16 金額 貨幣 16 銷售日期 日期 16 營業(yè)員 文本 20 外鍵 表 5：入庫 表 字段名 數(shù)據(jù)類型 長度（字節(jié)） 備注 入庫編號(hào) 文本 20 主鍵 商品編 號(hào) 文本 20 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 31 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 計(jì)量單位 文本 8 單價(jià) 貨幣 16 數(shù)量 數(shù)字 16 金額 貨幣 16 生產(chǎn)廠商 文本 50 外鍵 出廠日期 日期 16 倉管員 文本 20 外鍵 表 6：臨時(shí)銷售表 字段名 數(shù)據(jù)類型 長度（字節(jié)） 備注 單據(jù)編號(hào) 文本 20 主鍵 商品編號(hào) 文本 20 單位 文本 8 單價(jià) 貨幣 16 數(shù)量 數(shù)字 16 金額 貨幣 16 銷售日期 日期 16 營業(yè)員 文本 20 外鍵 表 7：商品表 字段名 數(shù)據(jù)類型 長度（字節(jié)） 備注 編號(hào) 自動(dòng)編號(hào) 主鍵 商品編號(hào) 文本 20 名稱 文本 40 品類 文本 20 包裝 文本 20 單位 文本 8 單價(jià) 貨幣 16 表 8：庫存表 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 32 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 字段名 數(shù)據(jù)類型 長度（字節(jié)） 備注 商品編號(hào) 文本 20 庫存數(shù)量 數(shù)字 40 庫存金額 貨幣 20 第七章 .系統(tǒng)運(yùn)行狀態(tài)與維護(hù)說明 ．系統(tǒng)運(yùn)行狀態(tài) ⑴ 啟動(dòng)系統(tǒng)，首先進(jìn)入的系統(tǒng)的登陸界面，在登陸管理模塊中，設(shè)置了用戶名和密碼兩個(gè)項(xiàng)來進(jìn)行系統(tǒng)登陸嚴(yán)證。本系統(tǒng)允許多用戶操作，在后臺(tái)數(shù)據(jù)庫中，設(shè)置了用戶表，進(jìn)行用戶的添加，刪除和修改，同時(shí)，為了用戶的合法性，對(duì)登陸進(jìn)行了次數(shù)限制，當(dāng)超過嘗試登陸次數(shù)后，系統(tǒng)將自動(dòng)關(guān)閉。只有當(dāng)用戶輸入了正確的用戶名和密碼后，才能登陸成功，彈出歡迎界面，點(diǎn)確定，進(jìn)入系統(tǒng)主界面。 ⑵ 進(jìn)入系統(tǒng)主界面之后，里面有 5 個(gè)功能模塊，每個(gè)模塊就是系 統(tǒng)的一個(gè)子功能，其下拉菜單有相應(yīng)的實(shí)現(xiàn)子模塊，點(diǎn)擊不同的菜單，就會(huì)出現(xiàn)不同的用戶界面，用戶畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 33 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 可以直接在上面輸數(shù)據(jù)，然后點(diǎn)確定按扭就可以進(jìn)行數(shù)據(jù)保存。 第八章 .系統(tǒng)主要用戶界面 本系統(tǒng)采用 Delphi 來進(jìn)行系統(tǒng)開發(fā)，在系統(tǒng)的界面處理中，采用分層是菜單對(duì)各個(gè)模塊進(jìn)行劃分，整個(gè)系統(tǒng)總分為 5 個(gè)模塊：進(jìn)貨管理模塊，銷售管理模塊，庫存管理模塊，員工管理模塊和系統(tǒng)管理模塊。其具體的用戶界面窗體如下所示： 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 34 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 第九章 .系統(tǒng)程序代碼 主界面 var mainfm: Tmainfm。 implementation uses gzyut, ryut, sput, rkut,csut, rkcxut, rkbbut, kcut, kccxut, kcbbut, spxsut,xscxut,xsbbut, loginut, xgmmut, gyut, cshut。 {$R *.dfm} procedure (Sender: TObject)。 begin 。 end。 procedure (Sender: TObject)。 begin gzyfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin czyfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin spfm:=(self)。 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 35 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 。 。 end。 procedure (Sender: TObject)。 begin rkfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin csfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin rkcxfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin rkbbfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 36 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ kcfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin kccxfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin kcbbfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin spxsfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin xscxfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 37 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ begin xsbbfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin if not logined then begin 。 logined:=true。 end。 end。 procedure (Sender: TObject)。 begin [2].Text:=datetimetostr(now())。 end。 procedure (Sender: TObject)。 begin xgmmfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin 。 end。 procedure (Sender: TObject)。 begin if messagedlg(39。確定退出嗎 ?39。,mtconfirmation,[mbyes,mbno],0)=mryes then 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 38 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 。 end。 procedure (Sender: TObject)。 begin gyfm:=(self)。 。 。 end。 procedure (Sender: TObject)。 begin winexec(PChar(39。39。),SW_SHOWNORMAL)。 end。 procedure (Sender: TObject)。 begin cshfm:=(self)。 。 。 end。 end. 入庫操作源代碼 var rkfm: Trkfm。 implementation uses sput。 {$R *.dfm} procedure (Sender: TObject)。 畢業(yè)設(shè)計(jì)（論文） 共 48 頁 第 39 頁 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ 裝 ┊ ┊ ┊ ┊ ┊ 訂 ┊ ┊ ┊ ┊ ┊ 線 ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ ┊ begin close。 end。 procedure (Sender: TObject)。 begin //條件判斷 if (=39。39。) or (=39。39。) then begin showmessage(39。請(qǐng)輸入完整信息 !39。)。 exit。 end。 with adoquery do begin close。 。 (39。select * from 商品表 where 商品編號(hào) =39。++39。39。)。 open。 if recordcount1 then begin showmessage(39。不存