環(huán)維集團(tuán)人事薪資管理系統(tǒng)的設(shè)計(jì)與開發(fā)

1、<p><b>　　摘 要</b></p><p>　　本課題所開發(fā)的系統(tǒng)——人事、薪資管理系統(tǒng)是環(huán)維集團(tuán)（廈門）有限公司資源管理計(jì)劃軟件（FineWell-ERP）的子系統(tǒng)。系統(tǒng)是Finewell-ERP系統(tǒng)中的基礎(chǔ)部分，它為其他子系統(tǒng)提供了基本的數(shù)據(jù)來源，如采購模塊需要采購員信息，銷售模塊需要銷售業(yè)務(wù)員信息，質(zhì)量模塊需要檢驗(yàn)員信息等等。人事模塊主要為滿足人事部實(shí)際需要和為

2、其他模塊提供基礎(chǔ)數(shù)據(jù)，可以管理員工資料檔案、應(yīng)聘人員資料、人才推薦、跟蹤記錄員工的入職、調(diào)動(dòng)、離職等過程。薪資模塊是ERP系統(tǒng)的人力資源管理模塊的組成部分，在力求公平、合理的原則下，對(duì)員工基本薪資、津貼、福利、保險(xiǎn)的參數(shù)進(jìn)行設(shè)置。系統(tǒng)管理模塊主要是負(fù)責(zé)整個(gè)ERP的管理，包括各個(gè)模塊的控制以及權(quán)限、審核的管理。</p><p>　　該系統(tǒng)是環(huán)維集團(tuán)ERP項(xiàng)目一期工程的組成部分，現(xiàn)在已經(jīng)為該企業(yè)人事部門所試用運(yùn)行，同

3、時(shí)該系統(tǒng)對(duì)于該公司ERP項(xiàng)目后期的開發(fā)具有重要參考價(jià)值。</p><p>　　本論文是針對(duì)該系統(tǒng)，從分析設(shè)計(jì)到開發(fā)實(shí)施的闡述和總結(jié)。</p><p>　　關(guān)鍵詞：環(huán)維集團(tuán)，F(xiàn)ineWell-ERP ，人事模塊，薪資模塊</p><p><b>　　Abstract</b></p><p>　　The system of

4、this subject, personnel, salary management system is FineWell-ERP’s sub-system of FineWell Group(xiamen) Ltd.com. This system is the foundation of the FineWell-ERP system, which provides the fundamental data source for o

5、ther sub-systems, such as the purchase module which needs buyer’s information , and sell module that needs seller’s information, quality module that needs inspector’s information ,etc. Personnel module mainly meet the ne

6、eds of the business enterprise's personnel, pr</p><p>　　This system is one part of the first engineering of FineWell-ERP , and now it has been already tried out by the business enterprise's personnel

7、 section. At the same time this system also has important value in the company's ERP development in the future.</p><p>　　The thesis is the description and the summary of the personnel,salary management s

8、ystem,from analysis ,design development to practice.</p><p>　　Key words： FineWell Group, FineWell-ERP, Personnel module, Salary module</p><p><b>　　目 錄</b></p><p><

9、b>　　摘要</b></p><p><b>　　Abstract</b></p><p><b>　　第一章 前言3</b></p><p>　　第二章 需求分析3</p><p>　　2.1 人事系統(tǒng)需求分析3</p><p>　　2.2 薪資系統(tǒng)

10、需求分析4</p><p>　　2.3 系統(tǒng)流程5</p><p>　　第三章 數(shù)據(jù)庫設(shè)計(jì)6</p><p>　　3.1 設(shè)計(jì)原則 6</p><p>　　3.2 數(shù)據(jù)庫表設(shè)計(jì)6</p><p>　　第四章 總體設(shè)計(jì)17</p><p>　　4.1 人事系統(tǒng)總體設(shè)計(jì)17</p

11、><p>　　4.2 薪資系統(tǒng)總體設(shè)計(jì)17</p><p>　　4.3 系統(tǒng)管理總體設(shè)計(jì)18</p><p>　　第五章 實(shí)施過程與說明18</p><p>　　5.1 《人事系統(tǒng)》實(shí)施過程與說明18</p><p>　　5.2 《薪資系統(tǒng)》實(shí)施過程與說明28</p><p>　　5.3

12、《系統(tǒng)管理》實(shí)施過程與說明30</p><p>　　第六章 關(guān)鍵技術(shù)32</p><p>　　6.1 技術(shù)一：common公共代碼模塊32</p><p>　　6.2 技術(shù)二：Dmcommon公共數(shù)據(jù)庫模塊的使用38</p><p>　　6.3 技術(shù)三：充分、合理利用系統(tǒng)資源39</p><p>　　6.4

13、技術(shù)四：面向?qū)ο蠹夹g(shù)的繼承性體現(xiàn)40</p><p>　　6.5 技術(shù)五：搜索查詢窗口靈活調(diào)用技術(shù)40</p><p>　　6.6 技術(shù)六：界面數(shù)據(jù)顯示的美觀42</p><p>　　6.7 技術(shù)七：事務(wù)處理43</p><p>　　6.8 技術(shù)八：數(shù)據(jù)的假刪除45</p><p><b>　　第七

14、章 結(jié)論44</b></p><p><b>　　參考文獻(xiàn)44</b></p><p><b>　　致 謝45</b></p><p>　　附 錄1 公共代碼參見附件</p><p>　　附 錄2 《人事系統(tǒng)》代碼參見附件</p><p>　　附 錄3

15、 《薪資系統(tǒng)》代碼參見附件</p><p>　　附 錄4 《系統(tǒng)管理》代碼參見附件</p><p>　　附 錄5 《環(huán)維集團(tuán)員工手冊(cè)》之人事管理規(guī)定參見附件</p><p>　　附 錄6 《環(huán)維集團(tuán)薪資管理規(guī)定》參見附件</p><p>　　附 錄7 《環(huán)維集團(tuán)津貼及獎(jiǎng)金制度》參見附件</p><p>　　附

16、 錄8 《環(huán)維集團(tuán)員工福利與津貼制度》參見附件</p><p><b>　　第一章 前言</b></p><p>　　現(xiàn)代企業(yè)競(jìng)爭(zhēng)力的一個(gè)重要標(biāo)志是信息化建設(shè)。一個(gè)企業(yè)，如果沒有一套適合企業(yè)自身情況并運(yùn)行良好的信息管理系統(tǒng)，就很難應(yīng)對(duì)目前激烈的市場(chǎng)競(jìng)爭(zhēng)；反之，一個(gè)好的企業(yè)如果信息化建設(shè)取得成功，就如虎添翼，可以極大地提高自己的核心競(jìng)爭(zhēng)力，在近乎白熱化的競(jìng)爭(zhēng)當(dāng)中處于

17、不敗之地，那么如何才能取得成功呢？關(guān)鍵在于信息技術(shù)與企業(yè)的管理思想是否緊密融合。那么如何讓這兩者緊密融合在一起呢？ERP作為一種先進(jìn)的技術(shù)滿足了這種要求。ERP──Enterprise Resource Planning 企業(yè)資源管理計(jì)劃系統(tǒng)，是指建立在信息技術(shù)基礎(chǔ)上，以系統(tǒng)化的管理思想，為企業(yè)決策層及員工提供決策運(yùn)行手段的管理平臺(tái)，主要有四大模塊：財(cái)務(wù)管理模塊、生產(chǎn)控制模塊、物流管理模塊、人力資源管理模塊。ERP系統(tǒng)集中信息技術(shù)與先進(jìn)

18、的管理思想於一身，成為現(xiàn)代企業(yè)的運(yùn)行模式，反映時(shí)代對(duì)企業(yè)合理調(diào)配資源，最大化地創(chuàng)造社會(huì)財(cái)富的要求，成為企業(yè)在信息時(shí)代生存、發(fā)展的基石。</p><p>　　環(huán)維集團(tuán)（廈門）有限公司是97年在廈門注冊(cè)的港資企業(yè)，下屬公司有環(huán)維電子、環(huán)維工業(yè)照明、環(huán)維發(fā)展、香港慧而遠(yuǎn)幾家子公司。公司業(yè)務(wù)包括電子產(chǎn)品、工業(yè)照明生產(chǎn)、進(jìn)出口貿(mào)易、加工等，公司現(xiàn)有職員三百多人。由于公司集團(tuán)的不斷壯大，業(yè)務(wù)不斷的增長，該公司急需有符合自己發(fā)

19、展需要的資源管理系統(tǒng)，因此信息部成立ERP項(xiàng)目小組籌備開發(fā)ERP軟件。原本作為就業(yè)的去向，本人進(jìn)入了該小組，成為其中的一員參與系統(tǒng)的一期工程開發(fā)，主要負(fù)責(zé)人事系統(tǒng)模塊、薪資系統(tǒng)模塊和其他一些公共模塊的設(shè)計(jì)與開發(fā)，并作為畢業(yè)設(shè)計(jì)的內(nèi)容。</p><p>　　系統(tǒng)開發(fā)平臺(tái)采用Windows 2000 Server/Advanced Server,開發(fā)軟件采用功能強(qiáng)大的Delphi 6 RAD開發(fā)工具，數(shù)據(jù)庫系統(tǒng)采用微

20、軟的SQL SERVER 2000企業(yè)版。</p><p><b>　　第二章 需求分析</b></p><p>　　本階段的任務(wù)：在充分了解公司的情況下，并在人事部門和其他相關(guān)部門的協(xié)助下，對(duì)原有的基礎(chǔ)數(shù)據(jù)資料進(jìn)行分析，研究，整理，最終總結(jié)出需求，這將是下一階段數(shù)據(jù)庫設(shè)計(jì)的依據(jù)，同時(shí)，還考慮到今后可能出現(xiàn)的各種需求變化。</p><p>　

21、　2.1 人事系統(tǒng)需求分析</p><p>　　根據(jù)人事部實(shí)際需要，特別將該部分獨(dú)立于ERP系統(tǒng)四大模塊。這部分意義重大，比如人力資源管理模塊中職務(wù)模型的制定以及人員成本的分析都與該部分緊密相連。 </p><p><b>　　實(shí)際需求：</b></p><p>　　1.建立各個(gè)子公司的基本員工資料，并且要可單獨(dú)維護(hù)</p>&l

22、t;p>　　2.根據(jù)公司情況，建立應(yīng)聘人員信息庫。</p><p>　　人才是企業(yè)最重要的資源。優(yōu)秀的人才才能保證企業(yè)持久的競(jìng)爭(zhēng)力。</p><p>　　建立應(yīng)聘人員信息庫的目的如下： </p><p>　　-進(jìn)行招聘過程的管理，優(yōu)化招聘過程，減少業(yè)務(wù)工作量；</p><p>　　-對(duì)招聘的成本進(jìn)行科學(xué)管理，從而降低招聘成本；</

23、p><p>　　-為選擇聘用人員的崗位提供輔助信息，并有效地幫助企業(yè)進(jìn)行人才資源的挖掘。</p><p>　　3.記錄員工的自然情況，簡(jiǎn)歷、家庭成員、教育培訓(xùn)、獎(jiǎng)勵(lì)處分等信息。為統(tǒng)計(jì)分析、調(diào)薪、培訓(xùn)教育提供基本信息</p><p>　　4.按企業(yè)要求建立員工類別、職稱、性別、民族、文化程度等內(nèi)部代碼。用戶運(yùn)用此功能制定企業(yè)的人力資源規(guī)劃，為企業(yè)結(jié)構(gòu)重組提供依據(jù)</

24、p><p>　　5.跟蹤記錄員工入職、調(diào)動(dòng)、離職、退休、重新入職等過程</p><p>　　6.記錄員工基本信息、合同信息、工資信息、工作信息、人事檔案信息、外籍人員管理等</p><p>　　7.查詢?nèi)耸戮C合信息與報(bào)告。以人事資料為基礎(chǔ)，進(jìn)行各種勞動(dòng)人事統(tǒng)計(jì)以及人事信息的隨機(jī)綜合性查詢、如：工作情況查詢、干部情況查詢、新進(jìn)或離職職工情況查詢、職工文化知識(shí)結(jié)構(gòu)查詢等，應(yīng)

25、該有特殊的單獨(dú)查詢界面和公共的綜合查詢界面。</p><p>　　2.2 薪資系統(tǒng)需求分析</p><p>　　該模塊屬于ERP系統(tǒng)中的人力資源管理模塊。以往的ERP系統(tǒng)基本上都是以生產(chǎn)制造及銷售過程(供應(yīng)鏈)為中心的。因此，長期以來一直把與制造資源有關(guān)的資源作為企業(yè)的核心資源來進(jìn)行管理。但近年來，企業(yè)內(nèi)部的人力資源，開始越來越受到企業(yè)的關(guān)注，被視為企業(yè)的資源之本。在這種情況下，人力資源管

26、理，作為一個(gè)獨(dú)立的模塊，被加入到了ERP的系統(tǒng)中來，和ERP中的財(cái)務(wù)、生產(chǎn)系統(tǒng)組成了一個(gè)高效的、具有高度集成性的企業(yè)資源系統(tǒng)。它與傳統(tǒng)方式下的人事管理有著根本的不同。</p><p><b>　　實(shí)際需求：</b></p><p>　　根據(jù)公司薪資管理規(guī)定、津貼及獎(jiǎng)金制度、員工福利制度、保險(xiǎn)制度來制定員工的薪資、津貼、獎(jiǎng)金、福利以及保險(xiǎn)。薪資的計(jì)算又分為職員和工員，計(jì)

27、算公式參見附錄6，等級(jí)崗位設(shè)置參見附錄5、6，崗位津貼參數(shù)設(shè)置和保險(xiǎn)基數(shù)設(shè)置參見附錄7、8</p><p><b>　　1．工資核算</b></p><p>　　-能根據(jù)公司跨地區(qū)、跨部門、跨工種的不同薪資結(jié)構(gòu)及處理流程制定與之相適應(yīng)的薪資核算方法。</p><p>　　-與時(shí)間管理直接集成，能夠及時(shí)更新，對(duì)員工的薪資核算動(dòng)態(tài)化。</p&

28、gt;<p>　　-回算功能。通過和其它模塊的集成，自動(dòng)根據(jù)要求調(diào)整薪資結(jié)構(gòu)及數(shù)據(jù)。</p><p><b>　　-薪資的計(jì)算公式：</b></p><p><b>　　職員薪資組成：</b></p><p>　　基本工資＋年資工資＋崗位津貼＋特殊人才津貼＋全勤獎(jiǎng)＋午餐津貼；</p><p

29、><b>　　工員薪資組成：</b></p><p>　　基本工資＋年資工資＋崗位津貼＋特殊人才津貼＋考核獎(jiǎng)+全勤獎(jiǎng)＋加班工資；</p><p><b>　　2．工時(shí)管理</b></p><p>　　-根據(jù)本國或當(dāng)?shù)氐娜諝v，安排企業(yè)的運(yùn)作時(shí)間以及勞動(dòng)力的作息時(shí)間表。</p><p>　　-運(yùn)用

30、遠(yuǎn)端考勤系統(tǒng)，可以將員工的實(shí)際出勤狀況記錄到主系統(tǒng)中，并把與員工薪資、獎(jiǎng)金有關(guān)的時(shí)間數(shù)據(jù)導(dǎo)入薪資系統(tǒng)和成本核算中。</p><p><b>　　2.3 系統(tǒng)流程：</b></p><p>　　系統(tǒng)流程包括人事系統(tǒng)與薪資系統(tǒng)兩部分，其中薪資系統(tǒng)在人事系統(tǒng)管理下進(jìn)行必要的業(yè)務(wù)操作。當(dāng)人員錄用確定后，人員信息進(jìn)入人事系統(tǒng)數(shù)據(jù)庫，然后薪資系統(tǒng)對(duì)該人員進(jìn)行薪資信息錄入、核算；同

31、樣，當(dāng)人員調(diào)離后，薪資系統(tǒng)對(duì)該員工信息結(jié)算并備案，系統(tǒng)流程圖見圖2.1。</p><p>　　圖2.1 系統(tǒng)流程圖</p><p>　　人事系統(tǒng)作業(yè)流程圖參見圖2.2。</p><p>　　圖2.2 人事系統(tǒng)作業(yè)流程圖</p><p><b>　　數(shù) 據(jù) 庫 設(shè) 計(jì)</b></p><p>　　該

32、階段是在需求分析的基礎(chǔ)上完成的，是對(duì)分析達(dá)成的結(jié)果進(jìn)行設(shè)計(jì)的，在設(shè)計(jì)的過程中盡量考慮到將來需求的變化。該數(shù)據(jù)庫的平臺(tái)為MS SQL Server 2000系統(tǒng)。數(shù)據(jù)庫的設(shè)計(jì)與程序代碼設(shè)計(jì)之間存在如下矛盾：如果數(shù)據(jù)庫設(shè)計(jì)得很完美，比如各個(gè)相關(guān)表之間幾乎沒有冗余字段，但是在程序設(shè)計(jì)時(shí)就會(huì)相當(dāng)?shù)男量?；相反，?shù)據(jù)庫設(shè)計(jì)保留一定空間的話，就能減少程序設(shè)計(jì)時(shí)的很大負(fù)擔(dān)。權(quán)衡比重，在本數(shù)據(jù)庫的設(shè)計(jì)過程中還是首先考慮數(shù)據(jù)庫設(shè)計(jì)的完美，盡量把工作放到程序

33、代碼設(shè)計(jì)工作中。系統(tǒng)界面中多表調(diào)用時(shí)，在程序中由事務(wù)處理來完成。關(guān)系的主碼已經(jīng)標(biāo)注在表中，各個(gè)關(guān)系的參照關(guān)系圖在表后羅列。</p><p><b>　　3.1 設(shè)計(jì)原則</b></p><p>　　1、在數(shù)據(jù)庫的設(shè)計(jì)中，字段盡量根據(jù)英文意思（少量用到中文拼音）來進(jìn)行命名，這樣有利于數(shù)據(jù)庫的維護(hù)和易理解。</p><p>　　2、在各個(gè)數(shù)據(jù)庫庫表

34、的設(shè)計(jì)中，都增加了四個(gè)字段：建檔人、建檔時(shí)間、修改人、修改時(shí)間，也就是說當(dāng)當(dāng)前系統(tǒng)的操作者對(duì)數(shù)據(jù)庫的操作（建立或修改）都會(huì)被記錄在數(shù)據(jù)庫中，這樣就有依據(jù)，就是操作者是負(fù)有責(zé)任的。同時(shí)，這些字段的賦值是通過系統(tǒng)自動(dòng)添加進(jìn)去的，也就是當(dāng)前的系統(tǒng)操作者（建檔人就是用戶名UserName，建檔時(shí)間調(diào)用當(dāng)前時(shí)間，修改人和修改時(shí)間類似）。</p><p>　　3、對(duì)于特殊的記錄表，增加了state(狀態(tài))字段，比如Emplo

35、yee表的State（A代表在職，Q代表離職），dimission離職表的state（S代表假刪除，Q代表離職的）。</p><p>　　3.2 數(shù)據(jù)庫表設(shè)計(jì)</p><p>　　表1．Employee（員工基礎(chǔ)表）70個(gè)字段</p><p>　　該表字段大部分來源于人事部原有的員工記錄表格。該表記錄員工的自然情況，包括員工類別、職稱、性別、民族、文化程度等，合同信

36、息，工資信息，工作信息等，比如可為統(tǒng)計(jì)分析、調(diào)薪、培訓(xùn)教育等提供基本信息。</p><p>　　Employee,Dept關(guān)系參照?qǐng)D如圖3.19(a)所示,Employee,Bank關(guān)系參照?qǐng)D如圖3.19(b)所示。</p><p>　　部門編號(hào) 工資銀行帳號(hào)</p><p>　　Employee關(guān)系———

37、>Dept關(guān)系 Employee關(guān)系—————>Bank關(guān)系</p><p>　?。╝） （b） </p><p>　　圖3.1 Employee,Dept關(guān)系參照?qǐng)D</p><p>　　說明：Employee關(guān)系的“部門編號(hào)”屬性與Dept關(guān)系的主碼“部門編號(hào)”相對(duì)應(yīng)，也就是說“部門編號(hào)”屬性是

38、Employee的外碼（外鍵）；Employee關(guān)系的“工資帳號(hào)”屬性與Bank關(guān)系的主碼“工資銀行帳號(hào)”相對(duì)應(yīng)，也就是說“工資帳號(hào)”屬性是Employee的外碼（外鍵），在這里，外碼并不一定要與對(duì)應(yīng)的主碼同名，只要容易識(shí)別即可。</p><p>　　表2.Account（公司銀行帳號(hào)表）共5個(gè)字段</p><p>　　該表是各個(gè)子公司銀行帳號(hào)表，是人事管理模塊中公司資料管理界面的基礎(chǔ)表。

39、</p><p>　　表3.ADOConn（數(shù)據(jù)庫連接表）共4個(gè)字段</p><p>　　該表是ERP軟件登陸信息記錄表，除了記錄登陸名和密碼外，還可以記錄計(jì)算機(jī)名和當(dāng)前所連接的數(shù)據(jù)庫名稱。</p><p>　　表4.Allowance（崗位津貼參數(shù)設(shè)置表）共14個(gè)字段</p><p>　　該表是人力資源模塊中工資管理的一個(gè)崗位津貼基礎(chǔ)表，根

40、據(jù)環(huán)維集團(tuán)《崗位津貼制度》來設(shè)計(jì)。其中有職員和工員的相關(guān)規(guī)定，比如共員就分為七十二等，此外還根據(jù)不同等級(jí)的等級(jí)系數(shù)來設(shè)計(jì)。</p><p>　　表5.Bank（銀行/帳號(hào)表）共11個(gè)字段</p><p>　　該表是各個(gè)子公司員工工資銀行帳號(hào)基礎(chǔ)表。</p><p>　　表6.Code（系統(tǒng)基本代碼表）共11個(gè)字段</p><p>　　該表是為

41、ERP系統(tǒng)中基礎(chǔ)設(shè)置的基本代碼維護(hù)而提供的。大類代碼為三位數(shù)，子代碼號(hào)都是四位數(shù)，比如大類顏色代碼000，小類紅色的代碼號(hào)為0003，綠色代碼號(hào)為0001，大類部門為019，小類信息部代碼號(hào)為0009等等。</p><p>　　表7.Company（公司信息表）共15個(gè)字段</p><p>　　該數(shù)據(jù)為公司資料維護(hù)界面而提供的。因?yàn)榄h(huán)維企業(yè)的發(fā)展方向是集團(tuán)化，子公司在不斷的增加，為了系統(tǒng)的

42、可擴(kuò)展性，特別設(shè)置該基礎(chǔ)數(shù)據(jù)，該表用于記錄各個(gè)子公司的基本信息，有利于對(duì)集團(tuán)各個(gè)子公司的有效管理。</p><p>　　表8.Dept（部門表）共16個(gè)字段</p><p>　　該表直接為部門管理界面（包括部門資料維護(hù)界面、部門異動(dòng)界面）提供基礎(chǔ)數(shù)據(jù)。部門的大類代碼為019，該表為各個(gè)子公司的部門的基本信息。</p><p>　　表9.dimission（離職表）共

43、10個(gè)字段</p><p>　　該表為離職員工資料維護(hù)提供數(shù)據(jù)。同時(shí)與Employee有直接的聯(lián)系，在設(shè)計(jì)時(shí)盡量減少冗余，避免與Employee有重復(fù)數(shù)據(jù)。</p><p>　　表10.HomeInfo（家庭成員表）共8個(gè)字段</p><p>　　該表是員工基本資料維護(hù)界面的數(shù)據(jù)來源。是Employee基本表的補(bǔ)充。</p><p>　　表1

44、1.Insur（保險(xiǎn)基數(shù)設(shè)置表）共12個(gè)字段</p><p>　　該表是薪資管理系統(tǒng)中保險(xiǎn)基數(shù)設(shè)置界面的數(shù)據(jù)來源。包含有保險(xiǎn)的類型，個(gè)人與公司的應(yīng)交保險(xiǎn)比例以及生/失效日期等。</p><p>　　表12.Interview（面試信息表）共30個(gè)字段</p><p>　　該表為面試管理界面提供基礎(chǔ)數(shù)據(jù)。從收簡(jiǎn)歷到最終錄取，分析的比較詳細(xì)，考慮全面，將有利于建立一個(gè)合

45、理高效的用人制度，使用人制度更加完善。</p><p>　　表13.SetSalary （員工薪資設(shè)置表）共26個(gè)字段</p><p>　　該表是員工基本工資的設(shè)置基礎(chǔ)表。嚴(yán)格按照《環(huán)維集團(tuán)薪資管理制度》的規(guī)定來制定。</p><p>　　表14.SystemRes（系統(tǒng)模塊控制表--控制菜單）共10個(gè)字段</p><p>　　該表是系統(tǒng)管理

46、模塊的基礎(chǔ)數(shù)據(jù)。與UserRight關(guān)系的關(guān)系參照?qǐng)D見圖3.2。</p><p>　　表15.user_login_info（用戶登錄信息表）共4個(gè)字段</p><p>　　為使系統(tǒng)的使用管理更加有效，特別設(shè)置該表來記錄系統(tǒng)登陸者的信息和使用時(shí)間。這樣將使系統(tǒng)管理員更易于維護(hù)和監(jiān)控。</p><p>　　表16.UserAccount（用戶帳戶表）共6個(gè)字段<

47、/p><p>　　該表是用戶基本信息管理表。</p><p>　　表17.UserRight（用戶權(quán)限表）共8個(gè)字段</p><p>　　該表是系統(tǒng)管理權(quán)限管理模塊的基礎(chǔ)數(shù)據(jù)。這是系統(tǒng)管理員給各個(gè)用戶所分配的權(quán)限管理記錄表。在這里，“系統(tǒng)模塊號(hào)”屬性為（表14）SystemRes關(guān)系的外碼，UserRight關(guān)系為參照關(guān)系，SystemRes關(guān)系為被參照關(guān)系，關(guān)系的參照

48、圖見圖3.2。</p><p><b>　　系統(tǒng)模塊號(hào)</b></p><p>　　UserRight關(guān)系————>SystemRes關(guān)系 </p><p>　　圖3.2 UserRight,SystemRes關(guān)系參照?qǐng)D</p><p>　　表18.WageGrade（薪資崗位等級(jí)表）共9個(gè)字段</p&g

49、t;<p>　　該表是崗位參數(shù)設(shè)置界面的基礎(chǔ)數(shù)據(jù)。</p><p>　　表19.WorkProc（工作經(jīng)驗(yàn)表）共10個(gè)字段</p><p>　　該表是為員工基本資料維護(hù)提供基礎(chǔ)數(shù)據(jù)的。是Employee基礎(chǔ)表的補(bǔ)充。</p><p><b>　　第四章 總體設(shè)計(jì)</b></p><p>　　總體設(shè)計(jì)的主要

50、任務(wù)是將系統(tǒng)劃分成詳細(xì)的模塊，決定各個(gè)模塊的功能，決定模塊的調(diào)用關(guān)系，決定模塊的界面，即模塊間信息的傳播。</p><p>　　4.1 《人事系統(tǒng)》總體設(shè)計(jì)</p><p>　　總?cè)蝿?wù)：人事系統(tǒng)可以管理員工資料檔案、應(yīng)聘人員資料、人才推薦、跟蹤記錄員工的入職、調(diào)動(dòng)、退休等過程。其它ERP模塊從人事部分中讀入人事信息。如采購模塊需要采購員信息，銷售模塊需要銷售業(yè)務(wù)員信息，質(zhì)量理模塊需要檢驗(yàn)員

51、信息等等。</p><p>　　功能模塊劃分如圖4.1所示。</p><p>　　圖4.1 《人事系統(tǒng)》模塊規(guī)劃圖</p><p>　　4.2 《薪資系統(tǒng)》總體設(shè)計(jì)</p><p>　　總?cè)蝿?wù)：在以地域、行業(yè)和社會(huì)經(jīng)濟(jì)發(fā)展水平為考量，以在行業(yè)中上等水平為標(biāo)準(zhǔn)，以盡可能激勵(lì)員工的積極性和提高員工的工作責(zé)任感為中心，并力求以公正、公平、合理為原則

52、為基礎(chǔ)，設(shè)計(jì)出薪資、津貼、福利、保險(xiǎn)的相關(guān)參數(shù)設(shè)置。</p><p>　　功能模塊劃分如圖4.2所示。</p><p>　　圖4.2 《薪資系統(tǒng)》模塊劃分圖</p><p>　　4.3 《系統(tǒng)管理》總體設(shè)計(jì)</p><p>　　該模塊主要是負(fù)責(zé)整個(gè)ERP的管理，包括各個(gè)模塊控制以及權(quán)限、審核的管理。該模塊的開發(fā)要與其他開發(fā)人員緊密溝通，同時(shí)也

53、要對(duì)其他模塊有足夠的理解。</p><p>　　功能模塊劃分如圖4.3所示。</p><p>　　圖4.3 《系統(tǒng)管理》模塊劃分圖</p><p>　　第五章 實(shí)施過程與說明</p><p>　　實(shí)施過程包括：人事系統(tǒng)、薪資系統(tǒng)和系統(tǒng)管理三部分的實(shí)施，相關(guān)說明插入各個(gè)實(shí)施過程之中。</p><p>　　5.1 《人事

54、系統(tǒng)》實(shí)施</p><p>　　（一）員工基本資料維護(hù)模塊</p><p>　　環(huán)維集團(tuán)員工基本資料維護(hù)</p><p>　　環(huán)維香港員工基本資料維護(hù)</p><p>　　環(huán)維電子員工基本資料維護(hù)</p><p>　　環(huán)維發(fā)展員工基本資料維護(hù)</p><p>　　環(huán)維工業(yè)照明員工基本資料維護(hù)&l

55、t;/p><p>　　環(huán)維慧而遠(yuǎn)員工基本資料維護(hù)</p><p>　　涉及到的數(shù)據(jù)庫表：Employee,HomeInfo,WorkProc,Dept</p><p>　　1．功能按紐：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p>　　列表框顯示員工：用一程序?qū)崿F(xiàn)格式“員工編碼 -- 員工名稱”</p><

56、;p>　　2．界面頁面分為：“基本資料”、“高級(jí)資料”、“其他資料”、“家庭成員”、“工作經(jīng)驗(yàn)”、“個(gè)人簡(jiǎn)歷”</p><p><b>　　3．必輸欄位：</b></p><p>　　員工編碼、員工中英姓名、所屬公司、部門編號(hào)、部門名稱、出生日期、民族、籍貫、戶籍地、 人事關(guān)系、戶口地址、身份證號(hào)、教育程度、家庭地址、家庭電話、應(yīng)急聯(lián)系人、電子郵件、應(yīng)急聯(lián)系電話

57、、職工類別、職務(wù)、崗位、職稱、到職日期、</p><p>　　4．員工列表（方位：左邊）</p><p>　　5．頁面劃分（方位：右邊）</p><p>　　基本資料——來源：Employee表</p><p>　　高級(jí)資料——來源：Employee表</p><p>　　其他資料——來源：Employee表

58、 </p><p>　　家庭成員——來源：HomeInfo表</p><p>　　工作經(jīng)驗(yàn)——來源：WorkProc表</p><p>　　個(gè)人簡(jiǎn)歷——來源：Employee表</p><p>　　6．頁面“基本資料”中的圖片選取</p><p>　　有“選取圖片”和“刪除圖片”兩功能（方位：圖在上，功能按鈕在下）&

59、lt;/p><p>　　7．每個(gè)頁面下都要有導(dǎo)航按鈕</p><p><b>　　8、新增。</b></p><p><b>　　-保存成功否提示。</b></p><p><b>　　9、修改</b></p><p><b>　　-提示已經(jīng)確認(rèn)了

60、</b></p><p><b>　　-保存成功否提示。</b></p><p><b>　　10、查詢</b></p><p>　　-查無資料提示，見圖5.1。</p><p><b>　　圖5.1</b></p><p><b>

61、;　　11、刪除</b></p><p>　　-提示已經(jīng)確認(rèn)了，見圖5.2。</p><p><b>　　圖5.2</b></p><p><b>　　12、退出</b></p><p>　　-退出提示，見圖5.3。</p><p><b>　　圖5.3

62、</b></p><p>　　-退出未保存提示，見圖5.4</p><p><b>　　圖5.4</b></p><p><b>　　設(shè)計(jì)如圖5.5。</b></p><p>　　圖5.5環(huán)維集團(tuán)員工基本資料維護(hù)界面</p><p>　　實(shí)施說明：該單元是派生于U

63、base父單元，主要繼承它最頂端的操作按鈕和狀態(tài)欄；如圖示，照片在數(shù)據(jù)庫的儲(chǔ)存只是存取路徑，而實(shí)際的照片是放在用戶規(guī)定的地方；同時(shí)，當(dāng)新增員工時(shí)，盡量通過Combobox下拉框,小按鈕的搜索畫面, TmonthCalendar控件,單選框來使操作友好；本界面涉及比較多的表：Employee,HomeInfo,WorkProc,Dept；本界面的頁面比較多，但在每個(gè)頁面中都有員工編號(hào)和員工姓名，也就是說這兩個(gè)字段調(diào)用次數(shù)比較多。</

64、p><p>　　（二）公司資料維護(hù)模塊（維護(hù)各個(gè)子公司資料）</p><p>　　功能按鈕（方位：上面）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p>　　相關(guān)表: company</p><p><b>　　1、面板（標(biāo)題）</b></p><p>　　2、必輸欄位（顯示時(shí)背景灰色

65、，操作時(shí)動(dòng)態(tài)背景變色）</p><p>　　公司編碼、公司簡(jiǎn)稱/全稱公司電話、公司地址、傳真、負(fù)責(zé)人、 稅務(wù)編號(hào)、 營業(yè)注冊(cè)號(hào)、公司狀態(tài)</p><p>　　3、列表顯示窗口（方位：下方）——使用stringgrid控件</p><p><b>　　4、數(shù)據(jù)完整性。</b></p><p>　　-公司編碼、公司簡(jiǎn)稱/全稱

66、的唯一性（輸入時(shí)驗(yàn)證，保存時(shí)再次驗(yàn)證）。</p><p>　　-公司狀態(tài)默認(rèn)為“正?！?lt;/p><p><b>　　設(shè)計(jì)如圖5.6。</b></p><p>　　圖5.6 公司資料維護(hù)界面</p><p>　　實(shí)施說明：界面默認(rèn)時(shí)各個(gè)Edit控件為陰影，當(dāng)用戶執(zhí)行新增、修改、查詢等操作時(shí)，這些控件就根據(jù)情況變化背景顏色；

67、可以有小按鈕查詢功能的有：公司編碼、公司簡(jiǎn)稱和公司全稱；</p><p>　?。ㄈ╇x職員工資料維護(hù)（人事調(diào)整窗口）</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p>　　相關(guān)表: dimission,Employee</p><p>　　1、面板（標(biāo)題——右上角）</p>

68、<p>　　2、列表框(在職/離職)——左邊</p><p><b>　　3、必輸欄位</b></p><p>　　員工編號(hào)、員工名稱、所屬部門、崗位、人事關(guān)系、合同生效/失效日期、</p><p>　　到職/離職日期、合同實(shí)際違約金額</p><p>　　4、列表顯示窗口（下方）——使用string控件&

69、lt;/p><p><b>　　5、數(shù)據(jù)完整性。</b></p><p>　　-員工編號(hào)、姓名的唯一性（輸入時(shí)驗(yàn)證，保存時(shí)再次驗(yàn)證）。</p><p>　　-人事關(guān)系默認(rèn)為“我司”</p><p><b>　　設(shè)計(jì)如圖5.7。</b></p><p>　　圖5.7離職員工資料維護(hù)

70、界面</p><p>　　實(shí)施說明：當(dāng)列表功能為在職時(shí)，操作功能為新增；當(dāng)列表功能為離職時(shí)，操作功能為還原；當(dāng)在職新增為離職時(shí)，列表框可以自動(dòng)刷新，即在職列表中自動(dòng)刪除記錄，并且數(shù)據(jù)庫中state改為Q；當(dāng)離職還原為在職時(shí)，列表框自動(dòng)刷新，即離職列表中自動(dòng)刪除記錄，并且數(shù)據(jù)庫中的state改為S；</p><p>　　（四）員工資料查詢模塊（又具體為3個(gè)小模塊窗口）</p>

71、<p>　　1、新進(jìn)員工資料查詢</p><p>　　涉及到的數(shù)據(jù)庫表：Employee</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出、重新查詢</p><p>　　人機(jī)交互：所屬公司（combobox下拉框）、月份（combobox下拉框）、到職日期。</p><p>　　查詢結(jié)果顯示

72、（dbgrid控件，方位：下方）——有查詢個(gè)數(shù)反饋</p><p>　　2、離職員工資料查詢</p><p>　　涉及到的數(shù)據(jù)庫表：dimission，Employee</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出、重新查詢</p><p>　　人機(jī)交互：所屬公司（combobox下拉框）、月份（

73、combobox下拉框）、離職日期。</p><p>　　查詢結(jié)果顯示（dbgrid控件，方位：下方）——查詢個(gè)數(shù)反饋</p><p>　　員工資料綜合查詢（綜合性，支持模糊查詢）</p><p>　　涉及到的數(shù)據(jù)庫表：Employee</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出、重新查詢<

74、;/p><p>　　人機(jī)交互：?jiǎn)T工編號(hào)范圍、員工姓名（可模糊查詢）、性別、人事關(guān)系、部門、婚育情況、崗位、畢業(yè)院校、教育程度、月薪范圍、戶籍地性質(zhì)、所屬公司（combobox下拉框）、離職日期、到職日期。</p><p>　　查詢結(jié)果顯示（dbgrid控件，方位：下方）——有查詢個(gè)數(shù)反饋</p><p><b>　　設(shè)計(jì)如圖5.8。</b><

75、/p><p>　　圖5.8員工資料綜合查詢界面</p><p>　　實(shí)施說明：綜合查詢有14個(gè)方式，其中員工姓名可模糊查詢，即敲入姓名中的任何一個(gè)或幾個(gè)字就可查詢；根據(jù)實(shí)際需要該界面增加了重新查詢功能（Ubase父單元沒有這功能）；</p><p>　?。ㄎ澹┎块T管理模塊（分為2個(gè)小模塊窗口）</p><p>　　1、部門資料（資料維護(hù)窗口）&l

76、t;/p><p>　　涉及到的數(shù)據(jù)庫表：Dept</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p><b>　　設(shè)計(jì)如圖5.9。</b></p><p>　　圖5.9 部門管理界面</p><p>　　實(shí)施說明：刪除操作后，列表框中的記錄自動(dòng)刪

77、除，并且增加到列表框中“已停用部門列表”中；</p><p>　　2、部門異動(dòng)（部門調(diào)整窗口）</p><p>　　涉及到的數(shù)據(jù)庫表：Dept</p><p>　?。┟嬖嚬芾砟K（分為2個(gè)小模塊窗口）</p><p><b>　　1、面試管理</b></p><p>　　涉及到的數(shù)據(jù)庫表：In

78、terview,InterViewDetail</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p>　　頁面劃分：應(yīng)聘者信息、初試記錄、復(fù)試記錄、二次復(fù)試記錄、結(jié)論</p><p><b>　　設(shè)計(jì)如圖5.10。</b></p><p>　　圖5.10 面試管理界面

79、</p><p>　　實(shí)施說明：該管理界面不僅有應(yīng)聘者信息管理，同時(shí)還有從初試到錄用過程的信息管理；</p><p><b>　　面試綜合查詢</b></p><p>　　涉及到的數(shù)據(jù)庫表：Interview</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p>

80、<p><b>　　設(shè)計(jì)如圖5.11。</b></p><p>　　圖5.11面試綜合查詢界面</p><p>　　實(shí)施說明：該界面從各角度考慮查詢，其中除了初試/復(fù)試/二次復(fù)試結(jié)果、是否錄用使用Combobox控件外，其他均具有小按鈕查詢功能；輸入查詢條件后點(diǎn)擊查詢按鈕，將另外彈出一個(gè)查詢結(jié)果窗口如圖5.12。</p><p>　

81、　圖5.12 查詢結(jié)果窗口界面</p><p>　　5.2 《薪資系統(tǒng)》實(shí)施</p><p>　　由于企業(yè)員工根據(jù)其工作性質(zhì)和工作崗位劃分為職員和工員，職員指企業(yè)的管理與技術(shù)人員，工員指除管理與技術(shù)以外的其它員工，具體有保潔人員、物料收發(fā)員、生產(chǎn)部組（線）長以下的作業(yè)員等。</p><p>　?。ㄒ唬┬劫Y基礎(chǔ)設(shè)置模塊</p><p>　　涉及

82、到的數(shù)據(jù)庫表：Setsalary</p><p><b>　　薪資的計(jì)算公式：</b></p><p><b>　　職員薪資組成：</b></p><p>　　基本工資＋年資工資＋崗位津貼＋特殊人才津貼＋全勤獎(jiǎng)＋午餐津貼；</p><p><b>　　工員薪資組成：</b>&l

83、t;/p><p>　　基本工資＋年資工資＋崗位津貼＋特殊人才津貼＋考核獎(jiǎng)+全勤獎(jiǎng)＋加班工資；</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p>　　左邊列表框分為：未設(shè)定和已設(shè)定</p><p>　　全薪計(jì)算按上面公式進(jìn)行</p><p><b>　　設(shè)計(jì)

84、如圖5.13。</b></p><p>　　圖5.13 薪資基礎(chǔ)設(shè)置界面</p><p><b>　?。ǘ┑燃?jí)崗位設(shè)置</b></p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p>　　左邊列表框分為職員和工員，右下方：dbgrid控件顯示對(duì)應(yīng)的檔案&l

85、t;/p><p><b>　　設(shè)計(jì)如圖5.14。</b></p><p>　　圖5.14等級(jí)崗位設(shè)置界面</p><p>　?。ㄈ徫唤蛸N參數(shù)設(shè)置</p><p>　　涉及到的數(shù)據(jù)庫表：Allowance，WageGrade</p><p><b>　　設(shè)計(jì)如圖5.15。</b>

86、;</p><p>　　圖5.15 崗位津貼參數(shù)設(shè)置</p><p><b>　　（四）保險(xiǎn)基數(shù)設(shè)置</b></p><p>　　基礎(chǔ)數(shù)據(jù)庫表：Insur</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p><b>　　設(shè)計(jì)如圖5.

87、16。</b></p><p>　　圖5.16保險(xiǎn)基數(shù)設(shè)置界面</p><p>　　5.3 《系統(tǒng)管理》實(shí)施</p><p><b>　?。ㄒ唬┬略鲂掠脩?lt;/b></p><p>　　基礎(chǔ)數(shù)據(jù)庫表：UserAccount</p><p>　　人機(jī)交互：登陸帳號(hào)、員工姓名、密碼、確認(rèn)密碼

88、</p><p><b>　　按鈕：確認(rèn)、取消 </b></p><p>　　圖5.17新增新用戶界面</p><p><b>　　（二）系統(tǒng)模塊管理</b></p><p>　　基礎(chǔ)數(shù)據(jù)庫表：SystemRes</p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、

89、取消、刪除、查詢、打印、退出</p><p><b>　　設(shè)計(jì)如圖5.18。</b></p><p>　　圖5.18系統(tǒng)模塊管理界面</p><p><b>　　（三）系統(tǒng)權(quán)限管理</b></p><p>　　涉及到的數(shù)據(jù)庫表：UserRight,SystemRes，UserAccount</

90、p><p>　　功能按鈕（上面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p><b>　　設(shè)計(jì)如圖5.19。</b></p><p>　　圖5.19系統(tǒng)權(quán)限管理界面</p><p><b>　?。ㄋ模┰O(shè)置審核權(quán)限</b></p><p>　　功能按鈕（上

91、面/繼承）：新增、修改、保存、取消、刪除、查詢、打印、退出</p><p><b>　　設(shè)計(jì)如圖5.20。</b></p><p>　　圖5.20設(shè)置審核權(quán)限界面</p><p><b>　　第六章 關(guān)鍵技術(shù)</b></p><p>　　系統(tǒng)中應(yīng)用了許多重要的技術(shù)，在此僅僅列舉少數(shù)幾個(gè)比較有代表性

92、的重要技術(shù)。其中包括一些典型的公共函數(shù)或過程的建立，公共數(shù)據(jù)模塊的使用，系統(tǒng)資源的充分、合理利用，面向?qū)ο蠹夹g(shù)中繼承性的體現(xiàn)，搜索查詢小模塊的靈活使用，界面數(shù)據(jù)顯示的美觀，系統(tǒng)編程中事務(wù)處理技術(shù)以及一些特殊模塊中數(shù)據(jù)的假刪除技術(shù)等等。</p><p>　　6.1技術(shù)一：common公共代碼模塊</p><p>　　建立一個(gè)名為common模塊，作為公共代碼模塊，提高代碼的重用性，以及提高開

93、發(fā)效率；該模塊所建立的公共代碼函數(shù)和過程將近30個(gè)，下面僅僅羅列出我所建立的幾個(gè)比較典型的過程和函數(shù)。</p><p>　　主要的公共代碼如下：</p><p>　?。ㄒ唬┎樵冃“粹o的定位</p><p>　　procedure SetCommonBBtn(sender:Tobject;ABBtn:TBitBtn;strTableName,strFieldName

94、1,strTitle1,strFieldName2,strTitle2,strFieldName3,strTitle3,WhereStr1,strOrd:string);</p><p>　　var left,top,i:integer; // 定義left 和top兩個(gè)變量作為定位坐標(biāo)</p><p><b>　　begin</b></p><

95、;p>　　if DMcommon.QryCommon.Active=true then DMcommon.QryCommon.Active:=false; //初始化</p><p>　　if sender.ClassType=TEdit then //判斷控件類型，雖然我設(shè)計(jì)此功能控件的有Edit控件、MaskEdit控件和StringGrid控件，因此需要判斷</p><p&g

96、t;<b>　　begin</b></p><p>　　ABBtn.Left:=(sender as TEdit).Left+(sender as TEdit).Width-ABBtn.Width;</p><p>　　//方位左邊=Edit控件方位左邊+Edit控件長度 – 小按鈕長度</p><p>　　ABBtn.Top:=(sender

97、 as TEdit).Top;//方位頂端= Edit控件方位頂端，（左邊，頂端）形成坐標(biāo)</p><p>　　ABBtn.Visible:=true; //按鈕可見</p><p><b>　　end;</b></p><p>　　if (sender.ClassType=TMaskEdit) then //判斷控件類型為MaskEdit控

98、件</p><p><b>　　begin</b></p><p>　　ABBtn.Left:=(sender as TMaskEdit).Left+(sender as TMaskEdit).Width-ABBtn.Width;</p><p>　　//方位左邊=MaskEdit控件方位左邊+Edit控件長度 – 小按鈕長度</p>

99、;<p>　　ABBtn.Top:=(sender as TMaskEdit).Top;</p><p>　　//方位頂端= Edit控件方位頂端，（左邊，頂端）形成坐標(biāo)</p><p>　　ABBtn.Visible:=true; //按鈕可見</p><p><b>　　end;</b></p><p>

100、;　　if (sender.ClassType=TStringGrid) then //判斷控件類型為StringGrid控件</p><p><b>　　begin</b></p><p>　　if (sender as TStringGrid).Options=(sender as TStringGrid).options+[GoEditing] then<

101、;/p><p>　　//判斷StringGrid控件的規(guī)范</p><p><b>　　begin</b></p><p>　　left:=(sender as TStringGrid).left; //左邊方位初始化為StringGrid表格的左邊方位</p><p>　　for i:=0 to (sender as T

102、StringGrid).col do //循環(huán)范圍：0到StringGrid的列數(shù)</p><p>　　left:=left+(sender as TStringGrid).ColWidths[i];</p><p>　　//左邊=StringGrid表格的左邊+StringGrid的列寬</p><p>　　left:=left-ABBtn.width; //左

103、邊=StringGrid表格的左邊+StringGrid的列寬 – 小按鈕的寬度</p><p>　　//showmessage(inttostr(left));</p><p>　　ABBtn.left:=left;//返回上面的左邊定位為小按鈕的左邊方位</p><p>　　Top:=(sender as TStringGrid).top+((sender as

104、 TStringGrid).Row)*(sender as TStringGrid).RowHeights[0];</p><p>　　//頂端方位=StringGrid的頂端+StringGrid的行數(shù)*StringGrid的行高</p><p>　　// showmessage(inttostr(top));</p><p>　　ABBtn.Top:=(send

105、er as TStringGrid).top+((sender as TStringGrid).Row)*(sender as TStringGrid).RowHeights[0];</p><p>　　//頂端方位=StringGrid的頂端+StringGrid的行數(shù)*StringGrid的行高</p><p>　　ABBtn.Visible:=true;//按鈕可見</p>

106、;<p><b>　　end;</b></p><p><b>　　end;</b></p><p><b>　　end;</b></p><p>　　（二）callsearch過程——供搜索查詢窗口調(diào)用</p><p>　　Procedure CallSearc

107、h(AMC:TMonthCalendar);</p><p>　　var str : string;</p><p><b>　　begin</b></p><p>　　if PUsender.ClassType=TmaskEdit //判斷類型為maskEdit控件</p><p><b>　　then<

108、;/b></p><p><b>　　begin</b></p><p>　　AMC.left:=(PUsender as TMaskEdit).Left;// TmonthCalendar控件的左邊= TmaskEdit控件左邊</p><p>　　if (AMC.left+AMC.Width)>780 then//TmonthC

109、alendar日歷的方位范圍</p><p>　　AMC.left:=(PUsender as TMaskEdit).left+(PUsender as TMaskEdit).width-AMC.Width;</p><p>　　// TmonthCalendar控件的左邊= TmaskEdit控件的左邊+ TmaskEdit控件的寬度 - TmonthCalendar控件的寬度</

110、p><p>　　AMC.top:=(PUsender as TMaskEdit).top+(PUsender as TMaskEdit).Height;</p><p><b>　　//頂端定位</b></p><p>　　AMC.visible:=true;// TmonthCalendar顯現(xiàn)</p><p>　　if

111、(PUsender as TMaskEdit).Text<>' - - ' then // TmaskEdit控件的輸出格式</p><p>　　AMC.Date:=strtodate((PUsender as TMaskEdit).text);//日期輸出格式控制</p><p><b>　　exit;</b></p>

112、;<p><b>　　end</b></p><p>　　else if (PUsender.ClassType=TEdit) or (PUsender.ClassType=TStringGrid) then//另一判斷</p><p><b>　　begin</b></p><p>　　Applicatio

113、n.CreateForm(TSearchFrm, SearchFrm);</p><p>　　SearchFrm.Show;//搜索窗口的調(diào)用</p><p><b>　　try</b></p><p>　　if DMcommon.QryCommon.Active=true then DMcommon.QryCommon.Active:=fal

114、se;//初始化</p><p>　　DMcommon.DSCommon.DataSet:=DMcommon.QryCommon;//數(shù)據(jù)源</p><p>　　str:=GetStr(PUsender);</p><p>　　DMcommon.Exec_SqlOpen(GetStr(PUsender));//公共查詢函數(shù)打開</p><p>

115、;　　SearchFrm.lab_name.caption := trim(Title1)+':';//顯示字段的值的規(guī)定</p><p>　　if trim(fieldName1) <> '' then //搜索窗口字段一的定義</p><p><b>　　begin</b></p><p>　　S

116、earchFrm.DBGrid1.Columns.Add.FieldName := FieldName1;</p><p>　　SearchFrm.DBGrid1.Columns.Items[0].Title.caption := Title1;//字段名</p><p>　　SearchFrm.DBGrid1.Columns.Items[0].Width := 120;//賦予的寬度&l

117、t;/p><p><b>　　end;</b></p><p>　　if trim(fieldName2) <> '' then//搜索窗口字段二的定義</p><p><b>　　begin</b></p><p>　　SearchFrm.DBGrid1.Columns.A

118、dd.FieldName := FieldName2;</p><p>　　SearchFrm.DBGrid1.Columns.Items[1].Title.caption := Title2;//字段名</p><p>　　SearchFrm.DBGrid1.Columns.Items[1].Width := 120;//賦予的寬度</p><p><b&g

119、t;　　end;</b></p><p>　　if trim(fieldName3) <> '' then//搜索窗口字段三的定義</p><p><b>　　begin</b></p><p>　　SearchFrm.DBGrid1.Columns.Add.FieldName := FieldName3

120、;</p><p>　　SearchFrm.DBGrid1.Columns.Items[2].Title.caption := Title3;//字段名</p><p>　　SearchFrm.DBGrid1.Columns.Items[2].Width := 120;//賦予的寬度</p><p><b>　　end;</b></p&g

121、t;<p>　　SearchFrm.SearchEdt.SetFocus;//焦點(diǎn)定位在Edit控件名為SearchEdt中</p><p>　　SearchFrm.StatusBar1.Panels.Items[0].text :='共查詢到'+inttostr(DMcommon.QryCommon.recordcount)+'條記錄';//返回結(jié)果集的個(gè)數(shù)<