TsgcWebSocketServer_HTTPAPI › Eventos › OnTCPConnect
Disparado após um cliente conectar no nível TCP e antes do handshake do WebSocket, de modo que a conexão possa ser aceita ou rejeitada.
property OnTCPConnect: TsgcWSHTTPAPITCPConnect;
// TsgcWSHTTPAPITCPConnect = procedure(Connection: TsgcWSConnection; var Accept: Boolean) of object
—
OnTCPConnect é chamado DEPOIS que a conexão TCP é aceita pelo HTTP.SYS e ANTES que o handshake do WebSocket seja processado. Utilize-o para inspecionar Connection.PeerIP ou outras propriedades do socket e decidir se deve prosseguir. Defina Accept como False para rejeitar a conexão imediatamente; deixe como True (o padrão) para que o servidor prossiga com o handshake do WebSocket ou com o pipeline normal de requisições HTTP.
procedure OnTCPConnectEvent(Connection: TsgcWSConnection; var Accept: Boolean);
begin
Accept := Connection.PeerIP <> '10.0.0.1';
end;