__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
FTestEvents = CoTestEvents_::Create();
...
Проблема с запуском COM сервера
Есть COM сервер в exe созданный в Builder C++, также есть клиент написанный там же. Так вот, я не могу сделать так, чтобы всякий раз при запуске клиента не создавалась новая копия сервера, а клиент подключался к уже работающей проге(серверу). Интерфейс в сервере наследует IUnknown. ATL автоматом создаёт такой код в файле ***_TLB.h : typedef TCoClassCreatorT<TCOMILogServer, ILogServer, &CLSID_LogServer, &IID_ILogServer> CoLogServer.
В конструкторе клиента я делаю просто CoLogServer::Create(), поэтому я так понимаю сервер и запускается каждый раз. Как быть?
В конструкторе клиента я делаю просто CoLogServer::Create(), поэтому я так понимаю сервер и запускается каждый раз. Как быть?
В сервере надо вызвать CoRegisterClassObject(...) с флагом REGCLS_MULTIPLEUSE; В Atl обёрткой для CoRegisterClassObject(...) является RegisterClassObjects(...).
Цитата: POlegin
...
В конструкторе клиента я делаю просто CoLogServer::Create(), поэтому я так понимаю сервер и запускается каждый раз. Как быть?
это как ты так умудряешься, у меня так не получается?
1. File|New|Application
2. File|New|ActiveX|Com Object
3. В конструкторе формы:
Код:
запускаю 1 клиент - 1 сервер, 2 клиента - 1 сервер и т.д.
ЗЫ: правда у меня ВСВ5, но в ВСВ6 все равно ATL3.0 и врядли, что там поправили
Это я в клиенте так делаю.
Цитата: POlegin
Это я в клиенте так делаю.
Вот и я "в клиенте" и у меня один сервер на всех.
Что тоя не понял, ты в клиенте Com Object добовляешь чтоли? Если да, то у тебя так в жизни не получится. В клиенте надо сделать Project->Import Type Library. В окне выбора библиотек типа выбираеш свой зарегестрированный компонент, убираешь галочку Generate Wrappers (или чё то в этом роде) и жмешь Create Unit, он тебе 4 (может больше может меньше) файла в проект должен добавить (ну два точно) - ***_TLB.H, ***_TLB.CPP. Com Object добавляеш тока когда компонент свой пишеш, а для клиента см. выше. Открываешь ***_TLB.H находиш в конце файла такой код
// *********************************************************************//
// The following typedefs expose classes (named CoCoClassName) that
// provide static Create() and CreateRemote(LPWSTR machineName) methods
// for creating an instance of an exposed object. These functions can
// be used by client wishing to automate CoClasses exposed by this
// typelibrary.
// *********************************************************************//
// *********************************************************************//
// COCLASS DEFAULT INTERFACE CREATOR
// CoClass : Название твоего компонента
// Interface: Класс интерфейса
// *********************************************************************//
#endif // __TLB_NO_INTERFACE_WRAPPERS
и перед #endif если билдер сам ничё не вставил пишешь
typedef TCoClassCreatorT<TCOMILogServer, ILogServer, &CLSID_LogServer, &IID_ILogServer> CoLogServer;
LogServer это название моего компонента вместо него пишешь свой компонент например
typedef TCoClassCreatorT<TCOMIMyComponent, IMyComponent, &CLSID_MyComponent, &IID_IMyComponent> CoMyComponent;
// *********************************************************************//
// The following typedefs expose classes (named CoCoClassName) that
// provide static Create() and CreateRemote(LPWSTR machineName) methods
// for creating an instance of an exposed object. These functions can
// be used by client wishing to automate CoClasses exposed by this
// typelibrary.
// *********************************************************************//
// *********************************************************************//
// COCLASS DEFAULT INTERFACE CREATOR
// CoClass : Название твоего компонента
// Interface: Класс интерфейса
// *********************************************************************//
#endif // __TLB_NO_INTERFACE_WRAPPERS
и перед #endif если билдер сам ничё не вставил пишешь
typedef TCoClassCreatorT<TCOMILogServer, ILogServer, &CLSID_LogServer, &IID_ILogServer> CoLogServer;
LogServer это название моего компонента вместо него пишешь свой компонент например
typedef TCoClassCreatorT<TCOMIMyComponent, IMyComponent, &CLSID_MyComponent, &IID_IMyComponent> CoMyComponent;
Чуть не забыл, надо еще переменную типа TCOMIMyComponent объявить. т.е.
TCOMIMyComponent FMyComponent.
Тогда уже в конструкторе можно делать так:
FMyComponent = CoMyComponent::Create();
TCOMIMyComponent FMyComponent.
Тогда уже в конструкторе можно делать так:
FMyComponent = CoMyComponent::Create();
Цитата: POlegin
Com Object добавляеш тока когда компонент свой пишеш, а для клиента см. выше.
А я что сделал? Создал локальный (в ехе) СОМ-сервер на ВСВ, читай внимательно мой первый пост, где и добавил СОМ-объжект.
Затем создал клиента (файлы типа tlb_h и tlb_cpp имеются ведь сервер создавал я сам)
а дальще тестирую:
Код:
FTestEvents = CoTestEvents_::Create();
получается:
один клиент - один сервер
два клиента - один сервер
и т.д.
ну если токлько сервер не ты писал, тогда ничего не поделаешь похоже...