Тип события, возникающего при удалении редактируемого объекта с помощью редактора
TObjectDeleteEvent = procedure(Sender: TObject; lCode, oIndex: integer; oMUID: int64; var flAllow: boolean) of object;
Sender
flAllow