Authorization Event

Fired when the client presents its credentials to the server.

Syntax

type TAuthorizationEvent = procedure Authorization(Sender: TObject; ConnectionId: Integer; UserIndex: Integer; const User: String; const Password: String;var Accept: Boolean) of object;
property OnAuthorization: TAuthorizationEvent read FOnAuthorization write FOnAuthorization;

Remarks

This is where the server can decide whether to continue or not, based on the supplied User and Password.

To accept or reject a connection set Accept to True of False.

The Accept parameter defaults to True if User is found in the AuthorizedUsers collection and Password matches, and False otherwise. The UserIndex parameter indicates the index at which the authorized user was found in the collection.

A UserIndex of -1 means that no matching credentials were found in the AuthorizedUsers collection.