職工檔案管理信息系統(tǒng)的設計與實現(xiàn)(編輯修改稿)
2024-12-22 16:38 本頁面
【文章內(nèi)容簡介】 on 設為“職務” 提示輸入職務 0138 3855 14 Label4 Caption 設為“職工姓名” 提示輸入姓名 Label5 Caption 設為“職工編號” 提示輸入職工編號 Label6 Caption 設為“工資” 提示輸入工資 Label7 Caption 設為“政治面貌” 提示輸入政治面貌 Label8 Caption 設為“性別” 提示輸入性別 Label9 Caption 設為“出生日期” 提示輸入出生日期 Label10 Caption 設為“民族” 提示輸入民族 Label11 Caption 設為“學歷” 提示輸入學歷 Label12 Caption 設為“健康狀況” 提示輸入健康狀況 Label13 Caption 設為“聯(lián)系電話” 提示輸入聯(lián)系電話 Label15 Caption 設為“籍貫” 提示輸 入籍貫 DBEdit1 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“職工編號” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit2 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“職工姓名” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit3 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 0138 3855 15 Datafield 設為“性別” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit4 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù) 源 Datafield 設為“出生日期” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit5 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“民族” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit6 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“政治面貌” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit7 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“健康狀況” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit8 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“學歷” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit9 Datasource 設為 選擇數(shù)據(jù)源 0138 3855 16 “ Datasourc1” Datafield 設為“職務” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit10 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“工資” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit11 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設 為“聯(lián)系電話” 是數(shù)據(jù)與輸出窗口相匹配 DBEdit12 Datasource 設為“ Datasourc1” 選擇數(shù)據(jù)源 Datafield 設為“籍貫” 是數(shù)據(jù)與輸出窗口相匹配 BitBtn1 Caption 設為“輸入” 輸入數(shù)據(jù) BitBtn2 Caption 設為“修改” 對數(shù)據(jù)進行修改 BitBtn3 Caption 設為“刪除” 刪除數(shù)據(jù) 流程圖如下圖示： 0138 3855 17 圖 9 輸入流程圖 圖 10 修改流程圖 編寫 tabsheet2 代碼 ● 處理登陸窗體的 事件 該事件的主要功能是添加職工檔案信息。 登陸窗體的 事件 對應的代碼如下： procedure (Sender: TObject)。 begin 。 end。 ● 處理登陸窗體的 事件 該事件的主要功能是修改職工檔案信息。 開始 開始 退出 輸入職工信息 判斷是否重復 保存數(shù)據(jù) 退出 連接數(shù)據(jù)庫 連接數(shù)據(jù)庫 輸入修改信息 判斷是否重復 保存數(shù)據(jù) Yes No No Yes 0138 3855 18 登陸窗體的 事件 對應的代碼如下： procedure (Sender: TObject)。 begin 。 。 end。 ● 處理登陸窗體的 事件 該事件的主要功能是刪除職工檔案信息。 登陸窗體的 事件 對應的代碼如下： procedure (Sender: TObject)。 begin 。 end。 2. Tabsheet3（全部檔案瀏覽查詢）建立及設置 Tabsheet3 表單中設置了 DBGird 控件， Label 控件和 Button 按鈕其主要功能是顯示每個職工的全部信息，并可以通過輸入職工姓名查詢每個職工的信息。 Tabsheet3 的操作界面： 圖 11 瀏覽查詢界面編輯 0138 3855 19 表 4 tabsheet2 主要控件的屬性設置和功能表 組件 屬性 功能 Label Caption 設為“請輸入職工姓名” 提示輸入所要查詢的職工姓名 DBGird1 Datasource 設為“ Datasourc1” 設置數(shù)據(jù)表格使用的數(shù)據(jù)源 Edit1 Text 屬性為空， 用于輸入要查詢的職工姓名 Button Caption 設為“執(zhí)行查詢” 進入查詢 流程圖 : 開始 輸入查詢信息 判斷是否存在 輸出數(shù)據(jù) 退出 連接數(shù)據(jù)庫 No Yes 0138 3855 20 圖 12 查詢流程圖 編寫 Tabsheet3 代碼： 處理登陸窗體的 TForm2. Button1Click 事件 該事件的主要功能是查詢職工檔案信息，當輸入的姓名在數(shù)據(jù)庫中時黑三角指向?qū)穆毠ぃ駝t保持不變。 登陸窗體的 TForm2. Button1Click 事件 對應的代碼如下 procedure (Sender: TObject)。 begin (39。職工姓名 39。, ,[]) end。 （報表功能）建立及設置 Tabsheet4 表單的設計主要包括兩大部分：數(shù)據(jù)表的建立和操作界面的設置。其主要功能是顯示職工的全部信息。 建立一個數(shù)據(jù)報表 圖 13 數(shù)據(jù)報表的建立 0138 3855 21 表 5 QuickRep1 主要控件的屬性 設置和功能表 組件 組件 屬性 功能 QRBand1 QRLabel7 Caption 設為“職工基本信息” 在報表中顯示靜態(tài)文本 QRBand2 QRDBText1 Dataset 設為“ ADOTable1” 指定數(shù)據(jù)來源，顯示數(shù)據(jù)庫表中記錄的字段 QRDBText2 Dataset 設為“ ADOTable1” 指定數(shù)據(jù)來源，顯示數(shù)據(jù)庫表中記錄的字段 QRDBText3 Dataset 設為“ ADOTable1” 指定數(shù)據(jù)來源，顯示數(shù)據(jù)庫表中記錄的字段 QRDBText4 Dataset 設為“ ADOTable1” 指定數(shù)據(jù)來源，顯示數(shù)據(jù)庫表中記錄的字段 QRDBText5 Dataset 設為“ ADOTable1” 指定數(shù)據(jù)來源，顯示數(shù)據(jù)庫表中記錄的字段 QRLabel2 將 Name 設為QRLabel2 在報表中顯示靜態(tài)文本 QRLabel3 ” 將 Name 設為QRLabel3 在報表中顯示靜態(tài)文本 0138 3855 22 QRBand3 QRLabel4 將 Name 設為QRLabel4 在報表中顯示靜態(tài)文本 QRLabel5 將 Name 設為QRLabel5 在報表中顯示靜態(tài)文本 QRLabel6 將 Name 設為QRLabel6 在報表中顯示靜態(tài)文本 Tabsheet4 的操作界面： 圖 14 報表功能界面編輯 在該頁面中添加了一個數(shù)據(jù)控制控件 Radiobutton 并將其與 Form3 窗體鏈接，把它的Caption 設為“基本信息打印”。
高考資料相關推薦
鄂ICP備17016276號-1