Source position: cwebsocketclient.pas line 16
type TWebSocketClientOnPongReceived = procedure(
Sender: TObject;
data: array of ShortInt
) of object;