maindata.pas

来自「用delphi编的企业人事管理系统」· PAS 代码 · 共 49 行

unit MainData;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  DB, DBTables, ADODB;

type
  TDatarenshi = class(TDataModule)
    ADOTable1: TADOTable;
    DataSource1: TDataSource;
    ADOTable1BH: TAutoIncField;
    ADOTable1XM: TWideStringField;
    ADOTable1XB: TWideStringField;
    ADOTable1MZ: TWideStringField;
    ADOTable1CSNY: TDateTimeField;
    ADOTable1SFZ: TWideStringField;
    ADOTable1DH: TWideStringField;
    ADOTable1XX: TWideStringField;
    ADOConnection1: TADOConnection;
    ADOTable1JG: TWideStringField;
    ADOTable1BMBH: TWideStringField;
    ADOTable1ZZ: TWideStringField;
    ADOTable1BZ: TMemoField;
    DataSource2: TDataSource;
    ADOTable2: TADOTable;
    ADOTable3: TADOTable;
    ADOTable4: TADOTable;
    DataSource3: TDataSource;
    DataSource4: TDataSource;
    ADOQuery1: TADOQuery;
    DataSource5: TDataSource;
    ADOTable1XLMC: TWideStringField;
    ADOTable1zcbh: TWideStringField;

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Datarenshi: TDatarenshi;

implementation
{$R *.dfm}
end.