TcxSchedulerEventPopupMenuClickEvent = procedure(Sender: TcxSchedulerEventPopupMenu; AItem: TcxSchedulerEventPopupMenuItem; ASubItemIndex: Integer; var AHandled: Boolean) of object;