ImageEn, unit ieview
TIEVButtonClickEvent
Declaration
TIEVButtonClickEvent = procedure(Sender: TObject; Button:
TIEVButton
; MouseButton: TMouseButton; Shift: TShiftState; var Handled: Boolean) of object;