TsgcWebSocketServer › Événements › OnAuthentication
Se déclenche lorsque l'authentification est activée afin que l'application puisse vérifier le nom d'utilisateur et le mot de passe et accepter ou rejeter la connexion.
property OnAuthentication: TsgcWSAuthenticationEvent;
// TsgcWSAuthenticationEvent = procedure(Connection: TsgcWSConnection; aUser, aPassword: String; var Authenticated: Boolean) of object—
OnAuthentication est déclenché chaque fois que le serveur reçoit une requête d'authentification d'un client, à condition que Authentication.Enabled soit True et que la méthode d'authentification soit l'un des schémas intégrés (Basic, Session, URL). Les paramètres aUser et aPassword portent les identifiants fournis par le client ; définir Authenticated sur True pour accepter la connexion ou sur False pour la rejeter. Lorsque les identifiants ne sont pas validés ici, la liste AuthUsers intégrée est utilisée comme solution de repli. Pour les schémas personnalisés non reconnus par le composant (par exemple les jetons Bearer JWT), utiliser OnUnknownAuthentication à la place.
procedure OnAuthentication(Connection: TsgcWSConnection; aUser, aPassword: string;
var Authenticated: Boolean);
begin
if ((aUser = 'user') and (aPassword = 'secret')) then
Authenticated := True
else
Authenticated := False;
end;