Страница 1 из 1

Не могу вызвать процедуру ActiveX компонеты

Добавлено: 28 сен 2005, 13:29
Diman
Создал ActiveX компоненту. Компонета написана на Дельфях. Описал процедуру. Пытаюсь вызвать ее из ВИП интерфейса, выдается сообщение о том что данный метод в объекте не найден, причем сама компонета вызывается и работает на ура. Код вызова на ВИПе прилагаю:
INTERFACE NVIS_ActiveXTest 'Test ActiveX' doaccept,cyan
show at (1,1,110,27);
CREATE VIEW t4
;
embedded emObj1 OLE;
show at (2,2,100,23);
end;
var
i: longint;
k: integer;



HandleEvent
cmInit:
{
i := OleCreate ('SimpleExpertProj1.SimpleExpert');
if i = 0 then
exit;
OleEmbed (i, emObj1);
OleSetOptions (i, 2);
OleCall1(i, ocProc, 'func1', '0001');
}
end;
end.

Добавлено: 29 сен 2005, 13:13
DarkAngel27
Галактика какая? На 7.12 такая же ошибка была, когда "компонента" была не OLE-приложением.

Добавлено: 29 сен 2005, 13:32
Diman
Галактика 7.1, а что нужно сделать в Дельфях чтоб компонета была OLE приложением?

Добавлено: 30 сен 2005, 12:14
Diman
Люди ПАМАГИТЕ!!!! Погибаю. Третий день бьюсь с этой ActiveX формой. Не могу вызвать из Гал-ки методы и процедуры компоненты. Галакатика 7.1, компонента написана на Дельфях 6. В чем может быть дело? Заранее благодарен за любую помощь.

Добавлено: 06 окт 2005, 00:51
Diman
Все, УРА, заработало!