TsgcHTTPServer › Gebeurtenissen › OnTCPConnect
Wordt geactiveerd nadat een client verbinding maakt op TCP-niveau en vóór het HTTP-verzoek wordt verwerkt, zodat de verbinding kan worden geaccepteerd of geweigerd.
property OnTCPConnect: TsgcWSOnTCPConnect;
// TsgcWSOnTCPConnect = procedure(Connection: TsgcWSConnection; var Accept: Boolean) of object
—
OnTCPConnect wordt aangeroepen NA het accepteren van de TCP-verbinding en VOOR het parsen van het HTTP-verzoek. Dit is de vroegste gelegenheid om Connection.PeerIP te inspecteren en ongewenste clients te weigeren, bijvoorbeeld om per-IP-snelheidslimieten te implementeren. Stel Accept in op False om de verbinding onmiddellijk te sluiten, of laat het op True (de standaard) staan zodat de server doorgaat met het parsen van het verzoek.
procedure OnTCPConnectEvent(aConnection: TsgcWSConnection; var Accept: Boolean);
begin
Accept := aConnection.PeerIP <> '192.168.0.100';
end;