Генерируется в момент завершения работы TDMS после закрытия главного окна приложения.
| Visual Basic |
|---|
Public Event Quit() |
1. Событие нельзя отменить.
2. Обработчик может быть размещен в скрипте профиля и/или общесистемном. Если обработчики определены на обоих уровнях, то в первую очередь событие обрабатывается в скрипте профиля пользователя, затем в общесистемном.3. Событие может регистрироваться в Журнале событий приложения (в зависимости от настроек Журнала для конкретного пользователя) и соответственно добавляться в коллекцию событий TDMSApplication.Events Свойство. Зарегистрированное событие имеет класс TDMSEventClass Перечисление tdmEventClassLogin и тип TDMSEventType Перечисление tdmEventUserLogoff.
4. Для того, чтобы событие генерировалось при работе через API (напр., при вызове TDMSApplication.Quit Метод), должен быть включен вызов объектных событий в Окне свойств базы данных (см. рисунок).

Пример обработки события Quit
| VB Script (Visual Basic) | Скопировать код |
|---|---|
'====================================================================== 'Текст обработчика должен быть размещен в скрипте профиля или 'общесистемном скрипте. Sub Quit() 'Хотя главное окно приложения уже закрыто, пользовательские объекты, 'как и объекты TDMS API, все еще доступны для обращения MsgBox "До скорых встреч, уважаемый пользователь " & _ ThisApplication.CurrentUser.Description End Sub '====================================================================== | |