【正文】 m, which includes the design and linkage of the database and the implementation of every module. Finally gives a test of the system. Key words: Information management。 不同的企業(yè)具有不同的人事、工資管理制度，這就決定了不同的企業(yè)需要不同的人事工資管理系統(tǒng)。 （ 2） 完整、及時(shí)提供在管理及決策中需要的數(shù)據(jù)。 企業(yè)人事管理系統(tǒng)是一個(gè)現(xiàn)代化的企業(yè)在競(jìng)爭(zhēng)中立于不敗之地的必要部分，它能夠?yàn)椴樵內(nèi)耸滦畔⑻峁┏渥愕男畔⒑涂旖莸牟樵兪侄巍，F(xiàn)在人們?nèi)找嫔羁陶J(rèn)識(shí)到，把信息技術(shù)應(yīng)用與應(yīng)用環(huán)境分離是辦不到的。 企業(yè)人事管理是一 項(xiàng)瑣碎，繁雜而又非常細(xì)致的工作，一 般 是不允許發(fā)生差錯(cuò)的，它直接影響著勞動(dòng)者隊(duì)工作的積極性，是提高勞動(dòng)生產(chǎn)力，提高企業(yè)活力的基礎(chǔ)，在以往手工進(jìn)行的辦公工作中，需反復(fù)的進(jìn)行各種抄寫(xiě)，計(jì)算等工作，不僅花費(fèi)大量的時(shí)間，而且往往會(huì)出錯(cuò)。在初見(jiàn)端倪的信息化社會(huì)里，不能有 效使用計(jì)算機(jī)的單位和個(gè)人，無(wú)疑將在其個(gè)種活動(dòng)中面臨重重的障礙。 由此可見(jiàn)， 信息是維持生產(chǎn)活動(dòng)、經(jīng)濟(jì)活動(dòng)和社會(huì)活動(dòng)必不可少的基本資源，他是有價(jià)值，是構(gòu)成客觀世界的三大要素之一。企業(yè)人事信息管理系統(tǒng)是大中型企業(yè)單位不可缺少的工具 ,它的內(nèi)容對(duì)于企業(yè)的決策者和管理者來(lái)說(shuō)都至關(guān)重要 ,所 以企業(yè)人事信息管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。集人員、考勤、工資、員工培訓(xùn)、系統(tǒng)功能等于一體的大型管 理系統(tǒng)。幾十年前的那種手工操作已遠(yuǎn)遠(yuǎn)跟不上近代企業(yè)發(fā)展的步驟，時(shí)代的進(jìn)步?jīng)Q定了企業(yè)的發(fā)展，而企業(yè)要發(fā)展必然完善的管理體系，所以說(shuō)企業(yè)人事管理的自動(dòng)化完全是時(shí)代進(jìn)步的必然結(jié)果。 正如研究任何其它軟件項(xiàng)目一樣，我做的畢業(yè)設(shè)計(jì)也經(jīng)歷了從選題，調(diào)研，熟悉開(kāi)發(fā)環(huán)境，實(shí)驗(yàn)關(guān)鍵技術(shù)，查找類似的相關(guān) 系統(tǒng)的資料；系統(tǒng)需求分析，數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)，功能模塊開(kāi)發(fā)，功能模塊測(cè)試，系統(tǒng)調(diào)試和系統(tǒng)試運(yùn)行和修改。而事實(shí)證明： SQL 數(shù)據(jù)庫(kù)是一個(gè)廣泛使用、簡(jiǎn)單易用、性能價(jià)格比較高、工具完整而又豐富、界面友好、處理速度高的關(guān)系型數(shù)據(jù)庫(kù)。 從本人的實(shí)際情況看：因?yàn)樵谛Ｆ陂g也有學(xué)習(xí)過(guò)可視化的編程，對(duì)這一類的軟件的使用也有較深的認(rèn)識(shí)，所以說(shuō)選用 SQL Server 2020 作為開(kāi)發(fā)工具是很有優(yōu)勢(shì)的?？梢?jiàn)， VC++與 Delphi 是兩種較優(yōu)秀的語(yǔ)言開(kāi)發(fā)工具。它使用了 Microsoft Windows圖形用戶界面的許多先進(jìn)特性和設(shè)計(jì)思想 ， 采用了彈性可重復(fù)利用的完整的面向?qū)ο蟪绦蛘Z(yǔ)言(ObjectOriented Language)、當(dāng)今世界上最快的編 輯器、最為領(lǐng)先的數(shù)據(jù)庫(kù)技術(shù)。 (3)編譯器的速度和已編譯代碼的效率。 Delphi實(shí)際上是 Pascal語(yǔ)言的一種版本 ， 但它與傳統(tǒng) 的 Pascal語(yǔ)言有天壤之別。缺省的應(yīng)用程序是一個(gè)空白的窗體 (Form)，您可以運(yùn)行它，結(jié)果得到一個(gè)空白的窗口。您所需要做的，只是在程序中加入完成您所需功能的代碼而已。 SQL Server 2020簡(jiǎn)介 SQL Server 2020 繼承了數(shù)據(jù)庫(kù)軟件設(shè)計(jì)和引擎方面的優(yōu)勢(shì)，已經(jīng)成為新一代網(wǎng)絡(luò)應(yīng)用程序的最佳數(shù)據(jù)庫(kù)和分析解決方案之一。使用 SQL Server 2020 可以獲得非凡的可伸縮性和可靠性。 SQL Server 2020 包括加速?gòu)母拍畹阶詈蠼桓堕_(kāi)發(fā)過(guò)程的工具。 (3) 員工信息管理 模塊主要功能是新員工登記、應(yīng)聘登記、員工調(diào)動(dòng)、員工離職、考核管理、合同管理、應(yīng)聘信息瀏覽、員工信息瀏覽。 數(shù)據(jù)修改部分 : 主要修改員工信息 ,修改基本工資 ,人事調(diào)動(dòng)。數(shù)據(jù)庫(kù)的作用在于組織和表達(dá)信息，簡(jiǎn)而言之，數(shù)據(jù)庫(kù)就是信息的集合。創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)結(jié)構(gòu)的過(guò)程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。 圖 2 數(shù)據(jù)表樹(shù)形結(jié)構(gòu)圖 1． 考核表 考核表的作用是存入員工每個(gè)月的考核信息，考核表結(jié)構(gòu)如表 1 所示。 表 4 人事 表 字段名 數(shù)據(jù)類型 長(zhǎng)度 主鍵否 功能描述 bh Varchar 5 是 編號(hào) xm Varchar 10 姓名 xb Varchar 2 性別 sfzh Varchar 20 身份證號(hào) csny Datetime 8 出生年月 mz Varchar 20 民族 hyzk Varchar 4 婚姻狀況 zzmm Varchar 10 政治面貌 jg Varchar 50 籍貫 nxdh Varchar 20 聯(lián)系電話 sjhm Varchar 30 手機(jī)號(hào) 碼 dzyx Varchar 20 電子郵箱 jtdz Varchar 50 家庭地址 byyx Varchar 50 畢業(yè)院校 zy Varchar 20 專業(yè) whcd Varchar 10 文化程度 tc Varchar 50 特長(zhǎng) gzsj Datetime 8 參加工作時(shí)間 gn Int 4 工齡 zp Image 16 照片 ssbm Varchar 50 所屬部門 gz Varchar 10 工種 zw Varchar 10 職務(wù) zc Varchar 20 職稱 jbgz Float 8 基本工資 qtgz Float 8 其它工資 drsj Datetime 8 調(diào)入時(shí)間 jl Varchar 200 簡(jiǎn)歷 djrq Datetime 8 登記日期 各功能模塊的實(shí)現(xiàn) 數(shù)據(jù) 模塊設(shè)計(jì) 數(shù)據(jù)模塊窗體主要功能是統(tǒng)一管理數(shù)據(jù)庫(kù)訪問(wèn)組件， 在本系統(tǒng)中，這個(gè)模塊是最重要的模塊，其他模塊都要通過(guò)這個(gè)模塊中的組件訪問(wèn)數(shù)據(jù)庫(kù)，雖然只有簡(jiǎn)單的組件屬性設(shè)置， Delphi自動(dòng)生成代碼，但是不容有誤。 圖 4 數(shù)據(jù)連接對(duì)話框 （ 4）單擊【 Build】按鈕，在彈出的對(duì)話框中的“提供程序”選項(xiàng)卡中設(shè)置希望連接的數(shù)據(jù)，如圖 5 所示。 這里的每個(gè) TADOQuery組件連接一個(gè)數(shù)據(jù)表。主要是通過(guò)對(duì)數(shù)據(jù)表中的操作員信息表的查詢，判斷用戶輸入的密碼是否符合數(shù)據(jù)庫(kù)中的信息，如果符合則允許登錄；否則會(huì)有相應(yīng)的提示。 （ 3）在“ Standard”組件頁(yè)中點(diǎn)選“ TEdit”組件，添加到窗體上，設(shè)置 Ctl3D屬性為“ False”；設(shè)置 Text 屬性為空，設(shè)置 Edir2 的 PasswordChar 屬性為“ *”。 。 //使用 SQL語(yǔ)句檢索數(shù)據(jù)表中的用戶名和密碼 (39。b39。 這里將輸入的用戶名和密碼與操作員信息表中的操作員名稱和操作員密碼進(jìn)行比較，如果兩者相同才能進(jìn)入本系統(tǒng)。 （ 2）在窗體中添加“ TPanel”組件、“ TGroupBox”組件、“ TEdit”組件、“ TCombobox” 組件、“ TLabel”組件、“ TMaskEdit”組件、“ TMemo”組件、“ TBitbtn”組件、“ TImage”組件，設(shè)置屬性如表 5所示。 “保存”按鈕的功能主要是通過(guò) Insert 語(yǔ)句向數(shù)據(jù)庫(kù)中插入和添加數(shù)據(jù)，這段 Insert 語(yǔ)句如下： with do begin close。)。 begin if (39。) and (39。) and(39。) and (39。) and(39。) and (39。) and(39。) and (39。) and(39。) and (39。) and(39。) and (39。) and (39。) and (39。 在窗體的 OnShow 事件中添加如下代碼，用來(lái)向下拉列表框（ TCombobox）組件添加數(shù)據(jù)表中的數(shù)據(jù)， 為了避免下拉列表框中出現(xiàn)重復(fù)，這里用了 select distinct 語(yǔ)句，以民族為例。select distinct 民族 from 民族表 39。 while Not do //在不是最后一條記錄時(shí)進(jìn)行循環(huán) begin ((39。 //將指針指向下一條記錄 end。 這個(gè)功能實(shí)現(xiàn)，首先需要使用 select語(yǔ)句在人事表中找到最大的編號(hào)，實(shí)現(xiàn)如下： begin Close。)。 If (39。 如果不為空就需要分情況進(jìn)行處理，這里實(shí)現(xiàn)代碼如下： m:= Trim((39。//將 m的值從第 4位取 2位變?yōu)檎? if n9 then s:= s+39。+ InttoStr(n +1) else s:= s+InttoStr(n +1)。 圖 9 工資設(shè)置 模塊 此模塊主要用了以下的組件： “ TPanel”組件 、 “ TGroupBox”組件 、 “ TLabel”組件 、 “ TEdit”組件 、 “ TCombobox”組件 、 “ TCheckBox”組件 、 “ TBitBtn”組件 、 “ TDataSource”組件 、 “ TDBGrid”組件 ，其中 “ TDataSource”組件 、“ TDBGrid”組件 兩個(gè)組件是顯示數(shù)據(jù)庫(kù)中內(nèi)容的組件在運(yùn)行時(shí)是看不到的。 。 (39。 end。).Value。).Value) and (strtofloat()(39。).Value。 主窗體 設(shè)計(jì) 主窗體中主要控制方式 是通過(guò)菜單和工具欄按鈕來(lái)調(diào)用子窗體，它的背景區(qū)由一幅圖片填充。 。db_manpowerinfo39。39。39。數(shù)據(jù)備份成功 39。 except (39。,0+mb_iconinformation)。 (39。39。39。 Close。)。員工信息瀏覽模塊的運(yùn)行結(jié)果如圖 11所示。 var a,b:string。 (39。 end。 (39。 end。 subt:=(nil,a)。select distinct 部門名稱 from 部門表 39。 while Not do begin b:=(39。 (subt,b)。 在以上代碼中，主要運(yùn)用了 select distinct來(lái)保證名稱的唯一性，以及ADOquery組件的 Eof屬性返回?cái)?shù)據(jù)集的最后一條記錄， ADOquery組件的 Next屬性返回?cái)?shù)據(jù)集中當(dāng)前記錄的下一 條記錄，這樣就保證了對(duì)數(shù)據(jù)表中的所有行進(jìn)行查詢。 主要模塊測(cè)試 登錄 界面測(cè)試 完成了以上工作 ,一個(gè)人事管理系統(tǒng)就基本做成 ,下面就進(jìn)行必要的測(cè)試 ,首先是登錄界面 ,這是整個(gè)系統(tǒng)的開(kāi)始 ,所以比較重要。 工資設(shè)置 模塊測(cè)試 圖 15 工資設(shè)置測(cè)試 工資設(shè)置里面能對(duì)每一位員工的工資進(jìn)行設(shè)置，如果不勾設(shè)置保險(xiǎn)，那么該員工的保險(xiǎn)就默認(rèn)為 0，即不購(gòu)買保險(xiǎn)。最后完成各個(gè)前臺(tái)窗體的設(shè)計(jì)。 [2] 劉藝 . Delphi5 企業(yè)級(jí)解決方案及應(yīng)用剖析 [M].北京 :機(jī)械工藝出版社 ,2020。 [6] 飛思科研產(chǎn)品研發(fā)中心 .Delphi 數(shù)據(jù)庫(kù)應(yīng)用開(kāi)發(fā) [M].北京 :電子工業(yè)出版社 ,2020。 在做 畢業(yè)設(shè)計(jì)過(guò)程中曾遇到不少困難， 葉 老師 和曾老師 總是給我最耐心的指導(dǎo)，給我提出了許多寶貴的意見(jiàn)和建議，在此特別謝謝 葉 老師 和曾老師 給予我的幫助。 關(guān)于學(xué)位論文使用權(quán)和研究成果知識(shí)產(chǎn)權(quán)的說(shuō)明 本人完全了解成都信息工程學(xué)院有關(guān)保管使用學(xué)位論文的規(guī)定，其中包括： （ 1）學(xué)校有權(quán)保管并向有關(guān)部門遞交學(xué)位論文的原件與復(fù)印件。 （ 5）學(xué)?？梢怨紝W(xué)位論文的全部或部分內(nèi)容（保密學(xué)位論文在解密后遵守此規(guī)定）。s room. Then followed the worst wait of all. Mary said afterwards that he hummed and ha39。s bed. She looked so pink and wrinkled to me that I did not see how the inspector c ould have been quite sure about her. However, there was nothing obviously wrong with her, so she had got her certificate. Nobody could blame the inspector for that。 so far, nobody had thought of looking there for me. It was simply a matter of putting in half an hour or so. Normally the room was very convenient, though just at present its use required caution because the wattle wall between the rooms w as cracked and I had to move very cautiously on tiptoe lest my mother should hear me. On that particular day I was just thinking that I had allowed nearly en