Вниз
Скачать: CL | DM;

COM и события   Найти похожие ветки 

 
vixic ©   (2004-10-06 19:34) [0]

Как прицепить событие COM обьекта в программе?
Windows Script Host делает это так:
JScript
------------------------------------------
Obj = WScript.CreateObject("файл.объект");
WScript.ConnectObject(Obj,"Obj_");
function Obj_событие();
{действия};
------------------------------------------
при генерации события выполница функция Obj_событие()
как зделать также на Delphi

ПРИНИМАЮТСЯ ВСЕ РЕШЕНИЯ!!!


 
DarkMan ©   (2004-10-07 12:56) [1]

В делфях на скока помню делаешь
1. Component\Import ActiveX...
выбираеш что те нужно, далее инстал, потом когда появится в панели компонетов думаю догадаешся что с этим делать
2. Ручным способом час не вспомню .... :)


 
Ломброзо ©   (2004-10-08 00:01) [2]

Через раннее связывание - импортированием библиотеки типов

Через позднее
OleVariant ->
IDispatch ->
IConnectionPointContainer.FindConnectionPoint -> IConnectionPoint.Advise.

В Advise передать указатель на экземпляр класса, реализующего IDispatch и переопределяющего  метод IDispatch.Invoke (написать такой класс самому). В Invoke определить нужный DISPID метода и соответственно среагировать. DISPID по имени можно получить, вызывав IDispatch.GetIDsOfNames у того объекта, который кидает событие.

Вот такая вот каша.


 
Юра   (2004-10-08 09:50) [3]

>Вот такая вот каша
Лично я для таких целей использую вижуал + АТЛ. Тогда _вообще_ никакой каши нет. А в дельфях это действительно через Ж делается :(


 
vixic ©   (2004-10-11 20:09) [4]

> Ломброзо
А можно примерчик!!!


 
vixic ©   (2004-10-18 18:48) [5]

> Ломброзо
А можно примерчик!!!

Если кто понимает в етом, то можно примерчик!

ОЧЕНЬ НАДО! СПАСИБО!



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
1-1120823762
Ольга
2005-07-08 15:56
2005.07.25
Количество Childs у выбранного TreeView.Node


3-1118777780
snaip
2005-06-14 23:36
2005.07.25
DBNavigator(работа с БД)


14-1120253617
паша_голубь :-)
2005-07-02 01:33
2005.07.25
Благодарность


14-1120423282
Knight
2005-07-04 00:41
2005.07.25
Ё-хо!!! У меня погасла иконка "Сетевой кабель не подключен" !!!


1-1120813488
Igor_Mish
2005-07-08 13:04
2005.07.25
Ошибка: Record not found




   Наверх