Событие возникает в начале процедуры сохранения нового объекта
property OnBeforeAddObject: TObjectEditEvent;