Описание
Генерируется после успешного удаления объектов из состава родительского объекта.
Опеделение
| Visual Basic |
|---|
Public Event ObjectContentRemoved( _ ByVal pObject As TDMSObject, _ ByVal pContent As TDMSObjects _ ) |
Параметры
- pObject
- Объект, состав которого был изменен.
- pContent
- Коллекция удаленных объектов.
Заметки
1. Событие нельзя отменить.
2. Обработчик может быть размещен в скриптах объекта, профиля и/или общесистемном. Если обработчики определены на всех уровнях, то последовательность их вызова такова:
- скрипт объекта;
- скрипт профиля пользователя;
- общесистемный скрипт.
3. Событие может регистрироваться в Журнале событий приложения (в зависимости от настроек Журнала для конкретного пользователя) и соответственно добавляться в коллекцию событий TDMSApplication.Events Свойство. Зарегистрированное событие имеет класс: TDMSEventClass Перечисление tdmEventClassObject и тип: TDMSEventType Перечисление tdmEventObjectContentRemove.
4. Для того, чтобы событие генерировалось при работе через API, должен быть включен вызов объектных событий в Окне свойств базы данных (см. рисунок).
Пример
| VB Script (Visual Basic) |  Скопировать код |
|---|---|
'====================================================================== 'Текст обработчика может быть размещен в скрипте родительского объекта, 'профиля или общесистемном скрипте. Sub Object_ContentRemoved(Obj, RemoveCollection) 'Вывести сообщение о результате операции MsgBox RemoveCollection.Count & " объектов успешно удалены из состава" & Chr(13) &_ """" & Obj.Description & """.", vbInformation, "Редактирование состава объекта" End Sub '====================================================================== | |