| kot_ |
| Отправлено: 14.11.2005, 01:55 |
|
Не зарегистрирован
|
Существует СОМ — сервер. На нем объявлены некоторые события, которые реализованы на клиенте. Пытаюсь получить доступ, используя TSocketConnection->GetServer — событие не вызывается. Если я обращаюсь к СОМ-серверу на локальном компьютере используя метод Create:
| CODE | TCOMmyCom com;
com = ::Create();
TCOMmeComEv events;
events.OnLogin = TgfmMain::OnLogin;
events.Connect(com);
com->LoginEmployee(login,pass,id); |
работает. Если я пытаюсь обратится к интерфейсу используя GetServer — события не обрабатываются.
Подскажите, плиз, в чем проблема. |
|
| poiuytr |
| Отправлено: 14.11.2005, 17:14 |
|
Не зарегистрирован
|
Я методы сервера на клиенте вызываю таким образом:
| CODE |
#include "..\Server\myserver_TLB.h"
...
IDispatch* disp = (IDispatch*)(FSocketConnection->AppServer);
// RemoteDataModule на сервере носит имя rdmMyServer
IrdmMyServerDisp IMyServer = (IrdmMyServer*)disp;
// MyMethod это метод, реализованный на сервере и описанный в myserver_TLB.h
IMyServer.MyMethod();
|
|
|
|
