TsgcWebSocketHTTPServer › Événements › OnTCPConnect
Se déclenche après la connexion d'un client au niveau TCP et avant le handshake WebSocket, de sorte que la connexion peut être acceptée ou rejetée.
property OnTCPConnect: TsgcWSOnTCPConnect;
// TsgcWSOnTCPConnect = procedure(Connection: TsgcWSConnection; var Accept: Boolean) of object—
OnTCPConnect est appelé APRÈS l'acceptation de la connexion TCP et AVANT l'analyse de la requête HTTP ou la négociation WebSocket. C'est la première occasion d'inspecter Connection.PeerIP et de rejeter les clients indésirables, par exemple pour implémenter des limites de débit par IP. Définissez Accept à False pour fermer immédiatement la connexion, ou laissez-le à True (la valeur par défaut) pour que le serveur procède à la détection du protocole HTTP/WebSocket. Pour promouvoir la connexion vers un pair TCP brut dès le début, définissez Connection.Transport à trpTCP dans le gestionnaire.
procedure OnTCPConnectEvent(aConnection: TsgcWSConnection; var Accept: Boolean);
begin
Accept := aConnection.PeerIP <> '192.168.0.100';
end;