Описание
Опеделение
| Visual Basic |
|---|
Public Event FileErased( _ ByVal pFile As TDMSFile, _ ByVal pObject As TDMSObject _ ) |
Параметры
- pFile
- Ссылка на удаляемый файл.
- pObject
- Ссылка на объект, с файловым составом которого производится работа.
Заметки
Событие не генерируется при удалении объекта, имеющего файловый состав.
1. Событие нельзя отменить. Однако в момент вызова обработчика события свойства и методы файла еще доступны для обращения.
2. Обработчик может быть размещен в скриптах объекта, профиля и/или общесистемном. Если обработчики определены на всех уровнях, то последовательность их вызова такова:
- скрипт объекта;
- скрипт профиля пользователя;
- общесистемный скрипт.
Если на каком-либо уровне событие было отменено (параметру bCancel присвоено значение TRUE), то обработчики события, размещенные на последующих уровнях, вызваны не будут.
3. Схему последовательности генерации событий при удалении файла объекта см. на рисунке:
4. Для того, чтобы событие генерировалось при работе с файлами через API (напр., вызове метода TDMSFile.Erase Метод), должен быть включен вызов объектных событий в Окне свойств базы данных (см. рисунок).
Пример
| VB Script (Visual Basic) |  Скопировать код |
|---|---|
'==================================================== 'Текст обработчика может быть размещен в скрипте формы, профиля или 'общесистемном скрипте. Sub File_Erased(File, Object) 'Вывести информацию о результате операции MsgBox "Файл """ & File.FileName & """" & _ Chr(13) & "объекта """ & Object.Description & """" & _ Chr(13) & "успешно удален из файлового хранилища TDMS.", vbInformation, "Удаление файла" End Sub '==================================================== | |