TsgcWebSocketHTTPServer › Eventos › OnTCPConnect
Se activa después de que un cliente se conecta a nivel TCP y antes del handshake de WebSocket, para que la conexión pueda aceptarse o rechazarse.
property OnTCPConnect: TsgcWSOnTCPConnect;
// TsgcWSOnTCPConnect = procedure(Connection: TsgcWSConnection; var Accept: Boolean) of object—
OnTCPConnect se llama DESPUÉS de que la conexión TCP es aceptada y ANTES de que se analice la solicitud HTTP o se realice el handshake WebSocket. Es la primera oportunidad para inspeccionar Connection.PeerIP y rechazar clientes no deseados, por ejemplo para implementar límites de velocidad por IP. Establezca Accept en False para cerrar la conexión inmediatamente, o déjelo en True (el valor predeterminado) para que el servidor continúe con la detección del protocolo HTTP/WebSocket. Para promover la conexión a un par TCP simple desde el inicio, establezca Connection.Transport en trpTCP dentro del controlador.
procedure OnTCPConnectEvent(aConnection: TsgcWSConnection; var Accept: Boolean);
begin
Accept := aConnection.PeerIP <> '192.168.0.100';
end;