powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / MSM-Activate + Delphi7
7 сообщений из 7, страница 1 из 1
MSM-Activate + Delphi7
    #36672839
Vovin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Люди добрые, помогите настроить MSM-Activate в связке с Delphi7

Я работаю в ОС Windows XP. MSM for Windows NT ver 4.4.0 перенёс на свой комп обычным копированием с работающей системы. Проинсталил MSM-Workstation 2.0.
При помощи утилиты SYSGEN настроил MSM-Activate, в общем при запуске msm выдаётся “MSM-Activate server started on port 1666”. В Delphi проинсталил ActiveX компонент Micronetics Activate/COM, кинул его на форму, задал адрес сервера “localhost”, порт “1666”. При выполнении “mcmnd1.Login” вываливается исключение с текстом “событие не смогло вызвать ни одного из абонентов”.

С MSM столкнулся совсем недавно, т.е. возможно я принципиально что-то не так делаю. Может это несовместимость с Windows XP или требуется инсталляция пакета MSM с нуля? В общем буду рад любой помощи!
...
Рейтинг: 0 / 0
MSM-Activate + Delphi7
    #36673226
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
С нуля нету надобности, простое копирование как Вы сделали достаточно.
В принципе из старой системы все должно остаться, в том числе и настройка
MSM-Activate ... В XP должно все это работать без запинок. Лучше обьявить MCommand
глобально для всего проекта и присоединить в Delphi модуль (Reference) Micronetics
Activate/COM Version 4.4 (находится в C:/Windows/system32/msmole32.dll)

В Basic я делаю так:

Код: plaintext
1.
2.
3.
4.
5.
6.
 On Error GoTo Error
Set m = CreateObject("m.Command")
m.Server = "192.168.1.1"
m.PORT =  1666 
m.Login
.
.
...
Рейтинг: 0 / 0
MSM-Activate + Delphi7
    #36673261
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
var

M: variant;
begin
M:=CreateOleObject('M.Command');
Extract from MSMA8COM.HLP, documentation for MSM-Activate 4.4.0, copyright © 1998 Micronetics Design Corporation
...
Рейтинг: 0 / 0
MSM-Activate + Delphi7
    #36673467
Vovin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дело в том, что MSM-Activate в рабочей системе совсем не использовался. Это уже моя инициатива использовать данную технологию доступа к данным.
Поэксперементировал со способом создания объекта в соответствии с примером из оригинальной документации

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
var
M: variant;
....
begin
M:=CreateOleObject('M.Command');
m.Server := '128.1.1.222';
m.Port :=  1666 ;
m.Login('789');

эффект оказался такой же - исключительная ситуация.

Видимо я с настройкой Activate что-то напортачил.
Не подскажете необходимый минимум настроек для MSM-Activate? Может он зависит ещё от каких-то настроек в системе?
...
Рейтинг: 0 / 0
MSM-Activate + Delphi7
    #36673854
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Взять просто и Setup-ом инсталлировать его на стороне пользователя ПОЛНОСТЬЮ !!!
Имеется в веду MSM-Activate !
Это и есть вся установка ...
Ну а дальше присоединить библиотеку как выше было указано,
Я в дельфи не программирую и точно не могу Вам показать пример
Если на Васика могу маленький скинуть. :)
...
Рейтинг: 0 / 0
MSM-Activate + Delphi7
    #36673877
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Еще, может Вам это ссылка поможет:

http://sourceforge.net/projects/msm-api/
...
Рейтинг: 0 / 0
MSM-Activate + Delphi7
    #36673981
Vovin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Valeriu, огромное спасибо! Ключевым моментом была инсталяция дистрибутива MSM-Activate.

Лично я использовал MSM-Workstation, который вроде как является полноценной средой разработки оконных форм, а также включает в себя все необходимые компоненты для работы с MSM-Activate. Но видимо там что-то не так с версией этих компонентов. В общем они не работали должным образом.
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / MSM-Activate + Delphi7
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]