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

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

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

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

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

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


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