Source position: websession.pp line 46
type TGetSessionEvent = procedure(
var ASession: TCustomSession
) of object;