【正文】 這次的課程設(shè)計讓我懂得了更多的數(shù)據(jù)庫與 Delphi 語言知識，也讓我領(lǐng)會到了程序設(shè)計中需要了解和注意的東西，這對我以后的課程設(shè)計有非常重要的 意義，也為以后的課程設(shè)計打好基礎(chǔ)。在完成大任務(wù)時，模塊的設(shè)計是最重要的 ，不但要注意模塊的分解層次、大小，還要注意到模塊之間關(guān)系力求簡單每個模塊只完成一個相對獨(dú)立特定的功能，而且各個模塊之間的數(shù)據(jù)存在局部化，保證它的獨(dú)特性。 就這一次課程設(shè)計來說，我們從編譯與目標(biāo)代碼運(yùn)行效率上及各個程序庫之間的語言設(shè)計上領(lǐng)悟到了數(shù)據(jù)庫課程設(shè)計與軟件開發(fā)之間的密切聯(lián)系。 27 參考文獻(xiàn) [1] 王珊 .數(shù)據(jù)庫系統(tǒng)概論 [M].高等教育出版社 .2021年 5月，第四版； [2] 劉瑞新 . Delphi數(shù)據(jù)庫程序設(shè)計教程 [M].機(jī)械工業(yè)出版社 .2021年 1月。本系統(tǒng)采用當(dāng)前流行的 SQl server2021 和Delphi 7 來完成整個系統(tǒng)的設(shè)計 。 26 結(jié) 論 本系 統(tǒng)是一個面向 餐飲業(yè)的系統(tǒng) ， 是 具有一定實(shí)用性的數(shù)據(jù)庫信息管理系統(tǒng)。系統(tǒng)設(shè)置操作界面比較友好，符合編程人員的日常使用習(xí)慣。測試結(jié)論如下： 1． 軟件功能較齊全。 2．測試用例 序號 測試子項(xiàng) 輸入 /動作 期望輸出 /相應(yīng) 實(shí)際情況 1 會員基本信息查詢 在 按 編號 查詢 欄輸入‘ 1’點(diǎn)確定按鈕 彈出對話框‘該編號 不 存在 √ 2 會員生日查詢 在 按 編號 查詢 輸入‘ HY1001’ ，點(diǎn)確定 按鈕 輸出‘ 1101’ √ 3 折扣設(shè)定 在積分欄輸入積分‘ 200’ 輸出‘ ’ √ 系統(tǒng)管理 測試 功能測試就是對 系統(tǒng)設(shè)置 進(jìn)行驗(yàn)證，根據(jù)功 能測試用例，逐項(xiàng)測試，檢查是否達(dá)到用戶要求的功能。 2． 測試用例 序號 測試子項(xiàng) 輸入 /動作 期望輸出 /相應(yīng) 實(shí)際情況 1 輸入正確用戶名 輸入 admin √ √ 2 輸入錯誤用戶名 輸入 131 用戶名錯誤，重新輸入 √ 3 輸入正確密碼 輸入 001 √ √ 4 輸入錯誤密碼 輸入 3423 密碼輸入 錯誤 √ √ 完全滿足要求 Ο 基本滿足 要求不滿足要求 基本信 息維護(hù) 測試 功能測試就是對 本基本信息維護(hù) 進(jìn)行驗(yàn)證，根據(jù)功能測試用例，逐項(xiàng)測試，檢查是否達(dá)到用戶要求的功能。,2,8) 24 第五章 系統(tǒng)測 試 人工測 試（功能測試）。,39。,39。,50,80) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(24,39。,39。,39。,3,8) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(23,39。,39。,39。,3,7) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(22,39。,39。,39。,3,7) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(21,39。,39。,39。,3,6) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(20,39。,39。,39。,2,5) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(19,39。,39。,39。,15,28) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(18,39。,39。,39。,12,25) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(17,39。,39。,39。,12,25) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(16,39。,39。,39。,5,15) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(15,39。,39。,39。,18,55) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(14,39。,39。,39。,8,16) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(13,39。,39。,39。,10,22) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(12,39。,39。,39。,24,48) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(11,39。,39。,39。,5,15) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(10,39。,39。,39。,20,45) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(9,39。,39。,39。,12,28) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(8,39。,39。,39。,10,40) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(7,39。,39。,39。,10,38) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(6,39。,39。,39。,15,40) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(5,39。,39。,39。,5,15) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(4,39。,39。,39。,4,10) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(3,39。,39。,39。,5,16) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(2,39。,39。,39。 模擬運(yùn)行數(shù)據(jù) insert into foodtype( fno,ftype,fname,fnum,fp1,fp2) values(1,39。 end。,MB_OK+MB_ICONERROR)。,39。 except (39。提示 39。數(shù)據(jù)庫恢復(fù)成功 !39。 end。 。)。 (39。 。)。+quotedstr()+39。 23 (39。 。)。 (39。//這個 connection 連接的是 master 數(shù)據(jù)庫 。,mtconfirmation,[mbyes,mbno],0)=mryes then begin try with DataModule2 do begin 。 if messagedlg(39。 Exit。,mtInformation,[mbYes],0)。 then begin MessageDlg(13+10+39。 begin if Trim()=39。 數(shù)據(jù)還原 procedure (Sender: TObject)。 end。數(shù)據(jù)庫備份失?。?39。,mtInformation,[mbYes],0)。//執(zhí)行備份 MessageDlg(13+10+39。)。+quotedstr()+39。 DataModule2 .(39。 end else 22 DataModule2 .。 。請選擇數(shù)據(jù)庫備份路徑！ 39。39。 數(shù)據(jù)備份 procedure (Sender: TObject)。 。 :=39。 :=39。 :=39。 :=39。 :=39。 :=39。 :=39。 end。)。 end else begin showmessage(39。 end。 with do begin Close。 Open。 DataModule2. 。添加菜品成功 39。 。 。fbeizhu39。).AsString:= 。 DataModule2. (39。fp139。).AsString:=。 (39。fname39。).AsString:=。 (39。fno39。 。確實(shí)要增加該菜品？ 39。 end。 Next 。 Exit。該名稱已經(jīng)存在 ,添加失?。?39。fname39。 with DataModule2 .ADOQuery1 do begin First。 end。 end。 t:=1。該編號已經(jīng)存在 ,不能重復(fù)添加！ 39。fno39。 with DataModule2 .ADOQuery1 do begin First。 t:=1。請輸入銷售價 39。39。 t:=1。請輸入成本價 39。39。 t:=1。請輸入菜存數(shù)量 39。39。 t:=1。請輸入菜名稱 39。39。 t:=1。請輸入菜類型 39。39。 t:=1。請輸入編號 39。39。 var t:integer。 是 否 是 否 否 開始 輸入菜品信息 菜品信息是否輸入完整