ImageEn, unit iexColorButton
TGetPaletteEvent
Declaration
TGetPaletteEvent = procedure (Sender: TObject; var Palette: PRGBROW; var NumCol: integer) of object;