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