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