Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.04.25;
Скачать: [xml.tar.bz2];

Вниз

Множественное событие для WrapperClass   Найти похожие ветки 

 
hexone ©   (2004-04-08 10:34) [0]

Добрый день.
Помогите решить проблему:
Есть COM объект и у него интерфейс ISimpleInterface, кроме того событие ISimpleInterfaceEvents, в котором событие OnChange.
Импортирую TLB с ним в клиента. Определяю событие OnChange.
var
so,so1 : TSimpleInterface;
begin
so := TSimleInterface.Create(nil);
so.ConnectTo( < объект типа ISimpleInterface из коллекции >);
so.OnChange := MyChange;

so1 := TSimpleInterface.Create(nil);
so1.ConnectTo( < тот же самый объект > );
so1.OnChange := MyChange;

Внимание вопрос! Как сделать так, чтобы событие MyChange вызывалось столько раз, сколько я создал WrapperClassов.
Использовать ckRunningInstance нельзя, в силу низкой производительности RegisterActiveOleObject.
Можно ли принудительно вызвать Advice столько раз, сколько мне нужно?
Спасибо.


 
hexone ©   (2004-04-08 11:04) [1]

Разобрался сам в функции CreateConnectionPoint нужно поставит ckMulti



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

Форум: "Основная";
Текущий архив: 2004.04.25;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.038 c
14-1080701475
Думкин
2004-03-31 06:51
2004.04.25
С днем рождения! 31 марта.


7-1078385081
Boroda Oleg
2004-03-04 10:24
2004.04.25
Работа с Active Directory


14-1080708940
Dmitriy O.
2004-03-31 08:55
2004.04.25
Как вывести формулу функции по заданным точкам ?


1-1081352331
PiratA
2004-04-07 19:38
2004.04.25
TExcelApplication


1-1081463936
Broot
2004-04-09 02:38
2004.04.25
Проблема с шрифтами на разных компьютерах





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский