Главная страница
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.48 MB
Время: 0.031 c
3-1118894388
Dron1173
2005-06-16 07:59
2005.07.25
Аварийное закрытие приложения


1-1120823081
sergg
2005-07-08 15:44
2005.07.25
Не получается сделать невидимым TabSheet от PageControl


6-1113722454
Pavel_P
2005-04-17 11:20
2005.07.25
Измерение пропускной способности локальной сети


14-1120125202
andrey111111
2005-06-30 13:53
2005.07.25
Nsis


4-1117024392
Невидимка
2005-05-25 16:33
2005.07.25
Как разместить картинку в клиентской области чужого окна?