Source position: fpwebsocketserver.pp line 36
type TAcceptIdleEvent = procedure(
sender: TObject;
var aCheckMessages: Boolean
) of object;