Source position: fpg_widget.pas line 35
type THintEvent = procedure(
Sender: TObject;
var AHint: TfpgString
) of object;