【正文】 2）在“ ADO”組件頁中點選“ TADOConnection”組件，添加到窗體上，TADOConnection組件用到連接數(shù)據(jù)庫，其它數(shù)據(jù)庫組件通過它連接數(shù)據(jù)庫。 圖 6 連接屬性對話框 （ 6）單擊【測試連接】按鈕，如果連接成功，則提示成功，單擊【確定】按鈕完成數(shù)據(jù)庫的連接。只有合法的用戶，才可以進(jìn)入系統(tǒng)。 圖 7 登錄 界面 此模塊的設(shè)計步驟如下： （ 1）新建一個窗 體 ，命名為“ frm_Login”，設(shè)置 Caption 屬性為“登錄”，設(shè)置 Position 屬性為“ poScreenCenter”。 此 模塊調(diào)用了數(shù)據(jù)模塊中的 ADOquery 組件連接數(shù)據(jù)庫，然后用 select 語句對操作員信息這張數(shù)據(jù)表進(jìn)行操作。select * from 操作員信息表 where 操作員名稱 = :a and 操作員密碼 = :b39。).Value:=trim()。 open。新員工登記模塊運行結(jié)果如圖 8 所示。1。 (39。 在編輯框的 OnChange 事件中添加如下代碼，用來控制保存 按鈕的使用，如果沒有完全填寫信息， bitbtn 的 Enabled 屬性就設(shè)置為 false，則設(shè)置 【保存】按鈕不可用。) 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。) then :=true else :=false。 。 open。).Value)。 在一個企業(yè)里，難免會用重名的員工，所 以姓名不能作為員工的唯一標(biāo)識，那么如果用員工編號來做唯一標(biāo)識，就可以解決這個問題了。 (39。 end。).Value = null then s :=’ mr’ +39。).Value) 。+ InttoStr(n +1) else if n99 then s:=s+39。 工資設(shè)置 模塊設(shè)計 工資設(shè)置模塊主要用于設(shè)置員工的工資信息，此窗體中主要應(yīng)用的也是基本的 SQL 語句 Insert 向數(shù)據(jù)中插入數(shù)據(jù)。 此模塊在“員工編號”的下拉列表框中選中選擇編號后員工姓名的列表框中的自動變?yōu)橄鄬?yīng)的姓名，這個功能首先也是用的 select 語句對數(shù)據(jù)庫進(jìn)行查詢。select * from 人事表 where bh=:a39。).Value:=。 :=(39。 首先同樣是用 select 語句查詢個人所得稅表，然后執(zhí)行以下代碼： while not do begin if (strtofloat()=(39。).Value) then :=(39。 end。 圖 10 人事管理系統(tǒng) 主窗體 此窗體的設(shè)計主要運用了以下組件： “ TMainMenu”組件 、 “ TCoolBar”組件 、 “ TSpeenButton”組件 、 “ TPanel”組件 、 “ TImage”組件 、 “ TOpenDialog”組件 和“ TSaveDialog”組件 。 BACKUP DATABASE 39。 TO DISK =39。39。 execsql。提示 39。,39。 數(shù)據(jù)庫還原由以下代碼實現(xiàn)： begin Close。+39。+dir+39。)。 (39。 end。 TTreeView是顯示單位信息和員工信息，如果在設(shè)計時就設(shè)計好，在公司增加部門的時候就會無法添加，所以在這里是通過對單位信息表和部門信息表進(jìn)行檢索后動態(tài)地創(chuàng)建樹形選項。 begin with do begin close。)。 with do begin close。)。單位名稱 39。 。 open。).Value。 。 5 系統(tǒng)測試 測試環(huán)境 ： Windows2021。當(dāng)然這些功能也包含在幾個功能模塊之中，也可以點擊功能模塊進(jìn)行選擇。 結(jié) 論 總結(jié)本系統(tǒng)的開發(fā)我做了如下工作 ,首先 了解系統(tǒng)需要實現(xiàn)如下功能 :具有良好的操作界面 ； 業(yè)務(wù)模塊能夠自由增加、修改及刪除信息 ； 建立數(shù)據(jù)庫備份機制，并提供數(shù)據(jù)災(zāi)難恢復(fù)功能 ； 支持?jǐn)?shù)據(jù)的查詢機制 ； 自動計算員工工資 ； 實現(xiàn)員工崗位調(diào)動操作 ； 實現(xiàn)員工離職、復(fù)職操作。對 Delphi 及 SQL Server 2021 兩種開發(fā)工具也有了較為熟悉的掌握。 [4] 林華聰，余劍鋒 . Delphi 6 數(shù)據(jù)庫設(shè)計 思想與實踐 [M].天津 :冶金工業(yè)出版社 ,2021。 [8] 陳豫龍 .Delphi 數(shù)據(jù)庫系統(tǒng)開發(fā)實例導(dǎo)航 [M].北京： 人民郵電出版社 ,2021。文中除了特別加以標(biāo)注地方外，不包含他人已經(jīng)發(fā)表或撰寫過的研究成果，也不包含為獲得成都信息工程學(xué)院或其他教學(xué)機構(gòu)的學(xué)位或證書而使用過的材料。 （ 3）學(xué)?？梢詫W(xué)術(shù)交流為目的復(fù)制、贈送和交換學(xué)位論文。 特此聲明！ 作者簽名： 年 月 日 的國王，而皇后卻是泰戈族的。 但沒有一個貴族敢把這種事情放到水面上來的，這種冒天下之大不韙的事，是和家族榮譽連接在一起的，沒有一個貴族敢于挑戰(zhàn)自己家族的榮譽這么大膽。 讓人大跌眼鏡的是，格雷克 .薩爾陛下對愛情堅貞的程度簡直可以媲美已經(jīng)在比蒙世界中滅亡了很久的曼都克族的鴛鴦，他一口回絕了其他各族進(jìn)貢美女的請 求，只出于國王必須納四妃的 法例，接納了泰戈族貢獻(xiàn)的三個側(cè)妃，和安琪爾皇后一起恩恩愛愛度過了二十五年春秋。 比蒙 王國是極度尚武的國度，雖然比蒙們對武力的崇拜已經(jīng)到了無可復(fù)加的地步，但是今后泰戈族和萊茵族的平衡被打破，今后這些勇猛而聰明的王子們，會不會永久地將比蒙王國統(tǒng)治下去，這才是長老院和圣壇祭祀們最頭疼的事情。 愛情永遠(yuǎn)是殘酷的。 代表種族： 美人魚：海中的皇族，最討厭陸地生物的海中人類，傳說中喜歡用新鮮的人類作為食物的海中霸 主，恐怖的天生水系魔法師！ 代表人物： 艾薇兒：劉震撼三個妻子之一，精通水系魔法。 加布林族魔鯊戰(zhàn)士：西雅圖海中的強大戰(zhàn)士，強橫身體，與生俱來的水系魔法，個性極其兇悍，一旦不敵對手，他們甚至不惜自爆身體 代表人物： 理查德：愛薇兒登場時的手下，性格暴 戾，劉震撼手下海族第一個犧牲品。 特殊技能：強壯。 代表人物： 凝玉：劉震撼三個妻子之一，精通幻術(shù) 特殊技能：海市蜃樓：通過光線來欺騙人的視覺，使人產(chǎn)生幻覺。 －－－－－－－－－－－－－－ 比蒙水族 灣鱷武士：兩千年前海陸大戰(zhàn)役中水族損失殆盡，現(xiàn)任國王格雷克 .薩爾陛下也不過只擁有四個灣鱷武士做為儀仗隊。 模特族龜人：比蒙王國的水軍，不過是兩棲軍團(tuán)。心里想著，韓碩表情是越來越恐怖，空洞的眼睛一番，全是白眼珠子，身子 踩著樹枝晃蕩的幅度更大了。 然后雨點一般的攻擊，“噼里啪啦”的落在韓碩的身上，一個聲音一邊打一邊罵：“布萊恩，看不出來你有出息 了啊！上次居然沒死，但是腦子是不是壞了，本小姐我修的是亡靈系的魔法，天天和骷髏僵尸在一起，你這個白癡竟然扮尸體嚇我，我真是佩服你的白癡行為，難道未來亡靈系的大魔導(dǎo)師莉莎，連靈魂有沒有在身體內(nèi)都會分不清嗎？” 身上痛的厲害，但是心里更是疼，這個笨蛋布萊恩呆在亡靈系做了六年的雜役，怎會連這么點常識都不知道，害得自己第一次夠膽做壞事，沒想到竟然落得了這種下場。飛庫網(wǎng) 更新時間 :2021105 11:31:49 本章字?jǐn)?shù) :4050 在韓碩心中亂想的時候，感覺身上到處都在痛，那小魔女莉莎還在胡亂的朝他瘋打，可憐韓碩身體虛弱的要命，剛剛第一下子被擊中鼻梁，眼淚就不由自主的流了出來，從樹上跌落下來之后，更是 痛的昏頭轉(zhuǎn)向，只能在地上卷成一團(tuán)，將肉最多的地方露出來給莉莎打 —— 比如臀部。胡思亂想的時候，那一絲魔元游走到右臀部，然后莉莎一腳踹來，湊巧的正好落在韓碩右臀部魔元所在的地方。 有殺氣?? 比起莉莎來，艾咪阿西娜貝拉三個女生，長的要差了許多，都是十六七歲的少女，長的本來就不太漂亮，睡眠被打攪到，又會影響美貌，三個女生心情現(xiàn)在自然是很差了。 “布萊恩，你個笨蛋，立即給我把褲子穿起來，不然我殺了你！”莉莎趕緊大聲的嚷嚷起來，但聲音卻有著明顯的驚慌失措。 就在這個時候，初級魔法師貝拉輕嘆一聲，對莉莎說：“哎，莉莎，你難道現(xiàn)在還看不出，這個布萊恩，已經(jīng)瘋了嗎？看樣子你的‘怨靈’沒有將他弄死，是把他給 弄瘋了啊，我們和一個瘋子還計較什么？” 阿西娜好像很困，捂著嘴打了一個哈氣，說：“喔??明天還要上課，我先回去睡了，莉莎學(xué)姐你看著辦吧！” 艾咪似乎有些同情韓碩，默默的看了韓碩兩眼，輕輕搖頭嘆息一聲，并沒有多說什么，同樣和貝拉轉(zhuǎn)身離去。” 莉莎進(jìn)去之后，這兒又恢復(fù)了寂靜無聲，韓碩看到她進(jìn)去之后，也是有些后怕，這莉莎幸虧沒有使用亡靈魔法，否則以她初級魔法師的魔力，再來一個“怨靈”射來，韓碩恐怕真要瘋了。 睜開惺忪的睡眼，韓碩轉(zhuǎn)了一下身子，看到一個金色短發(fā)，左眼暗青色，穿著同為雜役粗布衣服的小胖子，一臉驚慌的指著韓碩，“你??你??”的說不出完整的話。 因為杰克不是奴隸，雖然同樣做雜役，同樣會被亡靈系的學(xué)員欺負(fù)，但這些亡靈系的學(xué)員不會像對待布萊恩一樣對待他，打罵也會有，偶爾拿他做做小實驗也會，不過卻不會把他當(dāng)奴隸一樣不管死活。跟著，才是那陣陣翻滾而來的聲音，由遠(yuǎn)及近，驚濤拍岸，遠(yuǎn)比驚濤更猛烈，那炸雷的聲音，震得人的頭頂一痛，大地也跟著顫抖起來。希望，希望我們今天能找到。暴雨的水滴打在身上也不好受，一顆顆好似氣槍子彈，落在頭上，肩上，手臂，足背 ，任何突出肢體以外的地方，可以分明的感受到那股九天之上的沖擊力?！? 云層中時不時有一絲光亮，呈紫色，紅色，或藍(lán)色，將一小片烏云映得變做絢麗多彩，但沒有閃電襲來，就好似云母，腹中孕育著新的生命，正到了分娩的關(guān)鍵時期，那股蠢蠢的沖動，它就要破開天地，噴薄而出了 ! 第 15 部分 安息禁地 第五十八回 白夜雷暴 早在烏云聚集的時候，林中那道灰色的身影。 肖恩的銀發(fā)被沖成一縷一縷的貼在臉上，他不住的抹臉，嘟囔道：“這雨可真大啊 !” 巴桑又看了一眼頭頂，黑色的云并沒有隨著雨水的傾泄而有絲毫改變，整個天空像是巨大的玄武巖給擋住了，他咬牙道：“大雨么 ?恐怕真正的大雨還沒有開始呢。處理一下傷口，馬上走 !不然被困在林子里走不掉，就死定了 !” 五人對傷口做了簡單 處理，注射了抗生藥劑，開始在黑暗如夜的叢林里摸索前進(jìn)，這次他們的敵人不是持槍的武裝分子，也非看不見的毒蟲猛獸，而是隨處可見的雨，一場豪雨 ! 無數(shù)雨滴從天而降，在樹葉上匯集成流，起初還能看見它們像串線的珠子落下，到后來就看不見一顆顆的珠子了，而是一條條直直的水柱，將樹的枝葉與大地連接起來。那聲音，聽在五人耳中，從“嗒，嗒，嗒”變成了“嗒嗒嗒”，又從“希瀝瀝”變成了“嘩啦啦”，最后竟然響成一片，猶如萬千瀑布，一齊轟鳴。而小胖子杰克，也只 有在布萊恩的身上，才能夠找到哪么一點自信，所以這兩人很是要光亮，卻來得如此強烈，直照得整片叢林慘白，叢林里的樹影，如戰(zhàn)栗的妖獸，好似也愿意拔根而起，逃難而去 。小胖子杰克家里 貧窮，兩年前被他爸爸老杰克，給送到巴比倫魔武學(xué)院做雜役，每個月掙幾個銀幣。 回到雜貨庫之后，將小床上亂七八糟的垃圾，胡亂的拔開，直接躺下去埋頭大睡。不過既然是一個精神不正常的人，三個女生自然不會去和瘋子計較，就這么放過了韓碩，繼續(xù)回去接著美夢了?！表n碩傻傻的答了一聲，心中卻是奸笑，幾個生嫩的小雛菊，我還對付不了你們。” 小魔女莉莎冷冷的看著韓碩，兩手叉腰趾高氣 揚的說，只是左腳一踮一踮的，看起來有點古怪。 韓碩則是覺得那被莉莎踢中的地方，不但一點都不疼，而且還感覺非常舒服，全身都在疼，那個地方突然傳來這種舒服的感覺，這讓韓碩不由自主的輕聲叫了一聲，而且這一聲輕“啊”，還顯得說不出的 —— 淫褻，就仿佛是?? “布萊恩，你個白癡怎么褲子里面，還裝著石塊？” 莉莎一邊揉著晶瑩如玉的小腳，一邊氣憤的大聲嚷嚷，在韓碩與莉莎的周圍，這個時候也出現(xiàn)了幾個亡靈系的女學(xué)員，一個個睡眼 惺忪，兩眼森寒的看著韓碩。 原本火辣辣的地方，被魔元走過之后，也是疼痛大減，而且似乎還有一種 —— 很舒服的感覺?？礃幼幼约涸谶@個陌生的世界，需要學(xué)習(xí)的東西果然很多，若不然今日的慘事指不定 還會上演。 應(yīng)該是嚇昏過去了吧，韓碩心里想，聽著周圍傳來亡靈系女學(xué)員的咒罵之聲，韓碩暗想差不多該撤了，不然要被抓住就倒大霉了。 落日大沼澤軍團(tuán)韓碩暗想 “哇??” 魂飛魄散的一聲驚呼，傳遍了整個女學(xué)員生活區(qū)。 特殊技能：未知，推斷為強大的物理攻擊 左丹奴族蛙人