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