ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Отмена закрытия Access
7 сообщений из 7, страница 1 из 1
Отмена закрытия Access
    #32568091
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
Открыта база данных. Предпринимается попытка закрыть главное окно Access.

Можно ли воспрепятствовать этому закрытию?
...
Рейтинг: 0 / 0
18.06.2004, 18:54:22
| Ответить | Цитировать | Написать  
Отмена закрытия Access
    #32568103
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Открывается форма в невидимом режиме. У нее в OnUnload пишется Cancel=True.
...
Рейтинг: 0 / 0
18.06.2004, 19:01:43
| Ответить | Цитировать | Написать  
Отмена закрытия Access
    #32568111
и так
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
и так
Гость
Владимир СанычОткрывается форма в невидимом режиме. У нее в OnUnload пишется Cancel=True.
или в видимом.
с отдельной кнопкой глобального выхода
где в коде кнопки :
Код: plaintext
1.
me.OnUnload =""
Application.Quit
тогда выход будет доступен именно через эту дверь
...
Рейтинг: 0 / 0
18.06.2004, 19:07:04
| Ответить | Цитировать | Написать  
Отмена закрытия Access
    #32568114
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
Private Sub Form_Unload(Cancel As Integer) ' а не OnLoad
Cancel = 1 ' а не True
End Sub

В целом работает, спасибо!!!
...
Рейтинг: 0 / 0
18.06.2004, 19:09:37
| Ответить | Цитировать | Написать  
Отмена закрытия Access
    #32568120
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Андрей Il Form_Unload(Cancel As Integer) ' а не OnLoad
Опечатка, пардон.

Андрей Il Cancel = 1 ' а не True
А это все равно. Любое значение, отличное от 0.
...
Рейтинг: 0 / 0
18.06.2004, 19:13:27
| Ответить | Цитировать | Написать  
Отмена закрытия Access
    #32568124
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Владимир СанычОпечатка, пардон.
Не опечатка. Я OnLoad не предлагал.
...
Рейтинг: 0 / 0
18.06.2004, 19:15:24
| Ответить | Цитировать | Написать  
Отмена закрытия Access
    #32568130
мдя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
мдя
Участник
Андрей Il Private Sub Form_Unload(Cancel As Integer) ' а не OnLoad
Cancel = 1 ' а не True
End Sub

В целом работает, спасибо!!!

On Un Load это вабше обработчик (в т.ч. и Form_Unload, или что другое). Если OnUnLoad ="[Процедура обработки событий]" то в ней (в процедуре), которая действительно назовется в данном случае Form_Unload,
Cancel = True ' а не 1
(True = -1 в VBA), но если напишешь Cancel = 100 - то не ошибешься (за справками - в букварь по преобразованию типов данных, и операторам сравнения)


и не стоит "учить отцов ..."
...
Рейтинг: 0 / 0
18.06.2004, 19:19:28
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Отмена закрытия Access
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1673720]:
 0ms
get settings:
 9ms
get forum list:
 19ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 61ms
get topic data:
 12ms
get first new msg:
 7ms
get forum data:
 3ms
get page messages:
 59ms
get tp. blocked users:
 2ms
others: 202ms
total:  382ms
созд. / загр.: 382ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]