ImageEn, unit iexRichEdit
TIEFindCloseEvent
Declaration
TIEFindCloseEvent = procedure(Sender: TObject; Dialog: TFindDialog) of object;