Class TControlSecurityManager

Unit

ControlSecurityManager

Declaration

type TControlSecurityManager = class(TComponent)

Description

TControlSecurityManager

Hierarchy

• TComponent
• TControlSecurityManager

Overview

Methods

	constructor Create(AOwner: TComponent); override;
	destructor Destroy; override;
	function Login(Userlogin, Userpassword: UTF8String; var UID: Integer):Boolean; overload;
	function Login:Boolean; overload;
	procedure Logout;
	procedure Manage;
	function GetCurrentUserlogin:UTF8String;
	procedure TryAccess(sc:UTF8String);
	procedure RegisterControl(control:IHMIInterface);
	procedure UnRegisterControl(control:IHMIInterface);
	procedure UpdateControls;
	function CanAccess(sc:UTF8String):Boolean;
	procedure ValidateSecurityCode(sc:UTF8String);
	procedure RegisterSecurityCode(sc:UTF8String);
	procedure UnregisterSecurityCode(sc:UTF8String);
	function SecurityCodeExists(sc:UTF8String):Boolean;
	function GetRegisteredAccessCodes:TStringList;
	function CheckIfUserIsAllowed(sc:UTF8String; RequireUserLogin:Boolean; var userlogin:UTF8String):Boolean;

Properties

property UserManagement: TBasicUserManagement read FUserManagement write SetUserManagement;

Description

Methods

	constructor Create(AOwner: TComponent); override;

	destructor Destroy; override;

	function Login(Userlogin, Userpassword: UTF8String; var UID: Integer):Boolean; overload;

	function Login:Boolean; overload;

	procedure Logout;

	procedure Manage;

	function GetCurrentUserlogin:UTF8String;

	procedure TryAccess(sc:UTF8String);

	procedure RegisterControl(control:IHMIInterface);

	procedure UnRegisterControl(control:IHMIInterface);

	procedure UpdateControls;

	function CanAccess(sc:UTF8String):Boolean;

	procedure ValidateSecurityCode(sc:UTF8String);

	procedure RegisterSecurityCode(sc:UTF8String);

	procedure UnregisterSecurityCode(sc:UTF8String);

	function SecurityCodeExists(sc:UTF8String):Boolean;

	function GetRegisteredAccessCodes:TStringList;

	function CheckIfUserIsAllowed(sc:UTF8String; RequireUserLogin:Boolean; var userlogin:UTF8String):Boolean;

Properties

	property UserManagement: TBasicUserManagement read FUserManagement write SetUserManagement;

---

Generated by PasDoc 0.14.0.