|
Действия ...
|
04.07.2003, 16:16
|
|||
|---|---|---|---|
|
|||
Как провепить. открыта ли форма или нет |
|||
|
|
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
04.07.2003, 16:13
|
|||
|---|---|---|---|
Как провепить. открыта ли форма или нет |
|||
|
#18+
см subj. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
04.07.2003, 16:16
|
|||
|---|---|---|---|
Как провепить. открыта ли форма или нет |
|||
|
#18+
в ADP это делается так Код: plaintext ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
04.07.2003, 16:22
|
|||
|---|---|---|---|
Как провепить. открыта ли форма или нет |
|||
|
#18+
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 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
04.07.2003, 16:29
|
|||
|---|---|---|---|
Как провепить. открыта ли форма или нет |
|||
|
#18+
2 АлексейК Вариант предложенный Alexus12 работает в любом случае (и для ADP и для MDB) и является более предпочтительным (с точки зрения Гетца). ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=45&tablet=1&tid=1680719]: |
0ms |
get settings: |
9ms |
get forum list: |
10ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
56ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
46ms |
get tp. blocked users: |
1ms |
| others: | 229ms |
| total: | 367ms |
| 0 / 0 |
