Вниз
Скачать: 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.037 c
2-1133360776
fast2
2005-11-30 17:26
2005.12.18
Как узнать, существует ли папка, а если нет, то создать ее.


8-1121117343
АСК1
2005-07-12 01:29
2005.12.18
pfDevice - это сколько байт на пиксель в TBitMap ?


2-1133272643
FShadow
2005-11-29 16:57
2005.12.18
Как обновить програмно данные в TDBGrid после изменения данныхю.


14-1133154091
Antonn
2005-11-28 08:01
2005.12.18
Поздравьте меня, у меня сестренка родилась!


14-1132737161
TUser
2005-11-23 12:12
2005.12.18
Тюнинг компьютера




   Наверх