Как динамически подгрузить массив ocx-ов, имея их события?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
lifcey
Начинающий
Начинающий
 
Сообщения: 1
Зарегистрирован: 17.06.2004 (Чт) 8:52

Как динамически подгрузить массив ocx-ов, имея их события?

Сообщение lifcey » 17.06.2004 (Чт) 8:56

С одним ActiveX-ом все понятно:
Код: Выделить всё
Public WithEvents objExt As VBControlExtender
...
Set objExt = Controls.Add("Mon.Monitor", "myCtl1")
...
Public Sub objExt_ObjectEvent(Info As EventInfo)
End Sub

А если я не знаю заранее количество загружаемых ActiveX-ов?
Я могу объявить так:
Код: Выделить всё
Dim obj1(10) As VBControlExtender

Но не могу
Код: Выделить всё
Dim WithEvents obj1(10) As VBControlExtender

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 17.06.2004 (Чт) 10:05

Учиться - значит открывать для себя то, что уже знаешь. <...> Учить - значит напоминать другим о том, что они знают это также хорошо, как и ты. <...> Лучше всего ты учишь тому, чему тебе самому больше всего надо научиться. (Р. Бах)

san*
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 115
Зарегистрирован: 17.06.2004 (Чт) 17:57
Откуда: Киев

Сообщение san* » 21.06.2004 (Пн) 18:29

Rainbow писал(а):http://bbs.vbstreets.ru/viewtopic.php?t=6453

Да! Где я раньше был.Буквально позавчера боролся с этой проблемой и выудил именно этот метод обертки. Буду почаще сюда смотреть. Негоже заново открывать Америку. :roll:


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 17

    TopList