Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
Создаем новый экземпляр формы. Тут все понятно: Dim Frm As Form Set Frm = New Form_МояФорма Frm.Visible = True А если имя формы передается через переменную типа String - как тогда? Dim Name As Sring Dim Frm As Form Name = "МояФорма" Set Frm = New ????????????? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.01.2003, 11:06 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
Никак имхо ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.01.2003, 11:38 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
Опять похоже уперся я. Необязательно использовать указанную конструкцию. Может есть какие нибудь варианты обхода в решении этой задачи: Во внешний модуль передается имя формы, а он создает ее новый эксземпляр. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.01.2003, 12:32 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
обходным вариантом, по-моему может быть только один, примерно такой: Function ttt(strИмя As String) As Form Select Case strИмя Case "ИмяФормы1" Set ttt = New Form_ИмяФормы1 Case "ИмяФормы2" Set ttt = New Form_ИмяФормы2 Case "ИмяФормы3" Set ttt = New Form_ИмяФормы3 End Select End Function ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.01.2003, 14:36 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
Благодарю. Действительно вариант пока единственный. Придется все возможные формы добавлять в функцию. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.01.2003, 15:28 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
Попробуй программно создавать модуль с нужным текстом и фиксированным именем процедуры, а потом запускать эту процедуру на исполнение (уже из подготовленной заранее постоянной процедуры). Не забыть удалить временную после использования! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.01.2003, 15:42 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
AlexJuice Идею понял так: если Access не принимает имя класса собранное в функции из переменных, то создаем во время работы функцию с уже готовым именем и подсовываем ее Access. Правильно? Кстати, эта "небольшая проблемка" - огромное препятсвтвие для создания для проекта цивилизованного мультиформенного интерфейса. А если так: При старте проекта создавать Collection из всех форм базы с индексом - имя формы, при закрытии - убиваем. Во время работы - для создания нового экземпляра формы обращаться к этой Collection, вытягивая из нее форму по ее имени. Извиняюсь, что дальше только мысли не пробовал. Бред это или нет (слабовато я с классами и их коллекциями еще разбираюсь)? Можно ли по этому варианту что-то сказать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.01.2003, 10:47 |
|
||
|
Еще вопрос по открытию нескольких экз. формы
|
|||
|---|---|---|---|
|
#18+
Такая коллекция есть - Forms. Но если ВСЕ формы у тебя уже созданы, нахрена огород городить? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.01.2003, 12:35 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32095144&tid=1682467]: |
0ms |
get settings: |
8ms |
get forum list: |
21ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
35ms |
get topic data: |
9ms |
get forum data: |
3ms |
get page messages: |
45ms |
get tp. blocked users: |
1ms |
| others: | 223ms |
| total: | 351ms |

| 0 / 0 |
