Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Активное окно / 9 сообщений из 9, страница 1 из 1
17.09.2004, 12:46:46
    #32699662
Dmyttro
Dmyttro
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
Извините за детский вопрос, но как программно узнать, какой из объектов (форма, отчет, модуль и т.д.) находится в активном окне?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 12:53:42
    #32699681
IgorM
IgorM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
Screen.ActiveForm
Screen.ActiveControl
Screen.ActiveReport
Screen.ActiveDatasheet
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 12:58:17
    #32699698
Dmyttro
Dmyttro
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
2 IgorM
Вот как-раз со Screen и хочу употребить. А узнать мне надо, что в активном окне именно форма или именно отчет, т.к. если Screen.ActiveForm вызвать при открытом отчете, то генерится ошибка, что совершенно объяснимо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 13:08:01
    #32699723
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
Dmyttro2 IgorM
Вот как-раз со Screen и хочу употребить. А узнать мне надо, что в активном окне именно форма или именно отчет, т.к. если Screen.ActiveForm вызвать при открытом отчете, то генерится ошибка, что совершенно объяснимо.

Ну дак употребляйте ...
Если ошибка на Screen.ActiveForm, значит не форма
Если ошибка на Screen.ActiveReport значит активен не отчет
Обработайте ошику ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 13:11:13
    #32699734
Dmyttro
Dmyttro
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
2 Serge Gavrilov
А без сознательного создания ошибки никак?
Т.е. If тип_объекта_в_текущем_окне_форма then
Screen.ActiveForm .....
Else .... ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 13:14:36
    #32699747
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
в таком случае генерация ошибки оправданный и прямой путь к успеху,не стоит бояться поставить конструкцию on error goto

2 альтернатива через
Код: plaintext
1.
2.
3.
4.
5.
6.
For Each docLoop In MyDb.Containers!Forms.Documents
For Each docLoop In MyDb.Containers!Reports.Documents
For Each docLoop In MyDb.Containers!Modules.Documents
For Each docLoop In MyDb.Containers!Scripts.Documents
For Each MyTbl In MyDb.TableDefs
For Each MyQuer In MyDb.QueryDefs
не переносима на ado и медленна
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 13:29:50
    #32699779
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
Ну есть еще
CurrentObjectName
CurrentObjectType
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 13:33:39
    #32699795
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
Serge GavrilovНу есть еще
CurrentObjectName
CurrentObjectType

Только надо иметь ввиду, что при этом текущий объект не обязательно открыт, а может быть просто выделен в окне БД
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.09.2004, 14:02:54
    #32699896
Dmyttro
Dmyttro
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Активное окно
2 Serge Gavrilov
Как раз то, что хотел. Сэнькс.
З.Ы. А окно базы данных скрыто от юзера.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Активное окно / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 318ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1671719]:
 0ms
get settings:
 6ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 35ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 206ms
total:  318ms
x
x
Закрыть


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