Source position: fpwebsocketclient.pp line 34
type TWSClientHandShakeEvent = procedure(
Sender: TObject;
aHeaders: TStrings
) of object;