OutOfProcess-сервер: поднять событие во всех клиентах

[hclubmk]

Есть OutOfProcess-сервер (ActiveX EXE), выполняющий роль хранилища данных для межпроцессового взаимодействия.
При изменении данных одним из клиентов, необходимо оповестить всех остальных клиентов о произошедшем (поднять событие).

Клиент "Б" изменяет данные: Server.Value = X. Метод Value понимает событие OnValueChange, но это событие возникает/происходит только в клиенте "Б", вызвавшем метод Value. В клиенте-же "А", который и нужно оповестить, это событие не возникает/происходит.
Свойства класса:

DataBindingBehavior = vbNone
Instancing = MultiUse
Persistable =vbNotPersistable

Собственно, вопрос: как поднять событие OnValueChange в клиенте "А" ?

[Хакер]

В клиенте-же "А", который и нужно оповестить, это событие не возникает/происходит.

Значит клиент-А обладает ссылкой на другой объект, а не тот, у которого рейснуто событие.

[hclubmk]

Не обладает.
Если клиент "А" изменит Value, то при проверке клиентом "Б" значения Value, оно оказывается таким, какое было установлено клиентом "А".

[Хакер]

Если клиент "А" изменит Value, то при проверке клиентом "Б" значения Value, оно оказывается таким, какое было установлено клиентом "А".

Это ещё само по себе ни о чём не говорит. Может быть Get-хендлер свойства читает его значение из общего файла или общей БД.

[hclubmk]

Нет ни общего файла, ни другого хранилища, есть только переменная, принадлежащая серверу. Она и только она принимает и отдает.

[Хакер]

есть только переменная, принадлежащая серверу.

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

[hclubmk]

Хм.

Значит клиент-А обладает ссылкой на другой объект

В таком случае, как передать ссылку на тот-же самый объект?

[Хакер]

Это противоестественный вопрос.

Я не знаю, что у тебя за модель, и что олицетворяют экземпляры классов. Но, как бы там ни было, это уже всецело твоя забота — сделать так, чтобы клиенты, работающие с одним объектом предметной области, получали ссылку на один и тот же ООП-объект.

Я, к тому же, даже не знаю, как вообще твои клиенты получают ссылку на объект внутри сервера.

[Antonariy]

hclubmk, в описании нет ни слова про то, как создается серверный объект. Подозреваю, что просто объявлен в обоих клиентах как new, или там же через new создается. И в этом случае Хакер прав - у клиентов разные объекты. Однако он не прав насчет противоестественности вопроса. Слышал про GetObject? Так вот он-то тебе и нужен. Не важно, какой из клиентов запускается первым, любой должен сначала выполнить GetObject и тем самым попытаться получить "тот же" объект. Если сервер не запущен, GetObject завершится ошибкой и вот тут-то вступает в действие new. Однако, чтобы GetObject заработал с твоим сервером, ты должен познакомиться с доселе неизвестной тебе сущностью: Running Object Table. Описано пугающе сложно, но читать статью полностью не обязательно, достаточно лишь получить представление, с чем это едят. Реализация занимает несколько строк и находится здесь, например.

Процедура AddToROT должна (если у сервера нет графического интерфейса и он не запускается сам по себе как эксель, например) запускаться в Class_Initialize, а RemoveFromROT в Terminate. Class_Initialize должен выполняться единожды, если это происходит несколько раз, значит где-то косяк. Все переменные, где хранятся данные потребные клиентам, должны быть перенесены в класс. Не то чтобы это что-то сильно изменило в твоем случае, но это концептуально правильный подход и нужно себя к этому приучать.

[Хакер]

Однако он не прав насчет противоестественности вопроса.

Он противоестественный, потому что поставлен так, как будто сама по себе попытка передать ссылку на один объект ведёт на деле к передачи ссылок на разные объекты, а чтобы передались ссылки на всё-таки один объект, нужно сделать что-то сверхъестественное.

А уж вопрос «просто как передать» — выглядит странным (как-то же автор получил свою ссылку). Тут надо было бы тогда огласить, что он получил с использованием New/CreateObject/CoCreateInstance.

А уж самих способов передачи ссылки между процессами можно назвать много (много с использованием ROT, плюс самодельные извращенства без ROT).

[hclubmk]

Antonariy, спасибо за содержательные разъяснения - всё именно так и оказалось. Заработало - как и требовалось.
Всё когда-то бывает впервые