Source position: vlc.pp line 152
type TBooleanEvent = procedure(
Sender: TObject;
const AValue: Boolean
) of object;