Unit ChPswDlg

*****************************************************} { } { Delphi VCL Extensions (RX) } { } { Copyright (c) 1995, 1996 AO ROSNO } { } {

Classes

TChPswdForm -

Functions

ChangePasswordDialog -

Types

TChangePasswordEvent

Constants

Variables


Functions


function ChangePasswordDialog(Database: TDatabase; AttemptNumber: Integer; const UsersTableName, UserNameField, LoginName: string; MaxPwdLen: Integer; EnableEmptyPassword: Boolean; ChangePasswordEvent: TChangePasswordEvent): Boolean;


Types


TChangePasswordEvent = function(UsersTable: TTable;
    const OldPassword, NewPassword: string): Boolean of object

Constants


Variables