【正文】 水落在泥地上，一砸一個(gè)坑，吸飽了水分的泥土，癱軟得像新鮮的牛糞，踏上去又軟又滑，能陷腿好幾寸深，拔出來時(shí)又黏又緊，每走一步即要防止滑倒，又要防止鞋被扯掉，五人走得踉踉蹌蹌，就像五個(gè)醉漢。如同開賽的發(fā)令槍，隨著這一聲驚天雷響，天為之變?? 當(dāng)?shù)谝坏嗡槁涞?，就像發(fā)起了沖鋒的號(hào)角，它身后跟著的千萬同胞，從那被撕裂的天幕傾盆而下，前后不過一分鐘，無處不在的水，已經(jīng) 占據(jù)了整片叢林。 “哦，是杰克啊，你來我的房間干什么？” 小胖子杰克，和布萊恩同歲，可能是同病相憐的原因，杰克是亡靈系僅有的幾個(gè)，對(duì)布萊恩比較好的人。 如果韓碩沒有表現(xiàn)的這么癡傻，恐怕除了莉莎之外，還要遭受這三個(gè)女生怒火。 “白癡，看什么看，說，你褲子里面為什么裝石塊？把本小姐的美腳都給踢紫了！唔唔??好痛。 只不過一會(huì)兒之后，韓碩突然發(fā)現(xiàn)一件奇妙的事情，他身體內(nèi)的一絲魔元，這個(gè)時(shí)候正好游走到臀部，在魔元流動(dòng)過的地方，莉莎的腳踢在上面，臀部感覺不哪么痛了。 因?yàn)榉籽壑樽?，韓碩已經(jīng)看不到莉莎，等到一聲魂飛魄散的大叫之后，韓碩表情越來越恐怖的時(shí)候，突然再也沒有聽到莉莎的聲音。 代表人物： 比蒙國王的儀仗隊(duì)：強(qiáng)大的護(hù)衛(wèi)，數(shù)量極為稀少。 ＶＥＲＹ強(qiáng)壯。 特殊技能：星空倒影雙修結(jié)界：海族的女海神安菲特里忒的最高祝福，可以幻化出元素人魚抵擋攻擊。 以前雖然有別的種族有異族通婚，并產(chǎn)生后代，但從來沒有誕生過如此強(qiáng)大，如此有統(tǒng)治力的新后代，這個(gè)例子徹底把長老們難住了。 這種事情就好比一個(gè) 人類男性娶了一個(gè)雌性食人魔一樣荒誕。 （ 4）學(xué)校可允許學(xué)位論文被查閱或借閱。 致 謝 本文是在 葉立軒 老師和曾令明老師 的熱情關(guān)心和指導(dǎo)下完成的。 參考文獻(xiàn) [1] 李林 . 實(shí)例解析 [M].北京 :高等教育出版社 ,1997。 所得稅 模塊測(cè)試 在菜單中，選擇“信息設(shè)置” “所得稅設(shè)置”，進(jìn)入所得稅設(shè)置界面，如圖 14 所示： 圖 14 所得稅設(shè)置測(cè)試 這里可以設(shè)置工資在那個(gè)段屬于什么級(jí)別，應(yīng)該交納的所得稅率，當(dāng)設(shè)置完成之后就能操作保存和取消按扭了，沒有完成設(shè)置是不 能對(duì)他們進(jìn)行操作的。 end。 end。).Value。 。 。 員工信息瀏覽 模塊設(shè)計(jì) 可以通過瀏覽模塊查看員工的詳細(xì)信息，還可以修改和刪除信息，并通過條件查詢來查看某人的信息。 ExecSQL。39。數(shù)據(jù)庫備份 39。 (39。39。 為了防止數(shù)據(jù)庫被破壞，或者用戶的修改不合理需要還原，所以這里設(shè)置了數(shù)據(jù)庫備份和數(shù)據(jù)庫恢復(fù)，主要原理是將數(shù)據(jù)庫文件拷貝另外的磁盤，這里運(yùn)用了 sql的 BACKUP DATABASE語句和 restore database語句，數(shù)據(jù)庫備份由以下的代碼完成： begin close。級(jí)別號(hào) 39。xm39。)。工資設(shè)置模塊運(yùn)行結(jié)果如圖 9 所示。 n:= StrToInt(copy(m,4,2)) 。 當(dāng)然，如果是第一次添加新員工，返回值為空時(shí)，編號(hào)就由 001開始編排。人為的編號(hào)也難免會(huì)出錯(cuò)，所以在這里我們?cè)O(shè)置單擊“添加”按鈕自動(dòng)生成員工編號(hào)。 end。 end。39。39。39。39。39。39。 這部分判斷輸入是否為空的實(shí)現(xiàn)如下： procedure (Sender: TObject)。_ Image Additional Align Stretch alClient Ture 此模塊調(diào)用數(shù)據(jù)模塊中的 ADOquery 組件連接數(shù)據(jù)庫中的人事表。 end。)。 （ 2）在“ Additional”組件頁中點(diǎn) 選“ TImage”組件，添加到窗體上，設(shè)置Align 屬性為“ alClient”； Stretch 屬性為“ Tree”，在 Pictuer 屬性中添加圖片。 （ 7）在窗體上添加 TADOQuery組件，設(shè)置 Connection為 “ ADOConnection1”。 表 3 工資 表 字段名 數(shù)據(jù)類型 長度 主鍵否 功能描述 ssyf varchar 15 所屬工資月份 bh varchar 5 是 員工編號(hào) ygxm varchar 10 員工姓名 Jbgz Float 8 基本工資 jbf Float 8 加班費(fèi) qqj Float 8 全勤獎(jiǎng) zwjt Float 8 職務(wù)津貼 qtje Float 8 其它金額 kgf Float 8 曠工費(fèi) ylbx Float 8 養(yǎng)老保險(xiǎn) sybx Float 8 失業(yè)保險(xiǎn) ylbx Float 8 醫(yī)療保險(xiǎn) qtke Float 8 其它扣額 yfgz Float 8 應(yīng)發(fā)工資 ykgz Float 8 應(yīng)扣工資 sfgz Float 8 實(shí)發(fā)工資 bz varchar 50 備注 4． 人事表 人事表用來存放員工的詳細(xì)信息，人事表結(jié)構(gòu)如表 4 所示。 創(chuàng)建任何一個(gè)數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫，設(shè)計(jì)必須是靈活的、有邏輯的。根據(jù)這個(gè)系統(tǒng)所要實(shí)現(xiàn)的目的和任務(wù)，總結(jié)出這個(gè)系統(tǒng)最終要實(shí)現(xiàn)的主要功能如下： 數(shù)據(jù)設(shè)置部分：主要包括考勤錄入功能。 SQL Server 2021 是 Microsoft． NET Enterprise Server 的數(shù)據(jù)管理與分析中樞。 Delphi把 Windows編程的回調(diào)、句柄處理等過程都放在一個(gè)不可見的 Romulam覆蓋物下面，這樣您可以不為它們所困擾 ，輕松從容地對(duì)可視部件進(jìn)行編程。您的工作只是在“ 骨架 ” 中加入您的程序。 (2)面向?qū)ο缶幊痰母拍睢I(yè)界有一句很經(jīng)典的話：真正的程序員用 VC++，而聰明的程序員用 Delphi。其中，基于微型計(jì)算機(jī)的數(shù)據(jù)庫系統(tǒng)是應(yīng)用最廣泛、實(shí)用性最強(qiáng)的一種計(jì)算機(jī)技術(shù)。企業(yè)人事管理可以說是一項(xiàng)瑣碎、繁雜而又必須十分細(xì)致的工作，是不能允許 時(shí)常發(fā)生差錯(cuò)的。隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，計(jì)算機(jī)在企業(yè)管理中應(yīng)用的普及，利用計(jì)算機(jī)實(shí)現(xiàn)企業(yè)人事管理勢(shì)在必行。 時(shí)至今日，計(jì)算機(jī)正在令人難以置信的速度步入普通人的學(xué)習(xí)、工作和生活。這是長期以來困惑人們的一大問題。管理信息系統(tǒng)是企業(yè)的信息系統(tǒng)，它具備數(shù)據(jù)處理、計(jì)劃、控制、預(yù)測(cè)和輔助決策功能，具體作用如下： （ 1） 用統(tǒng)一標(biāo)準(zhǔn)處理和提供信息，排除使用前后矛盾的不完整的數(shù)據(jù)。 Thirdly, analyses the demand of the system, gives a specific design project and a database model。 畢業(yè)設(shè)計(jì) ( 論文 ) 基于 Delphi 的公司人事管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) 論文作者姓名： 申請(qǐng)學(xué)位專業(yè)： 申請(qǐng)學(xué)位類別： 指導(dǎo)教師姓名（職稱）： 論文提交日期： 基于 Delphi 的公司人事管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) 摘 要 隨著信息科學(xué)技術(shù)的飛速發(fā)展，人們逐漸意識(shí)到對(duì)信息管理軟件的運(yùn)用可以使日常工作更加方便、快捷和高效。 Then shows the implementation of the whole system, 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。 （ 2） 完整、及時(shí)提供在管理及決策中需要的數(shù)據(jù)?，F(xiàn)在人們?nèi)找嫔羁陶J(rèn)識(shí)到，把信息技術(shù)應(yīng)用與應(yīng)用環(huán)境分離是辦不到的。在初見端倪的信息化社會(huì)里，不能有 效使用計(jì)算機(jī)的單位和個(gè)人，無疑將在其個(gè)種活動(dòng)中面臨重重的障礙。企業(yè)人事信息管理系統(tǒng)是大中型企業(yè)單位不可缺少的工具 ,它的內(nèi)容對(duì)于企業(yè)的決策者和管理者來說都至關(guān)重要 ,所 以企業(yè)人事信息管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。幾十年前的那種手工操作已遠(yuǎn)遠(yuǎn)跟不上近代企業(yè)發(fā)展的步驟，時(shí)代的進(jìn)步?jīng)Q定了企業(yè)的發(fā)展，而企業(yè)要發(fā)展必然完善的管理體系，所以說企業(yè)人事管理的自動(dòng)化完全是時(shí)代進(jìn)步的必然結(jié)果。而事實(shí)證明： SQL 數(shù)據(jù)庫是一個(gè)廣泛使用、簡單易用、性能價(jià)格比較高、工具完整而又豐富、界面友好、處理速度高的關(guān)系型數(shù)據(jù)庫?？梢?， VC++與 Delphi 是兩種較優(yōu)秀的語言開發(fā)工具。 (3)編譯器的速度和已編譯代碼的效率。缺省的應(yīng)用程序是一個(gè)空白的窗體 (Form)，您可以運(yùn)行它，結(jié)果得到一個(gè)空白的窗口。 SQL Server 2021簡介 SQL Server 2021 繼承了數(shù)據(jù)庫軟件設(shè)計(jì)和引擎方面的優(yōu)勢(shì)，已經(jīng)成為新一代網(wǎng)絡(luò)應(yīng)用程序的最佳數(shù)據(jù)庫和分析解決方案之一。 SQL Server 2021 包括加速從概念到最后交付開發(fā)過程的工具。 數(shù)據(jù)修改部分 : 主要修改員工信息 ,修改基本工資 ,人事調(diào)動(dòng)。創(chuàng)建一個(gè)數(shù)據(jù)庫結(jié)構(gòu)的過程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。 表 4 人事 表 字段名 數(shù)據(jù)類型 長度 主鍵否 功能描述 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 特長 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 簡歷 djrq Datetime 8 登記日期 各功能模塊的實(shí)現(xiàn) 數(shù)據(jù) 模塊設(shè)計(jì) 數(shù)據(jù)模塊窗體主要功能是統(tǒng)一管理數(shù)據(jù)庫訪問組件， 在本系統(tǒng)中，這個(gè)模塊是最重要的模塊，其他模塊都要通過這個(gè)模塊中的組件訪問數(shù)據(jù)庫，雖然只有簡單的組件屬性設(shè)置， Delphi自動(dòng)生成代碼，但是不容有誤。 這里的每個(gè) TADOQuery組件連接一個(gè)數(shù)據(jù)表。 （ 3）在“ Standard”組件頁中點(diǎn)選“ TEdit”組件，添加到窗體上，設(shè)置 Ctl3D屬性為“ False”；設(shè)置 Text 屬性為空，設(shè)置 Edir2 的 PasswordChar 屬性為“ *”。 //使用 SQL語句檢索數(shù)據(jù)表中的用戶名和密碼 (39。 這里將輸入的用戶名和密碼與操作員信息表中的操作員名稱和操作員密碼進(jìn)行比較，如果兩者相同才能進(jìn)入本系統(tǒng)。 “保存”按鈕的功能主要是通過 Insert 語句向數(shù)據(jù)庫中插入和添加數(shù)據(jù)， 這段 Insert 語句如下： with do begin close。 begin if (39。) and(39。) and(39。) and(39。) and(39。) and(39。) and (39。 在窗體的 OnShow 事件中添加如下代碼，用來向下拉列表框（ TCombobox）組件添加數(shù)據(jù)表中的數(shù)據(jù)， 為了避免下拉列表框中出現(xiàn)重復(fù)，這里用了 select distinct 語句，以民族為例。 while Not do //在不是最后一條記錄時(shí)進(jìn)行循環(huán) begin ((39。 這個(gè)功能實(shí)現(xiàn)，首先需要使用 select語句在人事表中找到最大的編號(hào)，實(shí)現(xiàn)如下： begin Close。 If (39。//將 m的值從第 4位取 2位變?yōu)檎? if n9 then s:= s+39。 圖 9 工資設(shè)置 模塊 此模塊主要用了以下的組件： “ TPanel”組件 、 “ TGroupBox”組件 、 “ TLabel”組件 、 “ TEdit”組件 、 “ TCombobox”組件 、 “ TCheckBox”組件 、 “ TBitBtn”組件 、“ TDataSource”組件 、 “ TDBGrid”組件 ，其中 “ TDataSource”組件 、 “ TDBGrid”組件 兩個(gè)組件是顯示數(shù)據(jù)庫中內(nèi)容的組件在運(yùn)行時(shí)是看不到的。 (39。).Value。).Value。 。39。數(shù)據(jù)備份成功 39。,0+mb_iconinformation)。39。 Close。員工信息瀏覽模塊的運(yùn)行結(jié)果如