ImageEn, unit iexColorPalette
TIEGetHintTextEvent
Declaration
TIEGetHintTextEvent = procedure (Sender: TObject; AColor: TColor; Index: integer; var HintStr: string) of object;