Как обратиться к нужной копии программы?

[B.Feldman]

Суть вопроса в VB имеется комманда getObject(...,...). К ней написано, что
она вызывает первый доступный объект указанного класса. А как быть, если
загружено два и более объектов этого класса? Как обратиться и получить
объект именно нужной копии?
Борис

[Andrey Ivanov]

"B.Feldman" <b...@noname.us> сообщил/сообщила в новостях следующее:
news:uXA4Ghzu...@TK2MSFTNGP02.phx.gbl...

Какой VB, VB6 или VB.NET?
Не понятен сам вопрос. Насколько я помню, эта функция как раз осуществляет
загрузку объекта, оформленного как COM-компонент, а доступ к конкретному
загруженному объекту осуществляется по соответствующей ссылке, которую и
возвращает эта функция. И понятие версии COM объекта в ОС XP толком нету (и
более ранних), оно только в висте появиться...

[B.Feldman]

ПРошу прощения, долго отсуствовал. По порядку:
1. VB6 и VBA для Office 2003
2. Я спрашивал про вот такой метод использования ф-ии
Set X = GetObject(, "MySrvr.Application") ' X references an existing
Application object
по крайней мере в моих приложениях он обращается именно к загруженной копии
программы. В моем случае - это ГИС MapInfo. Поскольку язык программирования
для MapInfo, мягко говоря бедноватый Basic, да к тому же с полным отсуствием
графического интерфейса для создания форм. Имеется потребность вызывать
формы, выполненные в VB6 или VBA, благо механизм передачи команд на
исполнение в MapInfo, существует и интерфейс к классу в VB6 - то же. Но тут
есть одна очень неприятная тонкость - я не могу пользователю запретить
запустить хоть 100 MapInfo и если запущенный интерфейс будет общаться не с
той копией программы - будет очень плохо и очень больно.
Поэтому и есть вопрос, как получить или выбрать именно свою единственно
верную из всех загруженных копий. Предположим, что все основные параметры
запущенной программы я тем или иным образом сообщу в программу на VB6.
Про версию объекта ничего не скажу, т.к. такими словами не владею.
С уважением,
Борис

"Andrey Ivanov" <sli...@mail.ru> сообщил/сообщила в новостях следующее:
news:OjSygE4u...@TK2MSFTNGP04.phx.gbl...

[Andrey Ivanov]

"B.Feldman" <b...@noname.us> сообщил/сообщила в новостях следующее:

news:Ond#vdixGH...@TK2MSFTNGP05.phx.gbl...

> ПРошу прощения, долго отсуствовал. По порядку:
> 1. VB6 и VBA для Office 2003
> 2. Я спрашивал про вот такой метод использования ф-ии
> Set X = GetObject(, "MySrvr.Application") ' X references an existing
> Application object
> по крайней мере в моих приложениях он обращается именно к загруженной копии
> программы. В моем случае - это ГИС MapInfo. Поскольку язык программирования
> для MapInfo, мягко говоря бедноватый Basic, да к тому же с полным отсуствием
> графического интерфейса для создания форм. Имеется потребность вызывать
> формы, выполненные в VB6 или VBA, благо механизм передачи команд на
> исполнение в MapInfo, существует и интерфейс к классу в VB6 - то же. Но тут
> есть одна очень неприятная тонкость - я не могу пользователю запретить
> запустить хоть 100 MapInfo и если запущенный интерфейс будет общаться не с
> той копией программы - будет очень плохо и очень больно.
> Поэтому и есть вопрос, как получить или выбрать именно свою единственно
> верную из всех загруженных копий. Предположим, что все основные параметры
> запущенной программы я тем или иным образом сообщу в программу на VB6.
> Про версию объекта ничего не скажу, т.к. такими словами не владею.
> С уважением,
> Борис

Так в чем проблема? В вашем примере X есть ссылка на конкретный экземпляр
объекта, и пока вы будете ей пользоваться, программа будет обращаться к тому
экземпляру объекта, который был создан при ее получении, и на другие можно
внимания не обращать, не зависимо от того, сколько их будет создано
пользователем.

[B.Feldman]

Еще раз прошу прощения, видимо я путано осветил проблему. Вот как она
выглядит:
1. Имеется программа, в моем случае ГИС MapInfo. В ней имеется возможность
вызова специализированных приложений, написанных на ее внутреннем языке
программирования - MapBasic.
2. Все что касается интерфейса с функциями самой программы - это язык, а-ля
ранний Basic, делает превосходно, и как водится выполняет такие функции и
процедуры, которые из стандартной оболочки не доступны. Более того, можно
сказать, что и сама MapInfo, является урезанным обработчиком команд
MapBasic'а, ну и еще визуализатором результатов.
3. Возможности пользовательского интерфейса MapBasic'а - ужасны, все
элементы интерфейса формы, кнопки , поля и т.п. надо описывать и расставлять
в ручную.
4. Но в нем имеется возможность подключать внешние DLL-библиотеки и
соотвественно вызывать из них функции. Поэтому естественно желание все формы
и т.п., а так же пользовательский интерфейс написать на VB или VBA, и этот
интерфейс вызывать как функцию из Dll-библиотекию
5. Получить номер главного и всех порожденных окон передать во внешнюю
программу или функцию, не является проблемой.
6. Проблемой является получить экземпляр объекта класса MapInfo, т.к. сам
MapInfo о себе как о классе не мыслит, он мыслит окнами и т.п. Хотя и
создает доступную для VB библиотеку функций и медодов, используемых в
отношении экземпляра класса MapInfo. И среди них есть собственно два
основных - выполнить и выполнить с возвратом результата.
7. Функция GetObject() - позволяет мне в программе на VB получить ссылку на
один из запущенных экземпляров MapInfo, именно получить ссылку на уже
запущенный объект, а не создать новый. Причем, это объект создается вне
программы или функции на VB.
8. Именно в этом и состоит вопрос, как с помощью GetObject() или каким-то
еще способом - получить ссылку на один из запущенных экземпляров программы,
если их запущено две или более, и если запускались и создавались эти
программы ВНЕ программы на VB? Повторюсь, еще раз, сама программа или
функция на VB никаких экземпляров класса НЕ создает, она присоединяется к
уже созданным или запущенным другим способом.

С уважением,
Борис

"Andrey Ivanov" <sli...@mail.ru> сообщил/сообщила в новостях следующее:
news:%23JCYbWB...@TK2MSFTNGP06.phx.gbl...

[Andrey Ivanov]

Я давно не занимался VBA, но по моей памяти (справочников сейчас нету при себе)
функция GetObjet создает экземпляр нового объекта. А описаная проблема кажется
касается области межпотоковго взаимодействия, в которой я тоже не очень силен.
Так что больше ничем не могу помочь.
Попробуйте обратиться с описанием проблемы на форумы www.rsdn.ru, там много
толковых специалистов.

"B.Feldman" <b...@noname.us> сообщил/сообщила в новостях следующее:

news:e$pA$zS1GH...@TK2MSFTNGP03.phx.gbl...

[Игорь Горбонос]

Hello, B.Feldman!
You wrote on Mon, 11 Sep 2006 03:01:05 +0400:

Если я правильно понял, аналогичная проблема была при работе с вордом,
екселем. По GetObject мы получали интерфейс запущеного приложения, а, в
случае с екселем, с какой из открытых книг нам нужно работать был большой
вопрос, который снимался знанием названия книги и получением её интерфейса
из коллекции открытых книг:
Dim wb As Workbook
Set wb = Application.Workbooks("Имя книги")
При этом пользователь мог открывать дополнительно ещё кучу файлов и никакой
путанницы нет.

Возможно есть какая-то коллекция открытых документов, по которой можно
определиться с каким документом работать.

With best regards, Игорь Горбонос. E-mail: ig...@tekom.dp.ua