dm_user_pas.pas

来自「delphi6.0电子寻更源程序,用来计算保安有无查抄」· PAS 代码 · 共 31 行

unit dm_user_pas;

interface

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

type
  Tdm_user = class(TDataModule)
    ds_user: TDataSource;
    T_user: TQuery;
    T_userUserid: TAutoIncField;
    T_userPassword: TStringField;
    T_userUsername: TStringField;
    T_userRight: TStringField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dm_user: Tdm_user;

implementation

{$R *.DFM}

end.