OnAuthorizationChangedOk(Sender: TObject)
A response to
SetAuthoriation procedure
.