【正文】 inkage of the database and the implementation of every module. Finally gives a test of the system. Key words: Information management。 論文組織如下：首先闡述了該系統(tǒng)的開發(fā)背景、意義；其次介紹了相關(guān)的開發(fā)工具及技術(shù)基礎(chǔ)；接著 對(duì)系統(tǒng)的需求進(jìn)行了分析，并提出了具體的設(shè)計(jì)方案和數(shù)據(jù)庫(kù)模型； 然后 展現(xiàn)了整個(gè) 系統(tǒng)的具體實(shí)現(xiàn)，包括數(shù)據(jù)庫(kù)的設(shè)計(jì)和連接，各功能模塊的實(shí)現(xiàn)；最后 對(duì)該軟件進(jìn)行了 嚴(yán)格的 測(cè)試。 畢業(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)用可以使日常工作更加方便、快捷和高效。系統(tǒng)符合公司人事管理的要求，能夠幫助公司切實(shí)提高工作效率。 Thirdly, analyses the demand of the system, gives a specific design project and a database model。這些優(yōu)點(diǎn)能夠極大地提高人事工資管理的效率 ,也是企業(yè)的科學(xué)化、正規(guī)化管理 ,與世界接軌的重要條件。管理信息系統(tǒng)是企業(yè)的信息系統(tǒng)，它具備數(shù)據(jù)處理、計(jì)劃、控制、預(yù)測(cè)和輔助決策功能，具體作用如下： （ 1） 用統(tǒng)一標(biāo)準(zhǔn)處理和提供信息，排除使用前后矛盾的不完整的數(shù)據(jù)。 （ 5） 用最低的費(fèi)用最短的時(shí)間提供盡可能精確、可靠的信息，以便使決策者選擇最佳的實(shí)施方案，以提高企業(yè)的經(jīng)濟(jì)效益。這是長(zhǎng)期以來困惑人們的一大問題。 MIS 系統(tǒng)涉及到多方面的內(nèi)容，因此，人們稱 MIS 學(xué)科是一個(gè)交叉綜合性的學(xué)科。 時(shí)至今日，計(jì)算機(jī)正在令人難以置信的速度步入普通人的學(xué)習(xí)、工作和生活。事實(shí)上，對(duì)一個(gè)國(guó)家來說，信息決定其如何建設(shè)和治理；對(duì)一個(gè)人來說，信息是其決定如何發(fā)展才能適應(yīng)社會(huì)需要的 基本要求；對(duì)政府來說，各種必須的信息是其賴以生存和活動(dòng)至關(guān)重要的條件；而對(duì)與任何工商貿(mào)企業(yè)來說，信息就是他們的生命線，沒有大量的信息想要在市場(chǎng)環(huán)境下生存是不可能的。隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，計(jì)算機(jī)在企業(yè)管理中應(yīng)用的普及，利用計(jì)算機(jī)實(shí)現(xiàn)企業(yè)人事管理勢(shì)在必行。企業(yè)人事管理是相對(duì)企業(yè)內(nèi)部員工的管理。企業(yè)人事管理可以說是一項(xiàng)瑣碎、繁雜而又必須十分細(xì)致的工作，是不能允許 時(shí)常發(fā)生差錯(cuò)的。本軟件界面美觀、使用方便，是企業(yè)人事管理必不可缺的好幫手。其中，基于微型計(jì)算機(jī)的數(shù)據(jù)庫(kù)系統(tǒng)是應(yīng)用最廣泛、實(shí)用性最強(qiáng)的一種計(jì)算機(jī)技術(shù)。它能夠管理大量復(fù)雜的數(shù)據(jù)信息，同時(shí)有具有很好的安全性和較強(qiáng)的網(wǎng)絡(luò)功能，甚至還能夠?qū)崿F(xiàn)數(shù)據(jù)的遠(yuǎn)程訪問和存儲(chǔ)加工。業(yè)界有一句很經(jīng)典的話：真正的程序員用 VC++，而聰明的程序員用 Delphi。 Delphi 及 SQL Server 2021 簡(jiǎn)介 Delphi 簡(jiǎn)介 Delphi是全新的可視化編程環(huán)境 ， 為我們提供了一種方便、快捷的 Windows應(yīng)用程序開發(fā)工具。 (2)面向?qū)ο缶幊痰母拍睢? (6)框架對(duì)設(shè)計(jì)和使用模式的擴(kuò)充。您的工作只是在“ 骨架 ” 中加入您的程序。 Delphi已經(jīng)為您做好了一切基礎(chǔ)工 作 程序框架就是一個(gè)已經(jīng)完成的可運(yùn)行應(yīng)用程序，只是不處理任何事情。 Delphi把 Windows編程的回調(diào)、句柄處理等過程都放在一個(gè)不可見的 Romulam覆蓋物下面，這樣您可以不為它們所困擾 ，輕松從容地對(duì)可視部件進(jìn)行編程。 SQL Server 2021 是一個(gè)具備完全 Web 支持的數(shù)據(jù)庫(kù)產(chǎn)品，提供了可擴(kuò)展標(biāo)記語(yǔ)言（ XML）核心支持以及Inter 上和防火墻外進(jìn)行查詢的能力，具有可伸縮性、靈活性、擴(kuò)充性好，而且價(jià)格便宜等特點(diǎn)；還可以使用 XML 更新程序更容易地插入、更新和刪除數(shù)據(jù)。 SQL Server 2021 是 Microsoft． NET Enterprise Server 的數(shù)據(jù)管理與分析中樞。 (2) 信息設(shè)置模塊主要功能是對(duì)部門信息、工種類型、職稱類型、文化程度、政治面貌、民族類型、得稅設(shè)置、考勤設(shè)置等進(jìn)行設(shè)置。根據(jù)這個(gè)系統(tǒng)所要實(shí)現(xiàn)的目的和任務(wù)，總結(jié)出這個(gè)系統(tǒng)最終要實(shí)現(xiàn)的主要功能如下： 數(shù)據(jù)設(shè)置部分：主要包括考勤錄入功能。 本系統(tǒng)的功能模塊如圖 1所示 ： 圖 1 系統(tǒng)功能模塊圖 4 系統(tǒng) 的實(shí)現(xiàn) 數(shù)據(jù)庫(kù) 設(shè)計(jì) 數(shù)據(jù)庫(kù)是一種存儲(chǔ)數(shù)據(jù)并對(duì)數(shù)據(jù)進(jìn)行操作的工具。 創(chuàng)建任何一個(gè)數(shù)據(jù)庫(kù)的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫(kù)，設(shè)計(jì)必須是靈活的、有邏輯的?？梢郧逦胤磻?yīng)數(shù)據(jù)庫(kù)信息。 表 3 工資 表 字段名 數(shù)據(jù)類型 長(zhǎng)度 主鍵否 功能描述 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 所示。 （ 3）點(diǎn)選 ADOConnection1組件，在“ Object Inspector”窗口中，單擊ConnectionString屬性右側(cè)的【?】按鈕，彈出對(duì)話框如圖 4所示。 （ 7）在窗體上添加 TADOQuery組件，設(shè)置 Connection為 “ ADOConnection1”。 驗(yàn)證操作員及其密碼。 （ 2）在“ Additional”組件頁(yè)中點(diǎn) 選“ TImage”組件，添加到窗體上，設(shè)置Align 屬性為“ alClient”； Stretch 屬性為“ Tree”，在 Pictuer 屬性中添加圖片。對(duì)數(shù)據(jù)庫(kù)的操作主要由以下代碼實(shí)現(xiàn)： with do begin close。)。 (39。 end。 圖 8 新 員工登記模塊 此模塊設(shè)計(jì)如下： （ 1）新建一個(gè)窗體，命名為“ frm_xygdj”，設(shè)置 Caption 屬性為“新員工登記”，設(shè)置 Position 屬性為“ poScreenCenter”。_ Image Additional Align Stretch alClient Ture 此模塊調(diào)用數(shù)據(jù)模塊中的 ADOquery 組件連接數(shù)據(jù)庫(kù)中的人事表。insert 人 事表 values (:a,:b,:c,:d,:e,:f,:g,:h,:i,:j,:k,:l,:m,:n,:o,:p,:q,:r,:s,:t,:u,:v,:w,:x,:y,:z,:aa,:ab,:ac,:ad,:ae,:af)39。 這部分判斷輸入是否為空的實(shí)現(xiàn)如下： procedure (Sender: TObject)。39。39。39。39。39。39。39。39。39。39。39。39。39。 end。 (39。 end。 。人為的編號(hào)也難免會(huì)出錯(cuò)，所以在這里我們?cè)O(shè)置單擊“添加”按鈕自動(dòng)生成員工編號(hào)。select max(bh) as ss From 人事表 39。 當(dāng)然，如果是第一次添加新員工，返回值為空時(shí)，編號(hào)就由 001開始編排。00139。 n:= StrToInt(copy(m,4,2)) 。039。工資設(shè)置模塊運(yùn)行結(jié)果如圖 9 所示。查詢代碼如下： begin close。)。 open。xm39。應(yīng)納所得稅金額下限 39。級(jí)別號(hào) 39。 這段代碼中運(yùn)用了 ADOquery 組件的 Eof 屬性返回?cái)?shù)據(jù)集的最后一條記錄、ADOquery 組件的 Next 屬性返回?cái)?shù)據(jù)集中當(dāng)前記錄的下一條記錄，這兩個(gè)屬性主要是實(shí)現(xiàn)對(duì)數(shù)據(jù)表的逐一查詢。 為了防止數(shù)據(jù)庫(kù)被破壞，或者用戶的修改不合理需要還原，所以這里設(shè)置了數(shù)據(jù)庫(kù)備份和數(shù)據(jù)庫(kù)恢復(fù)，主要原理是將數(shù)據(jù)庫(kù)文件拷貝另外的磁盤，這里運(yùn)用了 sql的 BACKUP DATABASE語(yǔ)句和 restore database語(yǔ)句，數(shù)據(jù)庫(kù)備份由以下的代碼完成： begin close。+39。39。39。 (39。,0+64)。數(shù)據(jù)庫(kù)備份 39。 。39。39。 ExecSQL。use db_manpowerinfo 39。 員工信息瀏覽 模塊設(shè)計(jì) 可以通過瀏覽模塊查看員工的詳細(xì)信息，還可以修改和刪除信息，并通過條件查詢來查看某人的信息。在窗體的 OnShow事件中添加如下代碼： procedure (Sender: TObject)。 。 open。 。 open。).Value。 (39。 end。 。 end。 ： IBM 兼容 PC。 所得稅 模塊測(cè)試 在菜單中，選擇“信息設(shè)置” “所得稅設(shè)置”，進(jìn)入所得稅設(shè)置界面，如圖 14 所示： 圖 14 所得稅設(shè)置測(cè)試 這里可以設(shè)置工資在那個(gè)段屬于什么級(jí)別，應(yīng)該交納的所得稅率，當(dāng)設(shè)置完成之后就能操作保存和取消按扭了，沒有完成設(shè)置是不 能對(duì)他們進(jìn)行操作的。然后收集數(shù)據(jù) ,分析數(shù)據(jù) ,創(chuàng)建數(shù)據(jù)表。 參考文獻(xiàn) [1] 李林 . 實(shí)例解析 [M].北京 :高等教育出版社 ,1997。 [5] 岳慶生 . 版主答疑 Delphi 高級(jí)編程技巧 [M].北京 :清華大學(xué)出版社 ,2021。 致 謝 本文是在 葉立軒 老師和曾令明老師 的熱情關(guān)心和指導(dǎo)下完成的。除非另有說明，本文的工作是原始性工作。 （ 4）學(xué)?？稍试S學(xué)位論文被查閱或借閱。 這件事情的直接后果就是，兩個(gè)種族麾下的附庸族仆來波艾族兔頭人和加菲 族的貓頭人直接在王城發(fā)展了一場(chǎng)大規(guī)模械斗。 這種事情就好比一個(gè) 人類男性娶了一個(gè)雌性食人魔一樣荒誕。 很多種族對(duì)國(guó)王的偏心表示了嚴(yán)重的不滿，但卻又無(wú)可奈何。 以前雖然有別的種族有異族通婚，并產(chǎn)生后代，但從來沒有誕生過如此強(qiáng)大，如此有統(tǒng)治力的新后代，這個(gè)例子徹底把長(zhǎng)老們難住了。 這話不知道是誰(shuí)說的，格雷克 .薩爾陛下每每想到這里，眼眶就不禁濕潤(rùn)了。 特殊技能：星空倒影雙修結(jié)界：海族的女海神安菲特里忒的最高祝福，可以幻化出元素人魚抵擋攻擊。 特殊技能：波濤之盾：藍(lán)色的水珠在騎士的身前形成一個(gè)半月形護(hù)障，防御敵人攻擊。 ＶＥＲＹ?gòu)?qiáng)壯。 卡帝樂族揚(yáng)子鱷武士：兩棲類海族，強(qiáng)大的防 御力和攻擊力，遠(yuǎn)東云秦帝國(guó)特有種族，已經(jīng)滅亡。 代表人物： 比蒙國(guó)王的儀仗隊(duì)：強(qiáng)大的護(hù)衛(wèi)，數(shù)量極為稀少。 代表人物： 東北神廟的維安大薩滿齊丹大人，亞龍祭祀。 因?yàn)榉籽壑樽?，韓碩已經(jīng)看不到莉莎，等到一聲魂飛魄散的大叫之后，韓碩表情越來越恐怖的時(shí)候，突然再也沒有聽到莉莎的聲音。 亡靈魔法？這神奇的亡靈魔法，竟然連這種事情都能夠分清，果然是有些門道的。 只不過一會(huì)兒之后，韓碩突然發(fā)現(xiàn)一件奇妙的事情，他身體內(nèi)的一絲魔元，這個(gè)時(shí)候正好游走到臀部，在魔元流動(dòng)過的地方，莉莎的腳踢在上面，臀部感覺不哪么痛了。 “啊”“哇” 兩聲一高一地的叫聲猛地響起，分別從韓碩與莉莎的口中傳來，莉莎是突然覺得韓碩的右臀部比鐵石還硬，小腳忍不住的巨痛，立即縮腳大呼小叫起來。 “白癡，看什么看，說，你褲子里面為什么裝石塊？把本小姐的美腳都給踢紫了！唔唔??好痛。 “哦。 如果韓碩沒有表現(xiàn)的這么癡傻，恐怕除了莉莎之外，還要遭受這三個(gè)女生怒火。 曲終人散了，韓碩也不再繼續(xù)留在這兒，一邊低聲暗罵著，一邊拖著疲軟 的孱弱身子，狼狽的往自己的雜貨庫(kù)走去。 “哦，是杰克啊，你來我的房間干什么？” 小胖子杰克，和布萊恩同歲，可能是同病相憐的原因，杰克是亡靈系僅有的幾個(gè)，對(duì)布萊恩比較好的人。 一直以來，布萊恩其實(shí)是很羨慕小胖子杰克的，因?yàn)樾∨肿咏芸祟D頓都能吃飽，還不用承受那種非人的折磨。如同開賽的發(fā)令槍，隨著這一聲驚天雷響，天為之變?? 當(dāng)?shù)谝坏嗡槁涞?，就像發(fā)起了沖鋒的號(hào)角，它身后跟著的千萬(wàn)同胞，從那被撕裂的天幕傾盆而下，前后不過一分鐘，無(wú)處不在的水，已經(jīng) 占據(jù)了整片叢林。” 張立道：“不會(huì)下那么久吧 ?” 巴桑道：“你不知道，這不是雷陣雨，這是雷雨風(fēng)暴，它的真正威力還沒展示出來呢。水落在泥地上，一砸一個(gè)坑，吸飽了水分的泥土，癱軟得像新鮮的牛糞，踏上去又軟又滑，能陷腿好幾寸深，拔出來時(shí)又黏又緊，每走一步即要防止滑倒，又要防止鞋被扯掉，五人走得踉踉蹌蹌，就像五