powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как провепить. открыта ли форма или нет
5 сообщений из 5, страница 1 из 1
Как провепить. открыта ли форма или нет
    #32199879
Nektov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
см subj.
...
Рейтинг: 0 / 0
Как провепить. открыта ли форма или нет
    #32199885
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в ADP это делается так

Код: plaintext
if currentproject.allforms( "Имя_формы" ).isloaded then ...
...
Рейтинг: 0 / 0
Как провепить. открыта ли форма или нет
    #32199891
Alexus12
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
A в МДБ так:


Function IsLoaded(ByVal strFormName As String) As Integer
' Returns True if the specified form is open in Form view or Datasheet view.

Const conObjStateClosed = 0
Const conDesignView = 0

If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <> conObjStateClosed Then
If Forms(strFormName).CurrentView <> conDesignView Then
IsLoaded = True
End If
End If

End Function
...
Рейтинг: 0 / 0
Как провепить. открыта ли форма или нет
    #32199901
incold
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 АлексейК
Вариант предложенный Alexus12 работает в любом случае (и для ADP и для MDB) и является более предпочтительным (с точки зрения Гетца).
...
Рейтинг: 0 / 0
Как провепить. открыта ли форма или нет
    #32199961
Nektov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо Большое.
Потрясающе оперативно
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как провепить. открыта ли форма или нет
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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