Текущий архив: 2005.10.02;
Скачать: CL | DM;

Вниз

Методы com   Найти похожие ветки 

← →
kblc ©   (2005-09-10 13:57) [0]

Уважаемые мастера, обращаюсь к вас просьбой о помощи...


 type
   IA = interface
     ["*"]
     procedure Proc1; stdcall;
   end;

   IB = interface(IA)
     ["*"]
     procedure Proc2; stdcall;
   end;

   TAB = class(TComObject, IB)
     procedure Proc1; stdcall;
     procedure Proc2; stdcall;
   end;

 Почему (CreateComObject(*) as IB) проходит нормально, а вот (CreateComObject(*) as IA) возвращает Interface not supported?
 Почему? Что я делаю не так?

---

← →
Гаврила ©   (2005-09-10 15:11) [1]

Указывай явно все поддерживаемые интерфейсы
TAB = class(TComObject, IA, IB)

---

Страницы: 1 вся ветка

Текущий архив: 2005.10.02;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.046 c