VPF::ComServer - Форум программистов

cemick

Дата 26.5.2009, 12:20 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 416
Регистрация: 6.7.2006
Где: Санкт-Петербург

Репутация: 1
Всего: 6

Можно ли сделать следующие:

Com сервер реализован в виде exe, фабрика классов создается с параметром ciMultiInstance.
В макросе в Word'e создаем объект нашего приложения, а при выходе из процедуры макроса уничтожается инстанс и закрывается приложение. Дак вот вопрос: Можно ли, и как, если можно, сделать так, что бы наше exe приложение не закрывалось при выходе из процедуры макроса.

Текст в Delphi:

Код


CoTest = (TAutoObject, ITestInterface)
....

end;

initialization

  TAutoObjectFactory.Create(ComServer, CoTest,
    CLASS_ CoTest, ciMultiInstance, tmApartment);

end.

Макрос:

Код


Sub RunOLE()
    Dim O As Object
    Set O = CreateObject("testAppl.CoTest")
    .. что нибудь вызываем

End Sub  REM происходить закрытие приложения testAppl

Это сообщение отредактировал(а) cemick - 26.5.2009, 12:21

cemick

Дата 26.5.2009, 13:06 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 416
Регистрация: 6.7.2006
Где: Санкт-Петербург

Репутация: 1
Всего: 6

уп-с, не заметил точно такой же темы ниже

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »