Source position: msegui.pas line 360
type showhinteventty = procedure(
const sender: tobject;
var info: hintinfoty
) of object;