WordApplication и потоки

[bssergy]

У меня такой вопрос. Кидаю на форму компонент WordApplication, создаю поток и пишу следующий код:

procedure TForm1.Button1Click(Sender: TObject);
begin
NewThread:=TNewThread.Create(true);
NewThread.FreeOnTerminate:=true;
NewThread.Resume;
end;

procedure TNewThread.Execute;
begin
form1.WordApplication1.Connect;
form1.WordApplication1.Visible:=true;
end;

Но почему по при запуске появляется ошибка "Project Project1.exe raised exception class EOleSysError with message 'Не был произведен вызов CoInitialize'. Process stopped. Use Step or Run to continue." Что делать?

[bssergy]

Разобрался, закрывайте тему