COM + Служба

← →
MVova © (2002-04-19 14:21) [0]

Привет всем.

Есть COM сервер, работает.
Если делаю его как сервис то, запускается и какбы работает но при подключении клиентов запускается новый екземпляр(как обычное приложение) и все клиенты подключаются к нему. Как заставить клиентов подключаться к сервису?

При создании сервиса ставлю следующие параметры:

Dependence := TDependency(Dependencies.Add);
Dependence.Name := "MSSQLServer";
AllowPause := False;
Interactive := True;
DisplayName := "MyService";
Name := "My Service";
OnStart := Start;
OnStop := Stop;

← →
Romkin © (2002-04-19 14:52) [1]

Клиенты должны подключаться к существующему серверу, а не к новому. Указание этого зависит от способа подключения

← →
Shaman_Naydak © (2002-04-19 15:02) [2]

Мда, знакомая до боли тема, я на нее почти неделю убил..
Разъяняю:
а) во-первых, тут есть хитрость в регистрации такого ко-класса в
реестре (см. RegisterAsService)
б) во-вторых, он должен регистрить ко-классы при запуске не из основного потока, а естесственно из потока сервиса..

Короче, мужик, если хочешь, могу выслать переписанный под это
дело мной модуль comServ в NTServiceComServ +
простой пример.. Но так как меня время дико поджимало, там не все
красиво сделано, а руки так и не дошли до сих пор :(

← →
vuk © (2002-04-19 15:33) [3]

Кстати о зависимостях. Для COM-сервиса необходимо добавить также зависимость от RpcSs.

Шли если можеш, посмотрю.
Спасибо.

COM + Служба Найти похожие ветки