【文章內容簡介】 。 end。 4． 商品基本信息編輯模塊： 圖 36 商品基本信息編輯窗體 此窗體可對商品基本信息進行添加、修改等管理操作。信息保存到商品基本信息表中。通過商品編號、商品名稱、商品簡稱、保質期、規(guī)格、進價等詳細地記 錄下商品基本信息，精確到供應商名稱與價格之間的對應聯(lián)系等。在備注一欄內可注明各商品的具體情況。在這里可以添加新的商品基本信息和修改已有商品信息。 商品庫存管理模塊 商品庫存管理模塊分為商品入庫信息模塊、商品入庫信息編輯模塊、商品出庫信息模塊、商品出庫信息編輯模塊、商品庫存查詢模塊。在此可對商品的入庫和出庫信息進行查看、添加、保存和刪除等編輯操作，入庫和出庫的信息非常詳細，可編輯其供應商和商品相關指數，還有入 /出庫編號、入 /出庫時間 第 15 頁 共 25頁 及經手人等。還可按商品名稱進行查詢和查看全部庫存。 1． 商品入庫信息模塊： 圖 37 商品入庫信息主窗體 此窗體顯示商品入庫信息表中的內容，包括入庫編號、供應商編號、供應商名稱、商品名稱、商品規(guī)格、商品單位、商品數量、商品單價等商品入庫信息?？蓪ζ溥M行刪除和編輯操作。商品出庫信息模塊與此模塊相似，可對出庫編號、供應商相關信息、商品相關信息等商品出庫信息進行查看、編輯和刪除操作。 “刪除”按鈕的事件代碼為： procedure (Sender: TObject)。 begin if =0 then //判斷數據庫內是否有記錄 begin (39。 已無記錄可刪除 !39。,39。 提示39。,0+MB_ICONINFORMATION)。 exit。 end。 if then exit。 if ID_YES=(39。 確實要刪除這條記錄嗎？ 39。,39。提示39。,MB_YESNO) then begin 。 end。 end。 第 16 頁 共 25頁 2． 商品入庫信息編輯模塊： 圖 38 商品入庫信息編輯窗體 在此窗體可對商品入庫信息進行添加、保存等，添加新信息是保存在商品入庫信息表中的。這里沒有了商品基本信息編輯窗體中的“修改”按鈕，是為了不能被倉儲管理員或者其它職員隨意改動入庫記錄信息，防止任何個人行為帶給公司、企業(yè)經濟損失和管理障礙。如果在添加完成后，發(fā)現(xiàn)錯誤信息，可對其進行刪除，再重新添加整個入庫記錄信息。通過供應商編號和名稱及商品名稱，與入庫日期和經手人最終落實到每一次入庫記錄。商品出庫信息編輯模塊與此模 塊相似，可對商品出庫信息進行添加、保存等操作。 供應商編號下拉顯示的代碼為： procedure (Sender: TObject)。 var i:integer。 begin //將數據庫內的供應商編號顯示在 ComboBox1 中 。 with do begin 。 := 39。select DISTINCT 供應商編 號 from 商品基本信息 39。 Close。 Active := False。 第 17 頁 共 25頁 prepared := False。 prepared := True。 Active := True。 if (recordcount 0) then first。 for i := 0 to recordcount 1 do begin (FieldByName(39。供應商編號 39。).asstring)。 next。 end。 。 。 。 。 。 end。 end。 3． 商品庫存查詢模塊： 圖 39 商品庫存查詢窗體 在此窗體，可對商品庫存進行查詢?？赏ㄟ^商品名稱查詢，也可查看全部庫存，通過 DBGrid 組件顯示出來。用戶可查看到查詢到的商品名稱、商品單位、商品規(guī)格、商品單價、商品數量等信息，這些信息都是存放在數據庫中的庫 存表中的。 第 18 頁 共 25頁 “查詢”按鈕的點擊事件代碼為： procedure (Sender: TObject)。 begin if 39。39。 then //通過商品名稱進行模糊查詢 begin with do begin Close。 。 :=39。Select * from 庫存表 where 商品名稱 like39。+39+39。%39。+trim()+39。%39。+39。 Open。 :=。 end。 end。 end。 “全部庫存”的點擊事件代碼為： procedure (Sender: TObject)。 begin 。 //查詢數據庫內所有數據 with do begin Close。 。 (39。Select * from 庫存表 39。)。 Open。 end。 :=。 end。 密碼管理模塊 在此模塊中可對用戶密碼進行修改。 第 19 頁 共 25頁 圖 310 密碼修改窗體 在此窗體可修改密碼。首先鍵入要修改密碼的用戶名，再輸入正確的原密碼，再自定義新密碼以及確認。如果用戶名與原密碼不正確，修改不能成功；如果新密碼與確認密碼不一致，修改也不能成 功。這里的密碼修改，只能是成功登錄后才能進行的操作。當倉儲管理員不在計算機前工作時，本系統(tǒng)又嘗未退出，若有人想更改管理員的密碼，在沒有原密碼的情況下，是不能成功的。這就有效的防止了他人惡意更改用戶密碼，給系統(tǒng)、公司、企業(yè)帶來損失。 判斷 Edit 組件是否為空的代碼為： if (=39。39。) then begin (39。 用戶名稱不能為空！ 39。,39。 提示信息39。,0+MB_ICONINFORMATION)。 exit。 end。 刷新數據表內 容的代碼為： With DO //刷新數據表內容 begin Close。 。 (39。update 用戶表 Set 用戶名稱 =:用戶名稱 1,39。)。 (39。密碼 =:密碼 1 Where 用戶編號 =:用戶編號 139。)。 [0].Value:=。 [1].Value:=。 [2].Value:=(39。 用 戶 編 號39。).AsString。 Prepared:=true。 ExecSQL。 第 20 頁 共 25頁 end。 系統(tǒng)主要文件明細： 表 31 系統(tǒng)主要文件明細表 文件名 文件類型 說明 窗體文件 主窗體 窗體文件 供應商基本信息主窗體 窗體文件 供應商基本信息編輯窗體 窗體文件 商品基本信息主窗體 窗體文件 商品基本信息編輯窗體 窗體文件 商品入庫信息主窗體 窗體文件 商品入庫信息編輯窗體 窗體文件 商品出庫信息主窗體 窗體文件 商品出庫信息編輯窗體 窗體文件 商品庫存查詢窗體 窗體文件 密碼修改設置窗體 窗體文件 數據備份窗體 窗體文件 數據恢復窗體 窗體文 件 啟動窗體 窗體文件 登錄窗體 窗體文件 數據模塊窗體 窗體文件 關于窗體 工程文件 可執(zhí)行文件 數據模塊 UDM 內部組件明細： 表 32 數據模塊明細表 組件名 組件類型 連接至 ADOConn ADOConnection 數據庫 QUSER ADOQuery ADOConn QGYSXX ADOQuery ADOConn QSPXX ADOQuery ADOConn QSPRKXX ADOQuery ADOConn QSPCKXX ADOQuery ADOConn QKCB ADOQuery ADOConn DSOUSER ADODataSet ADOConn 用戶表 第 21 頁 共 25頁 DSOGYSXX ADODataSet ADOConn 供應商基本信息 DSOSPXX ADODataSet ADOConn 商品基本信息 DSOSPRKXX ADODataSet ADOConn 商品入庫信息 DSOSPCKXX ADODataSet ADOConn 商品出庫信息 DSOKCB ADODataSet ADOConn 庫存表 DataSource1 DataSource DSOGYSXX DataSource2 DataSource DSOSPXX DataSource3 DataSource DSOSPRKXX DataSource4 DataSource DSOSPCKXX DataSource5 DataSource QKCB 4 系統(tǒng) 測試 軟件測試是為了發(fā)現(xiàn)錯誤而執(zhí)行程序的過程?；蛘哒f，軟件測試是根據軟件開發(fā)各階段的規(guī)格說明和程序內部結構而精心設計的一批測試用例（即輸入數據及預期的輸出結 果），并利用這些測試用例去運行程序，以發(fā)現(xiàn)程序錯誤的過程。 下圖為軟件測試的信息流： 測試環(huán)境 表 41 測試環(huán)境 客戶端 服務器端 PC PC 處理器 處理器 Windows XP SP2 系統(tǒng) Windows 2021 Server 系統(tǒng) 256MB 內存 512MB 內存 80G 硬盤 80G 硬盤 測試 軟件配置 結果 分析 測試結果 排錯 改正的 軟件 預期結果 可靠性 分析 預測的 可靠性 錯誤 出錯率 數據 測試配置 測試工具 圖 41 軟件測試信息流 第 22 頁 共 25頁 測試過程 系統(tǒng)測試主要采用了以下兩種測試方法進行了測試。 1． 單元測試 單元測試也稱模塊測試、邏輯測試、結構測試，以路徑覆 蓋為最佳測試準則。在編碼中采用白盒法進行測試。配置測試環(huán)境，設計驅動模塊和樁模塊為輔助測試模塊；編寫測試數據；進行多個單元的并行測試。 2． 組裝測試 組裝測試也稱綜合、集成測試，分為增式和非增式組裝測試。 增式組裝測試：在單元測試基礎上，采用自頂向下或自底向上逐層安裝測試，直到最后安裝測試完畢。本系統(tǒng)組裝測試采用的本方法。 測試結果 系統(tǒng)運行正常，所有窗體均能正常打開，按鈕點擊正常響應，添加、刪除、修改、查詢、取消等編輯操作能夠實現(xiàn)，組件基本完全正常。系統(tǒng)運行流暢，實現(xiàn)了預期功能。 發(fā)現(xiàn)部分 Bug， Bug1：第 一次運行時出現(xiàn)了有些窗體不能打開的問題，查出的原因是數據庫表中商品單價的字段類型輸入錯誤，應為 Float 型。 Bug2：Edit 組件內不能鍵入內容，已通過修改其屬性值為 Enable 等操作，修復此 Bug。 結 論 通過本次課題的需求分析，可以看出倉儲管理系統(tǒng)在當今信息時代是不可缺少的一個重要部分。工廠、企業(yè)、商店等都需要對大量的商品、貨物進行管理，人工記賬這種落后的手段，已遠遠不能滿足現(xiàn)在的管理需求，只有作為計算機信息管理系統(tǒng)的物流管理系統(tǒng) —— 倉儲管理子系統(tǒng)才能勝任這一重要角色。 根據需求分析，設計開 發(fā)了一個好的倉儲管理系統(tǒng)，系統(tǒng)實現(xiàn)了商品信息添加、查詢留言等功能。該系統(tǒng)，提高工廠生產效率、加快企業(yè)發(fā)展、促進商店經營等的根本措施。 由于知識和個人能力的限制，本系統(tǒng)實現(xiàn)的功能較為簡單，還有不完善的地方，還有待繼續(xù)完善。 參考文獻 [1] 宋坤 ,鄒天思 .Delphi 數據庫系統(tǒng)開發(fā)完全手冊 [M].北京：人民郵電出版社 ,2021。 [2] 方睿 ,刁仁宏 ,吳四九 .網絡數據庫原理及應用 [M].四川：四川大學出版社 ,2021。 第 23 頁 共 25頁 [3] , 數據庫開發(fā) [M].北京：清華大學出版社 ,2021。 [4] 王珊 ,陳紅 .數據庫系統(tǒng)原理教程 [M].北京：清華大學出版社 ,2021。 [5] 王晟 ,萬科 . Delphi 數據庫開發(fā)經典案例解析 [M].北京： 清華大學出版社 ,2021。 [6] 劉敬 ,嚴冬明 .Delphi 住宿餐飲管理系統(tǒng)開發(fā)實例導航 [M].北京：人民郵電出版社 ,2021。 [7] 陳豫龍 ,何旭洪 .Delphi6數據庫系統(tǒng)開發(fā)實例導航 [M].北京：人民郵電出版社 ,2021。 第 24 頁 共