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