powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Несколько экземпляров OLE сервера
11 сообщений из 11, страница 1 из 1
Несколько экземпляров OLE сервера
    #33185032
Фотография aLexx Subb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как создать несколько экземпляров какого-либо OLE сервера и чтобы они работали независимо друг от друга, т.е. управлять ими по отдельности
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33185312
Фотография Petro123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
 var 
  word1, word2 : ssssssssssssssssssss;

word1 := CreateOLEObject('vsdvsdvsdvd');
word2 := CreateOLEObject('vsdvsdvsdvd');
______________________________________________
Вы имеете право хранить молчание! Всё что Вы скажете может быть использовано против Вас в суде!
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33186278
Фотография aLexx Subb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ага ....если бы так, я же не совсем уж валенок.
Пробовал и так, нифига ...передается управление со второго экземпляра на первый. т.е. ole сервер один, а переменных две в программе и обе ссылаются на один сервер.
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33186285
Tov. Drujba
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробуйте тогда создать экземпляры в разных процессах.
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33186442
Фотография Petro123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
aLexx Subbага ....если бы так, я же не совсем уж валенок.
Пробовал и так, нифига ...передается управление со второго экземпляра на первый. т.е. ole сервер один, а переменных две в программе и обе ссылаются на один сервер.
Тебе чернил жалко что-ли?
Если ты в двух РАЗНЫХ переменных открыл 2 разных файла word, то что тебе ещё надо?
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33195232
Фотография aLexx Subb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Еще разок объесняю ...
Причем тут ворд, А? на нем чего свет клином сошелся?

Открываю сервер. Работает.
Хочу запустить еще один процесс с этим же объектом, но не с этим же сервером. Инициализирую объект и хрен тебе. Переводит стрелки на ранее созданный и запустить два потока фиг.
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33195679
KVAru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у тебя наверное COM в tmSingle, а надо tmApartment.
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33195915
KVAru
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
т.е. наоборот
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #33195977
Фотография Petro123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
aLexx SubbЕще разок объесняю ...
Причем тут ворд, А? на нем чего свет клином сошелся?========== а если ты пишешь по 2 слова в неделю - приходится на пальцах объяснять и додумывать за тебя.
Открываю сервер. Работает.
Хочу запустить еще один процесс с этим же объектом, но не с этим же сервером. Инициализирую объект и хрен тебе. Переводит стрелки на ранее созданный и запустить два потока фиг.
=============== ниже сказали - вероятно модель сервера указана как многопоточная а не многоэкземплярная.
http://infocity.kiev.ua/prog/delphi/content/delphi053.phtml?id=1382
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Несколько экземпляров OLE сервера
    #39928924
Alexander Rogan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может кому-то поможет,
то дело в самом OLE

Если вы делали OLE, то ищите в проекте строку TAutoObjectFactory.Create

initialization
TAutoObjectFactory.Create(ComServer, ............., ...............,
ciMultiInstance , tmApartment); //

так вот, меняйте ciMultiInstance на ciSingleInstance и будет вам счастье!
...
Рейтинг: 0 / 0
Несколько экземпляров OLE сервера
    #39929105
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Alexander Rogan
так вот, меняйте ciMultiInstance на ciSingleInstance и будет вам счастье!
С точностью до наоборот
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Несколько экземпляров OLE сервера
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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