Source position: fpwebsocketserver.pp line 65
protected procedure TWebSocketServer.DoConnect(
Sender: TObject;
Data: TSocketStream
); virtual;