Конференция "Corba" » Проблема с Word`ом в многопоточноми приложении [Delphi, Windows]
 
  • Provodnick © (07.11.06 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 через нее становится недоступен в основном потоке программы. Пишет "Объект не подключен к серверу". Помоги пожалуйста разобраться!
  • Сергей М. © (07.11.06 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 © (07.11.06 11:25) [2]
    Да, я почитал MSDN - разобрался. Использование COM-объекта в разных потоках допустимо при Multithreaded Apartment Model. Спасибо.
 
Конференция "Corba" » Проблема с Word`ом в многопоточноми приложении [Delphi, Windows]
Есть новые Нет новых   [134431   +9][b:0][p:0.001]