人事檔案管理系統(tǒng)-資料下載頁
2025-04-16 12:40本頁面
【正文】 el。 Label4: TLabel。 Label5: TLabel。 Label6: TLabel。 Label7: TLabel。 Label8: TLabel。 DBEdit8: TDBEdit。 Label9: TLabel。 DBEdit9: TDBEdit。 Label10: TLabel。 Label11: TLabel。 DBEdit10: TDBEdit。 DBEdit11: TDBEdit。 Label12: TLabel。 Label13: TLabel。 DBEdit12: TDBEdit。 Label14: TLabel。 DBEdit13: TDBEdit。 Label15: TLabel。 DBEdit14: TDBEdit。 procedure Button1Click(Sender: TObject)。 procedure Button2Click(Sender: TObject)。 private { Private declarations } public { Public declarations } end。var Form2: TForm2。implementation{$R *.dfm}procedure (Sender: TObject)。beginend。procedure (Sender: TObject)。beginend。end.員工工資管理模塊。unit Unit3。interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, ExtCtrls, DBCtrls, Grids, DBGrids, StdCtrls。type TForm3 = class(TForm) ADOTable1: TADOTable。 DataSource1: TDataSource。 DBGrid1: TDBGrid。 DBNavigator1: TDBNavigator。 Label1: TLabel。 private { Private declarations } public { Public declarations } end。var Form3: TForm3。implementation{$R *.dfm}end.,員工檔案修改模塊。unit Unit4。interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DB, ADODB, StdCtrls。type TForm4 = class(TForm) ADOTable1: TADOTable。 DataSource1: TDataSource。 DBGrid1: TDBGrid。 DBNavigator1: TDBNavigator。 Label1: TLabel。 private { Private declarations } public { Public declarations } end。var Form4: TForm4。implementation{$R *.dfm}end. 考勤模塊：。unit Unit5。interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls, ExtCtrls, DBCtrls。type TForm5 = class(TForm) ADOTable1: TADOTable。 DataSource1: TDataSource。 Label1: TLabel。 DBGrid1: TDBGrid。 DBNavigator1: TDBNavigator。 private { Private declarations } public { Public declarations } end。var Form5: TForm5。implementation{$R *.dfm}end.5．統(tǒng)計(jì)界面unit Unit7。interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, Grids, DBGrids, StdCtrls。type TForm7 = class(TForm) ADOTable1: TADOTable。 DataSource1: TDataSource。 DataSource2: TDataSource。 DataSource3: TDataSource。 DataSource4: TDataSource。 ADOTable2: TADOTable。 ADOTable3: TADOTable。 ADOTable4: TADOTable。 DBGrid1: TDBGrid。 Label1: TLabel。 DBGrid2: TDBGrid。 Label2: TLabel。 DBGrid3: TDBGrid。 Label3: TLabel。 DBGrid4: TDBGrid。 Label4: TLabel。 Label5: TLabel。 private { Private declarations } public { Public declarations } end。var Form7: TForm7。implementation{$R *.dfm}end.5．2 數(shù)據(jù)庫的實(shí)現(xiàn)員工信息登記表 該表主要完成員工信息的錄入、刪除 、更新等功能收銀表： 檔案號(hào)姓名年齡性別身高體重職位職稱部門進(jìn)公司時(shí)間家庭住址電話手機(jī)身份證號(hào)11133男經(jīng)理高級(jí)經(jīng)濟(jì)師5222女部門經(jīng)理經(jīng)濟(jì)師5334女職員技工5ddddddd女部門經(jīng)理工程師5fff女職員技工50416tsc男職員技工50416ssss男技術(shù)員技術(shù)員50416ee男技術(shù)員技術(shù)員1041622男技術(shù)員技術(shù)員004118sssss男技術(shù)員技術(shù)員0431考勤管理
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號(hào)-1