События и плагины

[drronnie]

Господа, такая проблема... значит у меня в программе подгружается несколько плагинов... и всё бы хорошо, только почему-то не могу отловить их события... Создаётся массив:

Код: Выделить всё

Public arrPlug() As Object

И туда подгружаются плагины... потом проанализировав пару исходников понял не хватает слова "WithEvents"... написал

Код: Выделить всё

Public WithEvents arrPlug() As Object

Однако возникла другая ошибка "Only valiid in object module", перенёс в модуль формы - и тут неудача: просит
убрать скобочки и вместо "Object" просит конкретный объект... что делать? У всех плагинов события называются одинаково... Подскажите... или пришлите (дайте ссылочку на) примерчик про плагины с событиями... Заранее благодарю...

[GSerg]

Для каждого плагина заводи отдельную переменную.
Ну низя массив withevents.

[Ennor]

Либо реализуй наследование посредством Implements. Заведи рутовый интерфейс (сорри, класс ), определи в нем базовые свойства и методы и для каждого реального плагина наследуй именно его:

Код: Выделить всё

Option Explicit
Implements cls_Root_PlugIn
...


Тогда, при создании произвольного плагина, ты можешь объявлять объекты так:

Код: Выделить всё

Private WithEvents Plg as cls_Root_PlugIn

,
а создавать - так:

Код: Выделить всё

Set Plg = CreateObject(, "cls_My_Plugin_004")

(Заметь, что в этом случае ты получаешь раннее, т.е. быстрое, связывание).
Есессно, обязательно почитай что-нить об этом для начала, ибо полиморфизм в понимании СОМ - это нечто особенное...

[drronnie]

Ага спасибо... но можно подробнее, а то что-то не найду я никак ничего почитать... линк дай, плз, на статейку, а...

[Ennor]

MSDN, ищи в индексе по Implements. Ну и, конечно, великая книга Брюса МакКинни "Hardcore Visual Basic".

[drronnie]

Господа, прошу прощения, что реанимирую старый топик.... но решение есть!!! Короче я сделал так:
На родительскую форму положил несколько кнопок с именеами типа "Events_Send" и т.д. а из плагина просто ищу хэндл нужной кнопки и передаю ему клик.... ну а там уже дело техники....