【正文】 九、 參考資料 [1] 劉瑞新、汪遠征、李鳳華 編著 《 DELPHI程序設(shè)計教程》 機械工業(yè)出版社 2020年 1月第一版 [2] 侯太平、童愛紅 編著，張琦 主審 《 DELPHI數(shù)據(jù)庫編程》 清華大學(xué)出版社 北京交通大學(xué)出版社 2020年 10月第二次 [3] 文斌 劉長青 田原 編著 《軟件工程與軟。 :=inttostr()。)。39。++39。39。+39。 (39。)。 (39。 畢業(yè)論文 第 69 頁 共 74 頁 close?？們r格 39。 open。39。%39。%39。39。like 39。 ([])。select sum(商品數(shù)量 *商品單價 ) as 總價格 from 銷售信息 where39。 。 :=inttostr()。).Value:=datetostr(ate)。 (39。A39。)。 (39。and39。)。39。++39。39。+39。 (39。)。 (39。 close?？們r格 39。 open。B39。A39。)。 (39。and39。)。39。++39。39。+39。 (39。)。 (39。 end else with do begin if =true then begin close。 :=inttostr()。)。39。++39。39。+39。 (39。)。 (39。 close?？們r格 39。 open。39。%39。%39。39。like 39。 ([])。select sum(商品數(shù)量 *商品單價 ) as 總價格 from 銷售信息 where39。 。 :=inttostr()。).Value:=datetostr(ate)。 (39。A39。)。 (39。and39。)。39。++39。39。+39。 (39。)。 (39。 close?？們r格 39。 open。B39。A39。)。 (39。and39。)。39。++39。39。+39。 (39。)。 (39。 begin if =true then with do begin if =true then begin close。 end。關(guān)鍵字重復(fù) ,添加失敗 !39。 end。)。 (39。 close。).Value:=。 (39。a1139。).Value:=strtofloat()。 (39。a939。a839。).Value:=。 (39。a639。).Value:=。 (39。a439。).Value:=。 (39。a239。).Value:=。 (39。values(:a1,:a2,:a3,:a4,:a5,:a6,:a7,:a8,:a9,:a10,:a11,:a12)39。)。 (39。 begin try with do begin close。 end。)。 except begin showmessage(39。 end。 post。備注信息 39。).AsString:=。 FieldByName(39。商品規(guī)格 39。).AsString:=。 FieldByName(39。商品編號 39。) else begin with do begin Insert。) then showmessage(39。)or(=39。)or(=39。)or(=39。 begin try if (=39。 end。關(guān)鍵字已存在 ,添加失敗 !39。 end。 refresh。).AsString:=。 FieldByName(39。 FieldByName（ 所在地區(qū) 39。 FieldByName(所在城市 39。 FieldByName(公司主頁 39。 FieldByName(公司地址 39。 畢業(yè)論文 第 64 頁 共 74 頁 FieldByName(公司名稱 39。 FieldByName(傳真號碼 39。 FieldByName(郵政編碼 39。 FieldByName(電話號碼 39。 FieldByNam（聯(lián)系人名 39。 FieldByName(顧客編號 39。Data is not enough!39。39。39。39。39。39。39。 （二） 顧客信息管理 procedure (Sender: TObject)。 end。)。 except begin showmessage(39。 end。 post。 FieldByName備注信 息 39。所在地區(qū) 39。).AsString:=。 FieldByName(39。公司主頁 39。).AsString:=。 畢業(yè)論文 第 63 頁 共 74 頁 FieldByName(39。公 司名稱 39。).AsString:=。 FieldByName(39。郵政編碼 39。).AsString:=。 FieldByName(39。聯(lián)系人姓名 39。).AsString:=。 FieldByName(39。Data is not enough!39。39。 八 ． 程序代碼 （一） 供應(yīng)商信息管理 procedure (Sender: TObject)。要執(zhí)行精確查詢，只需選擇查詢條件并輸入查詢值即可。要執(zhí)行精確查詢，只需選擇查詢條件并輸入查詢值即可，點打印可以打印自己查詢的記錄。點修改按扭可以修改有錯誤的銷售信息，點刪除可以刪除沒有的銷售信息。點修改按扭可以修改有錯誤的進貨信息，點刪除可以刪除沒有的進貨信息。點修改按扭可以修改有錯誤的商品信息，點刪除可以刪除沒有的商品信息。點修改按扭可以修改有錯誤的顧客信息，點刪除可以刪除沒有的顧客信息。點修改按扭可以修改有錯誤的供應(yīng)商信息，點刪除可以刪除沒有的供應(yīng)商信息。再輸入密碼（二次）若一致提示注冊成功，否則提示注冊失敗。 （二） 運行環(huán)境 1． 硬設(shè)備 （ 1） 服務(wù)器端硬件要求： 以上， 128MB RAM ， 20GB 客戶端硬件要求： PIII 以上 PC 機， 64MB RAM 5GB (2) 輸出、輸入設(shè)備：打印機 2． 支持軟件 （ 1） 服務(wù)器軟件環(huán)境：操作系統(tǒng)：采用 WINDOWS Server 2020/2020 客戶端軟件環(huán)境：操作系統(tǒng)： Windows2020/XP， （推薦使用 ） （ 2） 數(shù)據(jù)庫： SQL SERVER 2020 （四） 使用規(guī)程 (1) 啟動程序 畢業(yè)論文 第 54 頁 共 74 頁 圖 （ 2） 點擊“進入系統(tǒng)“，顯示登陸界面（點”退出“，將退出系統(tǒng)） 圖 （ 3） 輸入用戶 名與密碼，輸入錯誤，系統(tǒng)提示： 圖 畢業(yè)論文 第 55 頁 共 74 頁 輸入正確進入系統(tǒng)主界面： 圖 在本窗體用戶可以根據(jù)自己的需求選擇不同的菜單，并可以進入相應(yīng)的窗體。 用戶管理功能允許用戶對密碼進行修改，注冊新用戶，管理員還可以對特別用戶授予相應(yīng)權(quán)限。前者可以方便快捷地查詢具有相同性質(zhì)的記錄；后者允許用戶構(gòu)造各種組合重要重要條件來處理所需信息。 數(shù)據(jù)修改功能允許用戶對他所指定的記錄進 行修改。 數(shù)據(jù)添加功能提供便捷的錄入界面，通過應(yīng)用程序?qū)⒃紨?shù)據(jù)追加到數(shù)據(jù)庫中。根據(jù)商業(yè)方面的特點和要求 MYGSGLXT系統(tǒng)還具有數(shù)據(jù)導(dǎo)入和導(dǎo)出和友好方便的用戶界面等功能。 ? Web 動態(tài)連接設(shè)置：可以連接 inter。 在客戶端訪問服務(wù)器上的圖書系統(tǒng)， 不間斷的訪問關(guān)閉； ? 輸出： 界面測試：應(yīng)該是一直彈出對應(yīng)的界面； 允許在連續(xù)點擊時候緩沖甚至占用 最初的 3 分鐘是可以達到對應(yīng)界面的反應(yīng)，最后無響應(yīng)； 亂點擊界面的按扭記錄應(yīng)該有對應(yīng)的反應(yīng) 彈出所對應(yīng)的窗體并且可以重疊； 但是窗體不能關(guān)閉并且不能使用所以窗體連接有錯誤。 所使用的自動化測試工具 ： 名稱 簡介 測試員 QuickTest Pro 8 企業(yè)級軟件功能性自動化測試工具 WinRunner C/S、 B/S 架構(gòu)下功能性自動化測試工具 Rational 白盒測試工具 （二） 測試目的和任務(wù) 測試系統(tǒng)的兼容性和系統(tǒng)的數(shù)據(jù)庫連接，界面測試等等。設(shè)計出分布式多層應(yīng)用的貿(mào)易公司信息管理系統(tǒng)。實現(xiàn)與應(yīng)用程序服務(wù)器快速而準(zhǔn)確的連接。 （ 2） 分析模型 畢業(yè)論文 第 28 頁 共 74 頁 該模塊的功能用例實現(xiàn)如下： 圖 各個用例的時序圖如下 ： 供應(yīng)商信息更新： 圖 供應(yīng)商信息查詢： 畢業(yè)論文 第 29 頁 共 74 頁 圖 供應(yīng)商信息統(tǒng)計： 圖 B．顧客基本信息管理： 該模塊的功能用例實現(xiàn)如下： 圖 各個用例的時序圖如下： 畢業(yè)論文 第 30 頁 共 74 頁 顧客信息更新： 圖 顧客信息查詢： 圖 顧客信息統(tǒng)計： 圖 C．商品基本信息管理： 畢業(yè)論文 第 31 頁 共 74 頁 該模塊的功能用例實現(xiàn)如下： 圖 各個用例的時序圖如下： 商品信息更新： 圖 商品信息查詢： 圖 商品信息統(tǒng)計： 畢業(yè)論文 第 32 頁 共 74 頁 圖 圖 進貨信息查詢 圖 畢業(yè)論文 第 33 頁 共 74 頁 進貨信息統(tǒng)計 圖 各個用例的時序圖如下： 銷售信息更新 圖 畢業(yè)論文 第 34 頁 共 74 頁 圖 （二） 數(shù)據(jù)庫設(shè)計說明書 1． 外部設(shè)計 （ 1） 標(biāo)識符的狀態(tài) 序號 代碼 名稱 描述 1 MYGSMS Access 貿(mào)易公司信息管理數(shù)據(jù)庫 Acess2020 2 MYGSMS SQL 貿(mào)易公司信息管理數(shù)據(jù)庫 SQL Server 2020 3 GYSXX 供應(yīng)商基本信息表 記錄 供應(yīng)商信息的表 4 GKXX 顧客信息表 記錄顧客信息的表 5 SPXX 商品信息表 記錄商品信息的表 6 JHXX 進貨信息表 記錄進貨信息的表 7 XSXX 銷售信息表 記錄銷售信息的表 8 ZXX 組信息表 記錄用戶信息 9 YHXX 用戶信息表 記錄使用本軟件用戶 畢業(yè)論文 第 35 頁 共 74 頁 的信息 表 （ 2） 使用的程序 模塊 1 模塊 2 模塊 3 模塊 4 模塊 5 模塊 6 模塊 7 表名 用戶登錄 系統(tǒng)主