【正文】 務(wù)部門人員，他們只能瀏覽或修改除“員工信息” 和“出勤信息”外的頁(yè)面內(nèi)容，而且有些功能也受到限制；另外，還有一個(gè) guest 用戶，是專門用于普通用戶登錄的，其權(quán)限將受到較大的限制。 . INI 文件解析 INI 配置文件是一種自定義格式文件，該文件按照記錄存儲(chǔ)方式存儲(chǔ)用戶設(shè)計(jì) 的基本信息。其語(yǔ)法為： procedure CloseFile(var F)。當(dāng)文件關(guān)閉后，變化的內(nèi)容才會(huì)保存到 磁盤上，否則改變后的文件內(nèi)容就極 有可能丟失。一般情況下，使用 FileExists 函數(shù)檢測(cè)即可避免這樣的問題。 若 FileName 指定的文件存在，該函數(shù)將返回 Ture；若文件不存在，將返回 False。 對(duì)于文件處理還需要注意： （ 1） 用戶在打開文件前應(yīng)該對(duì)文件是否存在進(jìn)行檢測(cè)，可使用兩種方法完成 這個(gè)功能。其語(yǔ)法為： procedure ReWrite(var F:File[。 （ 3） 對(duì)于磁盤上沒有的文件，需要?jiǎng)?chuàng)建。 文件打開后使用相應(yīng)的過程或函數(shù)讀取文件的內(nèi)容，對(duì)不同的文件類型有不同的讀取 方法。 （ 2） 接下來(lái)使用 Reset 方法打開文件，其語(yǔ)法為： procedure Reset(var F[:File。 其中 F 是任意類型的文件變量， FileName 則是存在于磁盤上的外部文件名。其語(yǔ)法為： procedure AssignFile(var F。 文件操作的步驟如下： （ 1） 若文件已存在于磁盤上，則首先使用 AssignFile 方法將文件變量與實(shí)際 文件相連。在本設(shè) 計(jì)中，采用 INI文件實(shí)現(xiàn)對(duì)用戶名和密碼的存儲(chǔ)，其缺點(diǎn)是安全性不太高。所以在數(shù)據(jù)庫(kù)程序啟動(dòng)時(shí)需要輸入用戶名和密碼后才能進(jìn)入，程序根據(jù) 用戶名找到用戶的權(quán)限，確定哪些功能可以使用。 10 第四章 主要功能模塊劃分 系統(tǒng)登錄模塊設(shè)計(jì) 對(duì)多用戶數(shù)據(jù)庫(kù)程序來(lái)說(shuō)，不同的用戶應(yīng)有不同的權(quán)限。 UpdateActivePage 方法。參數(shù) GoForward 決定是前一頁(yè)還是后一頁(yè)。 SelectNextPage 方法。當(dāng) CurPage 參數(shù)指定的不是 PageControl 組件中的一頁(yè)時(shí)，如果參數(shù) GoForward 為 True，則該方法返回組件的第一頁(yè)；否則 調(diào)用該方法返回最后一頁(yè)。其功 能是返回指定頁(yè)的下一頁(yè)。 CanShowTab 方法。如果在運(yùn)行期在組件中添加新頁(yè)，則可以調(diào)用該方法完成各頁(yè)的必要的調(diào)整。 該屬 性決定 PageControl 組件的頁(yè)面如何顯示。 該屬性確定在 Pages 屬性中所包含的頁(yè)數(shù)。 可使用 FindNextPage 方法定位 PageControl 組件中的特定頁(yè)。 Pages 屬性。在運(yùn)行期 Delphi 提 一些方法用于實(shí)時(shí)設(shè)置該屬性，例如，使用 SelectNextPage 方法指定下一個(gè)相 鄰頁(yè)為當(dāng)前頁(yè)， FindNextPage 方法可以查找下一個(gè)當(dāng)前頁(yè)，返回值為該頁(yè) 的 Name 屬性。因?yàn)?PageControl 組件實(shí)際上是為 TabSheet 組件提供了一個(gè) 類似的容器的功能，而真正與各個(gè)不同組件對(duì)象相對(duì)應(yīng)的是 TabSheet 組件。 ActivePage 屬性。如果只需建立一個(gè)單頁(yè)，則可用 Win32 組件頁(yè)的 TabControl 組件。用戶通過選擇出現(xiàn)在頁(yè)面上部的 Tab，以選擇不同的選項(xiàng)卡。 Hint：該屬性定義當(dāng)鼠標(biāo)在 Panel 組件上移動(dòng)時(shí)所顯示的文本。 Name：該屬性定義 Panel 組件的名稱?？蓡螕魧傩杂疫叺陌粹o，打開“字體”對(duì)話框， 進(jìn)行設(shè)置。 BevelOuter：該屬性定義面板外框的顯示風(fēng)格，即有無(wú)外框。若有，是凸出 還是凹進(jìn)。 其可選值為alNone,alTop,alBotton,alLeft,alRight,alClient,alCustom。 另外， Panel 組件還可以處理提示。 從圖形角度來(lái)看，面板類似于兩個(gè) Bevel組件，因?yàn)樗袃蓚€(gè)可以使用的 Bevel 元素。而面板更多的是使用它的 三維效果來(lái)增進(jìn)應(yīng)用程序的視覺效果。面板可以看作是將窗體客戶區(qū)劃分為不同部分并將其他組件編組的工具。 Panel 和 PageControl 組件 Panel 組件和 PageControl 組件是在程序開發(fā)過程中經(jīng)常使用的組件，熟練掌握 它們對(duì)程序的開發(fā)設(shè)計(jì)大有益處。這種界面的優(yōu)點(diǎn)是結(jié)構(gòu)緊 湊，邏輯性強(qiáng)。 7 系統(tǒng)功能模塊設(shè)計(jì) 考勤信息管理系統(tǒng)的主要功能模塊及其關(guān)系，如圖 所示： 圖 考勤信息系統(tǒng)主要功能模塊 主界面設(shè)計(jì) 窗體 主界面的設(shè)計(jì)是數(shù)據(jù)庫(kù)開發(fā)的關(guān)鍵步驟，因?yàn)樗谀撤N程度上體現(xiàn)了程序開發(fā) 的質(zhì)量和水平。將其數(shù)據(jù)表的設(shè)計(jì) 如下： 員工基本信息表（ ） 字段名 字段類型 字段大小 關(guān)鍵字 編號(hào)（ BianHao） A 6 * 姓名（ XingMing） A 10 姓名編碼（ Bianma） A 5 性別（ Sex） A 2 部門（ BuMen） A 12 職稱（ ZhiCheng） A 12 6 住址（ ZhuZhi） A 40 基本工資（ GongZi） N 表 21 員工基本信息表 出勤情況表（ ） 字段名 字段類型 字段大小 關(guān)鍵字 員工編號(hào)（ BianHao） A 6 * 月份（ YueFen） A 6 * 應(yīng)出勤（ Ychuqin） N 遲到（ Chidao） N 早退（ Zaotui） N 請(qǐng)假（ Qingjia） N 曠工（ Kuanggong） N 實(shí)際出勤（ Schuqin） N 表 32 出勤信息表 工資表（ ） 字段名 字段類型 字段大小 關(guān)鍵字 員工編號(hào)（ BianHao） A 6 * 月份（ YueFen） A 6 * 基本工資（ GongZi） N 獎(jiǎng)金（ Jiangjin） N 實(shí)際 工資（ Sgongzi） N 表 33 工資表 需要說(shuō)明一下的是，在員工基本信息表中設(shè)置了一個(gè)姓名的編碼字段，那是因?yàn)? 在查詢員工姓名時(shí)輸入中文比較麻煩，常用的辦法是提取中文姓名的每個(gè)字的首字母 用于查詢，因此就增加了“ Bianma” 字段的定義。 數(shù)據(jù)庫(kù)設(shè)計(jì) 基于以上的功能分析，可為考勤系統(tǒng)創(chuàng)建 3個(gè)數(shù)據(jù)表，表的類型為 Paradox。 密碼修改功能； 按姓名信息查看員工。 瀏覽和修改員工的工資情況，可同時(shí)查看該員工的基本信息； 輸入基本工資和獎(jiǎng)金 信息并計(jì)算實(shí)際工資； 瀏覽和修改員工基本信息； 實(shí)現(xiàn)系統(tǒng)登錄功能（密碼修改功能），并限制不同用戶（包括普通員工、人事 部門人員、財(cái)務(wù)部人員及管理員）登錄所查看的信息； 以上只是簡(jiǎn)單 地對(duì)本系統(tǒng)做了些功能方面的需求分析，具體的系統(tǒng)需要完成的 功能信息將在下一章的整體設(shè)計(jì)中得以具體的介紹。 系統(tǒng)需求分析 本系統(tǒng)由于時(shí)間的關(guān)系，并沒有實(shí)際地與用戶進(jìn)行交流去了解他們的要求，而是 通過自己對(duì)現(xiàn)代化企業(yè)的一些了解而做出的一些分析。 按照軟件工程對(duì)軟件開發(fā)過程的描述，需求階段我們可以細(xì)分為需求調(diào)研和需求分析兩個(gè)小階段，需求調(diào)研需要充分細(xì)致的了解客戶目標(biāo)，用戶業(yè)務(wù)內(nèi)容、流程等，這是一個(gè)對(duì)需求的采集過程，是進(jìn)行需求分析的基礎(chǔ)準(zhǔn)備。 軟件的 需求分析是從用戶的業(yè)務(wù)中提取出軟件系統(tǒng)能夠幫助用戶解決的業(yè)務(wù)問題，通過對(duì)用戶業(yè)務(wù)問題的分析，規(guī)劃出我們的軟件產(chǎn)品。 8. 企業(yè)版的 VCL 中一共包含有 200 多個(gè)控件，利用這些控件，用戶可以奇跡般地加快應(yīng)用程序從開始開發(fā)到推向市場(chǎng)的速度。 6. 利用 中的 MIDAS 3(Multitier Distributed Application Services Suite )，用戶可以創(chuàng)建高效靈活的 Delphi程序，以滿足日益增長(zhǎng)的事務(wù)量和用戶數(shù)的需要。把 InterBase Express 結(jié)合起來(lái)使用，可以在只需少量維護(hù)工作且只占用很少系統(tǒng)資源的數(shù)據(jù)庫(kù)上進(jìn)行高效率、高性能的開發(fā)。通過 ADO， 問關(guān)系型或非關(guān)系型數(shù)據(jù)庫(kù)以及 Email 和文件系統(tǒng)。 2. 支