⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 data.pas

📁 关于DEPHI7.0的人力资源信息管理系统源代码
💻 PAS
字号:
unit Data;

interface

uses
  SysUtils, Classes, DB, DBTables, ADODB;

type
  TDataModule1 = class(TDataModule)
    DataSource1: TDataSource;
    Table1: TTable;
    DataSource2: TDataSource;
    DataSource5: TDataSource;
    Table5: TTable;
    DataSource6: TDataSource;
    Table6: TTable;
    DataSource7: TDataSource;
    Table6EMPID: TStringField;
    Table6StartDate: TDateField;
    Table6EndDate: TDateField;
    Table6ACHIEVESUVEY: TStringField;
    Table6ENCOURAGE: TStringField;
    Table6DEALSTATION: TStringField;
    Table6ACHIEVENAME: TStringField;
    Table6EMPNAME: TStringField;
    Table5HTNUMBER: TStringField;
    Table5HTTIMELIMIT: TStringField;
    Table5StartDate: TDateField;
    Table5VISEDate: TDateField;
    Table5EndDate: TDateField;
    Table5STOPREASON: TStringField;
    Table5STOPBYDEPT: TStringField;
    Table5STOPDate: TDateField;
    Table1EMPID: TStringField;
    Table1SEX: TStringField;
    Table1BIRTHDAY: TDateField;
    Table1IDCARD: TStringField;
    Table1NATIVE: TStringField;
    Table1JOBFROM: TDateField;
    Table1JOBYEAR: TStringField;
    Table1HOMEADDRESS: TStringField;
    Table1TECHTITLE: TStringField;
    Table1POSITIONTITLE: TStringField;
    Table1MARRIAGE: TStringField;
    Table1EDU: TStringField;
    Table1POLITY: TStringField;
    Table1NATION: TStringField;
    Table1DEGREE: TStringField;
    Table1ADMINPOSITION: TStringField;
    Table1JOBKIND: TStringField;
    Table1HEALTH: TStringField;
    Table1JOBTYPE: TStringField;
    Table1EMPSTATE: TStringField;
    Table1POSTCLASS: TStringField;
    Table1ADMINSIGN: TStringField;
    Table1SPECIALITY: TStringField;
    Table1CLANDATE: TDateField;
    Table1FOREIGNLANGUAGE: TStringField;
    Table1FOREIGNGRADE: TStringField;
    Table1PHONE: TStringField;
    Table1EMAIL: TStringField;
    Table1OFFICE: TStringField;
    Table1EMPNAME: TStringField;
    Table1MOBILEPHONE: TStringField;
    Table1ZIP: TStringField;
    Table5EMPID: TStringField;
    Table5EMPDEPT: TStringField;
    Table5EMPNAME: TStringField;
    Table6EMPDEPT: TStringField;
    Table2: TTable;
    Table2EMPID: TStringField;
    Table2EDUDEGREE: TStringField;
    Table2SPECIALITY: TStringField;
    Table2SCHOOL: TStringField;
    Table2GRADUATEDate: TDateField;
    Table2SPECIALITY2: TStringField;
    Table2SCHOOL2: TStringField;
    Table2GRADUATEDate2: TDateField;
    Table2EMPNAME: TStringField;
    Table2EMPDEPT: TStringField;
    Table1EMPDEPT: TStringField;
    Table1ENTERDATE: TDateField;
    Table1PHOTO: TStringField;
    Table7: TTable;
    Table7EMPID: TStringField;
    Table7EMPNAME: TStringField;
    Table7EMPDEPT: TStringField;
    Table7PHOTO: TGraphicField;
    Table4: TTable;
    Table4StartDate: TDateField;
    Table4EndDate: TDateField;
    Table4TECHGRADE: TStringField;
    Table4TECHPOSITION: TStringField;
    Table4ADMINGRADE: TStringField;
    Table4ADMINPOSITION: TStringField;
    Table4JOBPOSITION: TStringField;
    Table4JOBTYPE: TStringField;
    Table4EMPID: TStringField;
    Table4EMPNAME: TStringField;
    Table4INDEPT: TStringField;
    Table4INCORP: TStringField;
    DataSource4: TDataSource;
    Table3: TTable;
    DataSource3: TDataSource;
    Table3ManagerName: TStringField;
    Table3PassWord: TStringField;
    Table3UseDate: TDateField;
    Table3UseTime: TTimeField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;

implementation

{$R *.dfm}

end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -