ImageEn, unit iemview
TIEImageDrawEventEx
Declaration
TIEImageDrawEventEx = procedure(Sender: TObject; idx: integer; Left, Top: integer; Dest: TBitmap; var ThumbRect: TRect) of object;