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