Class TParamForm (unit Unit2)

Inherits from

TForm

Constructors



Functions

procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


function GetPassword : Boolean;


procedure SetFuncs(Sender: TObject);


procedure SetNames(Sender: TObject);

Private declarations

Properties

Events

Variables

BitBtn1 : TBitBtn;


Database1 : TDatabase;


EUserName : TEdit;


Label1 : TLabel;


Label16 : TLabel;


Label3 : TLabel;


Panel1 : TPanel;


RoleEdit : TEdit;


UserNumEdit : TEdit;


VSAccess1 : TVSAccess;


FActive : Boolean;


FRoleID : Integer;


FUserNum : Integer;

Public declarations


Constructors


Functions


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


function GetPassword : Boolean;


procedure SetFuncs(Sender: TObject);


procedure SetNames(Sender: TObject);

Private declarations


Properties


Events


Variables


BitBtn1 : TBitBtn;


Database1 : TDatabase;


EUserName : TEdit;


Label1 : TLabel;


Label16 : TLabel;


Label3 : TLabel;


Panel1 : TPanel;


RoleEdit : TEdit;


UserNumEdit : TEdit;


VSAccess1 : TVSAccess;


FActive : Boolean;


FRoleID : Integer;


FUserNum : Integer;

Public declarations