Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.01.17;
Скачать: CL | DM;

Вниз

Проблема с Word`ом в многопоточноми приложении   Найти похожие ветки 

 
Provodnick ©   (2006-11-07 10:18) [0]

Здравствуйте! Занчит, ситуация следующая. Есть глобальная переменная WA:variant. Создается отдельный поток BeginThread(nil, 0, @CheckKodif, nil, 0, ThID). В нем создается Word.Application вот так:

   try
     WA := CreateOleObject("Word.Application")
   except
     WA:=Null;
     Exit
   end;

   try
     WA.Documents.Add(frmMain.edtCodif.Text, EmptyParam)
   except
     WA.Quit(0, EmptyParam, EmptyParam);
     WA:=Null;
     Exit
   end;

Во-первых, все это не работало, пока в начало функции потока не добавил CoInitialize(nil) - почему?
И второе - хотя переменная WA и глобальна, но после отработки потока Word через нее становится недоступен в основном потоке программы. Пишет "Объект не подключен к серверу". Помоги пожалуйста разобраться!


 
Сергей М. ©   (2006-11-07 11:08) [1]


> пока в начало функции потока не добавил CoInitialize(nil)
> - почему?


Потому что

The CoInitialize function initializes the Component Object Model(COM) library. You must initialize the library before you can call its functions. Applications must call CoInitialize before they make any other COM library
..
You need to call this before you call any of the OLE library functions unless you call the OleInitialize function, which calls CoInitialize internally


> после отработки потока Word через нее становится недоступен
> в основном потоке программы


Все правильно, так и должно быть.
Каждый поток должен создавать свой собственный экз-р объекта олей-автоматизации. Создание оного объекта в одном потоке и последующее использование его в других потоках недопустимо.


 
Provodnick ©   (2006-11-07 11:25) [2]

Да, я почитал MSDN - разобрался. Использование COM-объекта в разных потоках допустимо при Multithreaded Apartment Model. Спасибо.



Страницы: 1 вся ветка

Текущий архив: 2010.01.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
8-1200143658
452
2008-01-12 16:14
2010.01.17
Как вывести текст в центре Canvas по вертикали и горизонтали?


6-1211800006
atruhin1
2008-05-26 15:06
2010.01.17
TWebBrowser и сертификаты


8-1173512433
Аликъ
2007-03-10 10:40
2010.01.17
Bass убрать голос из песни


2-1259171373
blackberry
2009-11-25 20:49
2010.01.17
подгрузка компаса при нажатии на картинку


15-1258624428
Сергей
2009-11-19 12:53
2010.01.17
Система управления версиями для delphi.