|
Как скрыть стартовую форму?
|
|||
---|---|---|---|
#18+
Собственно вопрос в другом. Нужно как-то отловить событие закрытия Access 2010. Поиск в гугле дает стандартное решение стартануть форму, скрыть её и ловить собитие Unload. Собственно, моя стартовая форма проверяет по событию Open под каким логином в ос залогинен пользователь и уже относительно логина там происходит бизнес-логика. Сейчас эта форма после всех процедур успешно закрывается. Мне было бы удобно сделать её невидимой вместо закрытия. Но вот на какое бы я событие не вешал Me.Visible = False Me.Form.Visible = False Она не прячется. Как ее спрятать автоматически? Если на форме разместить кнопку, то на событие клик (если навесить Me.Visible = False) она становится невидимой. Может есть возможность симулировать нажатие кнопки? ... |
|||
:
Нравится:
Не нравится:
|
|||
22.06.2018, 16:56 |
|
Как скрыть стартовую форму?
|
|||
---|---|---|---|
#18+
rurikovi4, OpenForm,кажись шестой аргумент, режимОкна acHidden (невидимое) ... |
|||
:
Нравится:
Не нравится:
|
|||
22.06.2018, 23:15 |
|
Как скрыть стартовую форму?
|
|||
---|---|---|---|
#18+
Извиняюсь,не внимательно прочел.Сделайте так,все работает: Код: vbnet 1. 2. 3.
Добавьте сюда блок IF и после выполнения проверки,в случае её успешности,скрывайте форму,если же проверка не пройдена отменяйте событие(Cancel=True.При этом курсор будет оставаться в поле пока в него не будет введено "правильное" значение или не будет нажата кнопка закрытия) ... |
|||
:
Нравится:
Не нравится:
|
|||
23.06.2018, 00:51 |
|
Как скрыть стартовую форму?
|
|||
---|---|---|---|
#18+
sdkuИзвиняюсь,не внимательно прочел.Сделайте так,все работает: Код: vbnet 1. 2. 3.
Добавьте сюда блок IF и после выполнения проверки,в случае её успешности,скрывайте форму,если же проверка не пройдена отменяйте событие(Cancel=True.При этом курсор будет оставаться в поле пока в него не будет введено "правильное" значение или не будет нажата кнопка закрытия) Не работает ни с одним контроллом. Форма остается видимой. ... |
|||
:
Нравится:
Не нравится:
|
|||
29.06.2018, 14:44 |
|
|
start [/forum/topic.php?fid=45&fpage=48&tid=1611339]: |
0ms |
get settings: |
8ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
36ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
38ms |
get tp. blocked users: |
1ms |
others: | 14ms |
total: | 130ms |
0 / 0 |