Главная страница
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.027 c
3-1118734195
Lexa
2005-06-14 11:29
2005.07.25
Переход к другой таблице


4-1117274384
Петр
2005-05-28 13:59
2005.07.25
Работа с колесиком мыши


4-1117293373
Greg123
2005-05-28 19:16
2005.07.25
Как сделать чтобы окно всегда было поверх остальных окон


1-1120648034
td
2005-07-06 15:07
2005.07.25
объявить процедуру


1-1120755837
Kolan
2005-07-07 21:03
2005.07.25
Текст на кнопках TToolBar справа от картинок. Как?