【正文】 ，對(duì)不同部門的員工進(jìn)行瀏覽，選擇需要修改的員工信息，進(jìn)行修改。為了使各項(xiàng)信息編輯方便，在該模塊使用了 pageControl 控件，結(jié)合幾種查詢引導(dǎo)方式的使用，能夠很清楚的把基本檔案、工作經(jīng)歷、社會(huì)關(guān)系、獎(jiǎng)懲記錄、培訓(xùn)經(jīng)歷顯示出來。TabSheet 活躍才能對(duì)該頁(yè)面進(jìn)行修改添加操作，選取其中一頁(yè)的代碼實(shí)現(xiàn)如下：// 確定修改，添加procedure (Sender: TObject)。var bEdtState: Boolean。 sText: string。begin bEdtState := False。39 //基本信息 TabSheet1 活躍代表要對(duì)基本信息表操作 if = 0 then begin if = Date then begin showmessage(39。出生日期不合法！39。)。 Exit。 end。 if Trim() = 39。39。 then begin showmessage(39。姓名不能為空！39。)。 Exit。 end。 //:=datetostr(date)。 := Date。 if In [dsEdit ,dsInsert] then begin (39。姓名39。).AsString := Trim()。 (39。性別39。).AsString := Trim()。 (39?；橐鰻顩r39。).AsString :=Trim()。 (39。部門39。).AsString := Trim()。 (39。學(xué)歷39。).AsString := Trim()。 (39。出 生 日 期 39。).AsDateTime := 。 (39。錄用時(shí)間39。).AsDateTime := 。 (39。起止時(shí)間39。).AsString := 40Trim()。 (39。更新時(shí)間39。).AsDateTime := 。 。 end。 end else begin if In [dsEdit, dsInsert] then begin bEdtState := True。 (39。員工編號(hào)39。).AsString:=[0].AsString。 end。 end。其他代碼略167。 部門管理模塊的實(shí)現(xiàn)該模塊能夠清晰的將部門組織結(jié)構(gòu)、詳細(xì)信息展示給用戶，同時(shí)支持部門組織結(jié)構(gòu)的更改。在這個(gè)模塊中也使用了 treeview 控件來展示組織結(jié)構(gòu)關(guān)系。并且基于組織結(jié)構(gòu)關(guān)系來進(jìn)行部門的添加，其中包括同級(jí)部門添加和子部門的添加。代碼實(shí)現(xiàn)如下：//選擇增加同級(jí)部門 procedure (Sender: TObject)。var sLevel, sParent,S: string。begin S := Trim()。 :=true。41 :=true。 :=false。 :=false。 :=false。 :=false。 sLevel := 39。039。 sParent := 39。100039。 pnum := 1000。 snum := 1000。 if then begin if 0 then begin sLevel := Trim((39。層次39。).AsString)。 sParent := Trim((39。父編號(hào)39。).AsString)。 。 if StrtoInt(sLevel) = 0 then := 39。Select Max(編號(hào)) as 編號(hào) From 部門信息 Where 層次 =39。 + QuotedStr(sLevel) else := 39。Select Max(編號(hào)) as 編號(hào) From 部門信息 Where 層次 =39。 + QuotedStr(sLevel) + 39。 and 父編號(hào) = 39。 + QuotedStr(sParent)。 。 //記錄當(dāng)前的部門的父編號(hào)，也就是新增子部門的上級(jí)編號(hào) pnum:= (39。編號(hào)39。).AsInteger。 //由父部門的最大子號(hào) 以及層次信息，生成新增子部門的編號(hào) snum:=strtoint(temptable[pnum,2])。 ItemLevel:=(39。層次39。).AsInteger。42 snum:=snum+strtoint(floattostr(intpower(10,3ItemLevel)))。 if StrtoInt(sLevel) = 0 then pnum := snum。 end end else begin 。 。 := 39。Select * From 部門信息 Where 編號(hào) like 39。39。XXX39。39。39。 。 end。 。 其他代碼略。167。 考勤管理模塊的實(shí)現(xiàn)該模塊提供了基于員工號(hào),姓名和時(shí)間范圍的查詢。這個(gè)窗體使用了 dbgrid 、dateTimepicker 控件，為了考勤信息條理清楚并便于查看，該窗體同樣使用了pageControl 這個(gè)控件，其代碼實(shí)現(xiàn)略167。 招聘信息模塊的實(shí)現(xiàn)該模塊主要是進(jìn)行招聘信息和應(yīng)聘信息的編輯，在這個(gè)模塊作者使用兩個(gè)radioButton 控件，用于對(duì)兩種信息編輯狀態(tài)的選擇。由于應(yīng)聘信息是基于招聘信息進(jìn)行編輯，所以作者使用了兩個(gè) Dbgrid 控件，首先要通過選擇招聘信息，才能對(duì)相應(yīng)的應(yīng)聘信息進(jìn)行編輯。167。 其他模塊的實(shí)現(xiàn)這個(gè)模塊是實(shí)現(xiàn)登錄用戶對(duì)自己密碼的修改，功能比較簡(jiǎn)單，代碼略。43該模塊主要是該系統(tǒng)基本情況的提示。代碼略。44第五章 系統(tǒng)測(cè)試167。 測(cè)試目的 在軟件生命周期的每個(gè)階段都不可避免的會(huì)引入新的錯(cuò)誤。如果在軟件投入生產(chǎn)性運(yùn)行之前，沒有發(fā)現(xiàn)并糾正軟件中的大部分差錯(cuò)，則這些差錯(cuò)遲早會(huì)在生產(chǎn)過程中暴露出來，那時(shí)不僅糾正這些錯(cuò)誤的代價(jià)更高，而且往往會(huì)造成很惡劣的后果。測(cè)試的目的就是在軟件投入生產(chǎn)性運(yùn)行之前，盡可能多的發(fā)現(xiàn)軟件中的錯(cuò)誤。167。 測(cè)試方法本課題所采用的測(cè)試方法是黑盒測(cè)試，及實(shí)在程序接口進(jìn)行的測(cè)試，它只檢查程序功能是否按照規(guī)格說明書的規(guī)定正常使用，黑盒測(cè)試也稱功能測(cè)試或數(shù)據(jù)驅(qū)動(dòng)測(cè)試，它是在已知產(chǎn)品所應(yīng)具有的功能，通過測(cè)試來檢測(cè)每個(gè)功能是否都能正常使用，在測(cè)試時(shí)，把程序看作一個(gè)不能打開的黑盆子，在完全不考慮程序內(nèi)部結(jié)構(gòu)和內(nèi)部特性的情況下，測(cè)試者在程序接口進(jìn)行測(cè)試，它只檢查程序功能是否按照需求規(guī)格說明書的規(guī)定正常使用，程序是否能適當(dāng)?shù)亟邮蛰斎霐?shù)鋸而產(chǎn)生正確的輸出信息，并且保持外部信息（如數(shù)據(jù)庫(kù)或文件）的完整性。黑盒測(cè)試方法主要有等價(jià)類劃分、邊值分析、因果圖、錯(cuò)誤推測(cè)等，主要用于軟件確認(rèn)測(cè)試。 “黑盒”法著眼于程序外部結(jié)構(gòu)、不考慮內(nèi)部邏輯結(jié)構(gòu)、針對(duì)軟件界面和軟件功能進(jìn)行測(cè)試。 “黑盒”法是窮舉輸入測(cè)試，只有把所有可能的輸入都作為測(cè)試情況使用，才能以這種方法查出程序中所有的錯(cuò)誤。實(shí)際上測(cè)試情況有無(wú)窮多個(gè)，人們不僅要測(cè)試所有合法的輸入，而且還要對(duì)那些不合法但是可能的輸入進(jìn)行測(cè)試。167。 測(cè)試設(shè)計(jì)本課題所采用的設(shè)計(jì)技術(shù)是適用于黑盒測(cè)試的邊界值分析和等價(jià)劃分相結(jié)合的策略。使用邊界值分析方法設(shè)計(jì)測(cè)試方案首先應(yīng)該確定邊界情況，通常輸入等價(jià)類和輸出等價(jià)類的邊界，選取的測(cè)試數(shù)據(jù)應(yīng)該剛好等于、剛好小于和剛剛大于邊界值。等價(jià)劃分法首先需要?jiǎng)澐州斎霐?shù)據(jù)的有效等價(jià)類和無(wú)效等價(jià)類。在確定輸入數(shù)據(jù)的等價(jià)類時(shí)常常還需要分析輸出數(shù)據(jù)的等價(jià)類，以便根據(jù)輸出數(shù)據(jù)的等價(jià)類導(dǎo)出對(duì)應(yīng)的輸入數(shù)據(jù)等價(jià)類。經(jīng)驗(yàn)表明，用這種方法設(shè)計(jì)出的測(cè)試方案暴露程序錯(cuò)誤的能力最強(qiáng)。必要時(shí)用等價(jià)劃分法補(bǔ)充測(cè)試方案。以考勤管理功能模塊中“考勤時(shí)間”為例設(shè)計(jì)測(cè)試用例，實(shí)現(xiàn)如下：45 所示：輸入數(shù)據(jù) 有效等價(jià)類 無(wú)效等價(jià)類銷售日期⑴4 位數(shù)字字符‘’1 位或 2 位數(shù)字字符‘’1 位或 2 位數(shù)字字符（如：2022516）⑵有非數(shù)字字符⑶年份少于 4 個(gè)數(shù)字字符⑷年份多于 4 個(gè)數(shù)字字符⑸月份少于 1 個(gè)數(shù)字字符⑹月份多于 2 個(gè)數(shù)字字符⑺天日少于 1 個(gè)數(shù)字字符⑻天日多于 2 個(gè)數(shù)字字符⑼無(wú)‘’符號(hào)年份對(duì)應(yīng)數(shù)值 ⑽正常年份 ⑾錯(cuò)誤年份月份對(duì)應(yīng)數(shù)值 ⑿在 1～12 之間⒀等于‘0’⒁大于‘12’天日對(duì)應(yīng)數(shù)值 ⒂在 1～31 之間⒃等于‘0’⒄大于‘31’表 “考勤時(shí)間”的等價(jià)分類表 所示：測(cè)試數(shù)據(jù) 期望結(jié)果 測(cè)試范圍2022516 輸入有效 ⑴、⑽、⑿、⒂表 有效等價(jià)類的測(cè)試用例46 所示：測(cè)試數(shù)據(jù) 期望結(jié)果 測(cè)試范圍2022S16 輸入無(wú)效 ⑵004516 輸入無(wú)效 ⑶20224516 輸入無(wú)效 ⑷2022—16 輸入無(wú)效 ⑸202255516 輸入無(wú)效 ⑹20225 輸入無(wú)效 ⑺20225166 輸入無(wú)效 ⑻2022516 輸入無(wú)效 ⑼0000516 輸入無(wú)效 ⑾2022016 輸入無(wú)效 ⒀20221516 輸入無(wú)效 ⒁202250 輸入無(wú)效 ⒃2022536 輸入無(wú)效 ⒄表 無(wú)效等價(jià)類的測(cè)試用例47167。 系統(tǒng)各模塊的功能測(cè)試各個(gè)模塊中具有代表性的功能測(cè)試結(jié)果如表 所示：編號(hào) 測(cè)試說明 期望結(jié)果 實(shí)際結(jié)果 成功/失敗1 測(cè)試員工信息添加是否成功。員工信息成功寫入數(shù)據(jù)庫(kù)。數(shù)據(jù)庫(kù)中可以找到新添加記錄。成功2 測(cè)試部門信息添加。部門信息成功寫入數(shù)據(jù)庫(kù)。數(shù)據(jù)庫(kù)中可以找到新添加記錄。成功3 測(cè)試考勤信息查詢。查詢出期望結(jié)果。按考勤時(shí)間查詢失敗。修改后成功4 測(cè)試考勤信息。 將員工考勤情況寫入數(shù)據(jù)庫(kù)中考勤信息。考勤信息成功寫入數(shù)據(jù)庫(kù)。成功5 測(cè)試招聘信息添加。招聘信息成功寫入數(shù)據(jù)庫(kù)。數(shù)據(jù)庫(kù)中可以找到新添加記錄。成功表 功能測(cè)試結(jié)果表167。 測(cè)試結(jié)論作者對(duì)此系統(tǒng)的功能、性能，以及可用性均進(jìn)行了測(cè)試，通過對(duì)測(cè)試結(jié)果的分析總結(jié)得出：此系統(tǒng)的功能基本滿足用戶需求，性能基本達(dá)到需求，具有可用性和友好性。48但是測(cè)試用例有一定的局限性，測(cè)試環(huán)境和實(shí)際運(yùn)行環(huán)境也存在著一定的差異，所以不能完全地、準(zhǔn)確地測(cè)試出系統(tǒng)存在的問題，還需要在后期的維護(hù)過程中，對(duì)系統(tǒng)暴露出來的問題進(jìn)行糾正和更新。49結(jié)束語(yǔ)整個(gè)畢業(yè)設(shè)計(jì)到現(xiàn)在已經(jīng)基本結(jié)束，總的來說整個(gè)畢業(yè)設(shè)計(jì)進(jìn)展還是很順利的。Delphi 的友好的可視化編程環(huán)境為程序的編寫提供方便。這次畢業(yè)設(shè)計(jì)，讓我充分的把這幾年所學(xué)到的專業(yè)知識(shí)融會(huì)貫通，從做需求分析、設(shè)計(jì)數(shù)據(jù)庫(kù)、到系統(tǒng)整體設(shè)計(jì)和具體的代碼實(shí)現(xiàn)。整個(gè)設(shè)計(jì)，讓我學(xué)到了許多以前在課堂上面學(xué)不到的知識(shí)，很大程度的加強(qiáng)了自己的實(shí)踐能力。除了對(duì) delphi 有了一定的認(rèn)識(shí)，還了解到了 VB、VC 的相關(guān)特性，對(duì)數(shù)據(jù)庫(kù)的理解也更加全面和深刻了。在系統(tǒng)的不斷完善過程中，我還學(xué)到了程序調(diào)試的一些寶貴方法和技巧。相信這次的經(jīng)驗(yàn)對(duì)于我以后的工作會(huì)大有益處。同時(shí)在設(shè)計(jì)過程中，我也發(fā)現(xiàn)了自己的不足，因?yàn)槭鞘状芜M(jìn)行這樣的課題開發(fā)，在代碼的實(shí)現(xiàn)上略現(xiàn)笨拙，整個(gè)程序在架構(gòu)上也算不上完美，我相信通過今后的學(xué)習(xí)和實(shí)踐，自己在開發(fā)能力一定能夠得到大大的提高。50參考文獻(xiàn)[1] [J],計(jì)算機(jī)與現(xiàn)代化2022年第3期，總第6期[2] 莫停飛、白振興、[J]現(xiàn)代電子技術(shù)，2022年第9期總第176期