Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
16.12.2003, 17:14:50
|
|||
|---|---|---|---|
|
|||
Открыть форму проекта через CreateObject() |
|||
|
#18+
У меня в проекте несколько десятков форм. Очень накладно их открывать через Dim f As Form Select Case NameForm Case Name1 Set f = New Form1 Case Name2 Set f = New Form2 ... ... End Select Нельзя ли их открывать через процедуру CreateObject()? Пробовал Dim f As Object Set f=CreateObject(NameForm) но выходит ошибка "ActiveX component can't create object". Ну или как-нибудь в этом духе. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
17.12.2003, 13:09:39
|
|||
|---|---|---|---|
Открыть форму проекта через CreateObject() |
|||
|
#18+
CreateObject создает COM-объекты, а не экземпляры внутренних классов. Юзай New. Проще всего сделать такой финт ушами: Public Enum FormTypes frmMain = 1 frmDirectory = 2 ... End Enum Public Function CreateForm(ft As FormTypes) As Form Dim f As Form Select Case ft Case frmMain: Set f = New Form1 Case frmDirectory: Set f = New Form2 End Select Set CreateForm = f End Function ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.12.2003, 23:55:55
|
|||
|---|---|---|---|
|
|||
Открыть форму проекта через CreateObject() |
|||
|
#18+
Вообще для таких больших проектов рекомендуется объединять формы в ActiveX'ы. При этом основному приложению достаточно содержать только одну пустую форму на которую и будет натягиваться указанный через параметр ActiveX (хоть твой хоть чей-то другой). Плюсы: как правило время на компиляцию изменённых компонентов уже нужно гораздо меньше. Минусы: при использовании CreateObject в VB отваливается отладка. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&mobile=1&tid=2170313]: |
0ms |
get settings: |
8ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
186ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
35ms |
get tp. blocked users: |
1ms |
| others: | 209ms |
| total: | 470ms |
| 0 / 0 |
