Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.25;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.047 c
14-1120484567
cyborg
2005-07-04 17:42
2005.07.25
Чего там с протараненой кометой?


9-1113205492
Slavikk
2005-04-11 11:44
2005.07.25
Как работать с ODE


1-1120817326
1+random(9999)
2005-07-08 14:08
2005.07.25
TCP / IP


1-1120478236
Pasha L
2005-07-04 15:57
2005.07.25
Чем TStringGrid отличается от TDrawGrid


3-1118312781
Lenik
2005-06-09 14:26
2005.07.25
Как запустить встроенную процедуру SQL серв.с параметрами