【正文】 時(shí)必須立足于這些實(shí)際情況。 開(kāi)發(fā)工具經(jīng)過(guò)分析，我使用 Borland公司的DELPHI 7軟件開(kāi)發(fā)工具，利用其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具，尤其是對(duì)數(shù)據(jù)窗口這一能方便而簡(jiǎn)潔操縱，能在短時(shí)間內(nèi)建立系統(tǒng)應(yīng)用原型，然后，對(duì)初始原型系統(tǒng)進(jìn)行需求迭代，不斷修正和改進(jìn)，直到形成用戶滿意的可行系統(tǒng)。從某種程度上來(lái)說(shuō)，符合公司實(shí)際情況的人力資源管理系統(tǒng)能有效地輔助決策者處理好這些問(wèn)題。好的人力資源管理軟件還應(yīng)該是管理技術(shù)與信息技術(shù)、西方管理思想與東方文化之間的完美融合，在消化吸收先進(jìn)的人力資源管理理念的基礎(chǔ)上，可以在軟件中解釋人力資源管理的全部?jī)?nèi)容與業(yè)務(wù)流程，從而使得EHR可以被用來(lái)定義HR部門(mén)的工作內(nèi)容，優(yōu)化和規(guī)范其業(yè)務(wù)流程，使其成為企業(yè)人力資源部門(mén)信息化、職業(yè)化、個(gè)性化的管理平臺(tái)。使得企業(yè)各部分的數(shù)據(jù)保持一致的同時(shí)，能夠及時(shí)的了解企業(yè)的最新動(dòng)態(tài)信息。3 系統(tǒng)分析 系統(tǒng)業(yè)務(wù)需求通過(guò)調(diào)查，要求系統(tǒng)需要有以下功能；（1）由于操作人員的計(jì)算機(jī)知識(shí)普遍較差，要求系統(tǒng)良好的人機(jī)操作界面。（5）企業(yè)員工人事管理。（9）企業(yè)招聘、應(yīng)聘信息，招聘、應(yīng)聘人員信息的全面管理。 系統(tǒng)功能分析（1）用戶登陸主要是用戶通過(guò)登錄進(jìn)入管理頁(yè)面進(jìn)行合法的操作。設(shè)置崗位，是為每個(gè)在職員工的崗位屬性定義，劃分部門(mén)的崗位性質(zhì)，界定工作范圍。錄入內(nèi)容包括培訓(xùn)計(jì)劃的申請(qǐng)、員工培訓(xùn)的申報(bào)、外送培訓(xùn)的審批等。（3） 第三階段設(shè)計(jì)任務(wù)是數(shù)據(jù)庫(kù)的物理設(shè)計(jì)，確定表的結(jié)構(gòu)，建立數(shù)據(jù)庫(kù)模型。（4） 表單設(shè)計(jì)過(guò)程中的標(biāo)簽、文本框、編輯框、復(fù)選框、列表框、微調(diào)控件、綁定、表格、圖像、計(jì)時(shí)器、頁(yè)框、形狀、容器、選項(xiàng)按鈕級(jí)、命令按鈕及命令按鈕組的屬性的確定。邏輯模型規(guī)范化及總E－R圖描述如下：?jiǎn)T工檔案（流水號(hào)、姓名、身份證號(hào)、出生日期、年齡、性別、政治面貌、聯(lián)系地址、聯(lián)系電話、視力身高等）員工屬性（崗位代碼、崗位名稱、職務(wù)代碼、職務(wù)名稱、部門(mén)代碼、部門(mén)名稱）人才庫(kù)（家庭成員、教育經(jīng)歷、工作經(jīng)歷等） 數(shù)據(jù)庫(kù)物理設(shè)計(jì)數(shù)據(jù)庫(kù)的物理設(shè)計(jì)將完成數(shù)據(jù)邏輯模型向數(shù)據(jù)物理模型的轉(zhuǎn)換。其中的數(shù)據(jù)結(jié)構(gòu)、位數(shù)及取值范圍等體現(xiàn)在具體的數(shù)據(jù)設(shè)計(jì)中。{$R *.res}var hMutex: THandle。 // 使用互斥對(duì)象 if GetLastError = ERROR_ALREADY_EXISTS then begin ReleaseMutex(hMutex)。 Exit。 shortdateformat := 39。 (Tfrm_main, frm_main)。 組織機(jī)構(gòu)及崗位管理（1） 組織機(jī)構(gòu)定義【主要功能】提供系統(tǒng)的組織架構(gòu)設(shè)置，完成系統(tǒng)的初始架構(gòu)定義及修改。對(duì)項(xiàng)名屬性屬性值Image1照片顯示TComboBox1政治面貌Items清白中共黨員共青團(tuán)員預(yù)備黨員群眾其它TComboBox2籍貫Items福建省龍巖市福建省福州市福建省廈門(mén)市福建省莆田市福建省泉州市福建省南平市福建省漳州市TComboBox3婚姻狀況Items未婚已婚離異TDateTimePick日期選擇Tbitbtn1Caption增加Tbitbtn2Caption修改Tbitbtn3Caption取消Tbitbtn4Caption完成Tbitbtn5Caption面試預(yù)約Tbitbtn6Caption入職審批Tbitbtn7Caption打印Tbitbtn8Caption退出（3） 面試預(yù)約【主要功能】提供招聘人員的應(yīng)聘第二階段面試，包含面試人員、面試時(shí)間等資料錄入窗口。對(duì)項(xiàng)名屬性屬性值Tbitbtn1Caption增加Tbitbtn2Caption修改Tbitbtn3Caption保存Tbitbtn4Caption取消Tbitbtn5Caption刪除Tbitbtn6Caption退出（3） 外送培訓(xùn)審批表【主要功能】提供在職人員外送審批申請(qǐng)等工作的查詢、增加、修改、保存等窗口，并對(duì)在職人員培訓(xùn)內(nèi)容、培訓(xùn)目的等進(jìn)行存儲(chǔ)。對(duì)項(xiàng)名屬性屬性值Tbitbtn1Caption保存Tbitbtn2Caption離開(kāi)Tbitbtn3Caption檢查（3） 提醒設(shè)置【主要功能】提供軟件針對(duì)操作人員的工作性質(zhì)進(jìn)行提醒的設(shè)置等窗口。在測(cè)試過(guò)程中，不僅選擇正確的數(shù)據(jù)，還要錄入假定錯(cuò)誤的數(shù)據(jù)，并對(duì)系統(tǒng)的數(shù)據(jù)進(jìn)行核對(duì)，填寫(xiě)系統(tǒng)運(yùn)行日志，整理成文檔資料，以便于今后系統(tǒng)的維護(hù)。同時(shí),使我明白無(wú)論做什么事情，一定要堅(jiān)持，在完成的過(guò)程當(dāng)中一定會(huì)有很多困難,但是只要你堅(jiān)持,逐一去解決,那么一定會(huì)走向成功的!致謝首先要感謝我的指導(dǎo)老師 老師、 老師、 老師，從畢業(yè)設(shè)計(jì)的選題，到收集材料，還后期的整理等階段都給予我很多幫助。我愿在未來(lái)的學(xué)習(xí)和工作過(guò)程中，以更加豐厚的成果來(lái)答謝曾經(jīng)關(guān)心、幫助和支持過(guò)我的所有領(lǐng)導(dǎo)、老師、同學(xué)、同事和朋友。還原數(shù)據(jù)庫(kù)DATE 目錄下的sumpo_ehr文件。首先，執(zhí)行“BDE”中的“管理工具”中的“Object”項(xiàng)目，選擇“NEW”選項(xiàng)卡，下拉菜單“Database Driver Name”選擇“MSSQL”，單擊“OK”按鈕。begin := true。end。begin //版本判斷 vExeFile := UpperCase(39。 if UpperCase(ExtractFileName()) vExeFile then begin Showmessage(39。)。 := 39。39。39。 + vExeFile + 39。 + 39。DOWNFLAG39。NAMEE39。NAMEE39。NAMEE39。 := false。 (39。 := true。請(qǐng)與管理員聯(lián)系！39。 := false。)。 。 czyxm := 39。 czyksbh := 39。 czygwmc := 39。 xt_gs := 39。) and (trim() 39。 then begin with do begin close。)。 (39。 if = 0 then begin showmessage(39。 exit。 czylsh := (39。czymm39。).AsString。 czyksbh := (39。ksmc39。).AsString。 case strtoint(czyqx) of 0: xt_gs := copy((39。ksbh39。).AsString,1,6)。 4: xt_gs := copy((39。 end。 (39。czybm39。).AsString := trim()。)。czyxm39。).AsString。 czybm := (39。zwmc39。).AsString。 czygwmc := (39。qx39。).AsString,1,2)。 2: xt_gs := copy((39。ksbh39。).AsString,1,8)。 end。 。 then begin close。39?！巴顺觥卑粹o的onClick事件代碼procedure (Sender: TObject)。end。 := false。 end。系統(tǒng)登錄39。 if trim(czylsh) 39。輸入[員工號(hào)][呢稱]或[密碼]不正確！將退出！39。 end。 4: xt_gs := copy((39。).AsString,1,6)。ksbh39。 case strtoint(czyqx) of 0: xt_gs := copy((39。).AsString。ksmc39。 czyksbh := (39。).AsString。czymm39。 czylsh := (39。 exit。 if = 0 then begin showmessage(39。 (39。)。 end else begin with do begin close。).AsString,1,8)。ksbh39。 2: xt_gs := copy((39。).AsString,1,2)。qx39。 czygwmc := (39。).AsString。zwmc39。 czybm := (39。).AsString。czyxm39。)。).AsString := trim()。czylsh39。 (39。) then begin if = 39。 if (trim() 39。 czyqx := 39。 czyksmc := 39。 czyzwmc := 39。 czylsh := 39。 39。 Showmessage(39。 。39。).AsString := 39。39。 。 39。FVer39。139。 := true。39。39。 + vExeFile + 39。 + 39。 end。 + vExeFile + 39。)。var vExeFile, vDownFile: string。true39。在選擇卡建立后，填寫(xiě)DATABASENAME指向sumpo_ehr，Server Name指向本地計(jì)算機(jī)名“ .” ，User Name填寫(xiě)“sa” 。密碼：123 。2002[5]《SQL Server數(shù)據(jù)庫(kù)開(kāi)發(fā)經(jīng)典案例解析》，清華大學(xué)出版社，2006年 [6]《SQL SERVER 2000開(kāi)發(fā)與應(yīng)用》，機(jī)械工業(yè)出版社，2003年7月[7] 王學(xué)慶．Delphi 6數(shù)據(jù)庫(kù)設(shè)計(jì)實(shí)例導(dǎo)航．北京：科學(xué)出版社．2003[8] 付軍．Delphi7實(shí)例編程100例．北京