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

как сделать, чтобы COM сервер возвращал объект   Найти похожие ветки 

 
fm   (2005-02-28 13:50) [0]

Хочу написать метод COM сервера, который возвращал бы клиенту новый объект. Например, клонировал себя.
Какой тип данных нужно использовать для out-параметра? Type Library editor постоянно говорит, что parameter requires pointer type.


 
wal ©   (2005-02-28 14:06) [1]

IUnknown.

C уважением.


 
fm   (2005-02-28 14:12) [2]

IUnknown - да нет, тоже самое пишет.


 
fm   (2005-02-28 14:16) [3]

А может у кого-нибудь есть пример?
Я просто хочу узнать как получать объекты от COM-сервера. Если клиент создаёт, то всё понятно, а если новый объект создаётся на сервере и клиенту (клиентам) нужно его передать?


 
Набережных С. ©   (2005-02-28 14:34) [4]

У тебя, видимо, включен язык IDL для редактора библиотек типов. Тогда просто добавь еще одну звездочку после типа. Т.е. после выбора из списка у тебя в колонке типа будет "IUnknown *", а нужно сделать так "IUnknown **". Но, думаю, для начала удобнее использовать паскаль. В Tools\Environment Options открой вкладку Type Library и измени язык.


 
Набережных С. ©   (2005-02-28 14:36) [5]

Да, и необязательно IUnknown, можно сам интерфейс или любой его предок.


 
fm   (2005-02-28 15:03) [6]

Премного благодерен! Это заработало!

Теперь ещё одна проблема - получить объект в обработчике события.

Описываю метод обработчика:
HRESULT NewObject([in] IComTest * Obj );

На клиенте делаю Import Type Library, и создаётся тип:
TComTestNewObject = procedure(Sender: TObject; var Obj: OleVariant) of object;
Т.е. in-параметр Obj стал var-параметром! Должно ли быть так? И как мне тогда из OleVariant получить свой IComTest?


 
Набережных С. ©   (2005-02-28 17:01) [7]

Во-первых, кто такой IComTest? Во-вторых, покажи IDL файл библиотеки.



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

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



Память: 0.46 MB
Время: 0.028 c
14-1133021802
Desdechado
2005-11-26 19:16
2005.12.18
Опрос: Уход за рабочим местом


2-1133441955
worldmen
2005-12-01 15:59
2005.12.18
Передача данных из дочерн. формы в родит. форму


2-1133718346
333
2005-12-04 20:45
2005.12.18
PageControl


1-1131656188
Silver...
2005-11-10 23:56
2005.12.18
Динамически создать Action в TActionList-e


8-1120681700
ronyn
2005-07-07 00:28
2005.12.18
Как запустить поиск всей музыки на компе для добавления её в Плей




   Наверх