Source position: actnlist.pas line 148
type THintEvent = procedure(
var HintStr: string;
var CanShow: Boolean
) of object;