Запуск Excel из дополнительного потока

← →
Антоныч © (2006-05-26 14:17) [0]

Почему не запускается Excel из созданного потока?
procedure TPotok.Execute;
var
XLApp, WorkBk, WorkSheet: Variant;
begin
XLApp := CreateOLEObject("Excel.Application");
WorkBk:=XLApp.WorkBooks.Open("D:\sp_module.xls");
WorkSheet:=WorkBk.Sheets.Item[1];
XLApp.Visible:=True;
end;
Выполнение прекращается на выделенной строке, выдаётся ошибка "Не был произведён вызов CoInitialize". Это куда копать и с чем есть? :-)

← →
Сергей М. © (2006-05-26 14:18) [1]

CoInitialize(nil);
try
..
finally
CoUnInitialize;
end;

← →
Kolan © (2006-05-26 14:27) [2]

Просто глаза резануло:
TPotok - представь сколько будет ломать голову англичанин над этим именем.

← →
Антоныч © (2006-05-26 14:29) [3]

Хмм, интересно... тогда сразу 2 вопроса:
1) Почему из основного потока всё работает и без CoInitialize?
2) В каком модуле объявлен CoInitialize или хотя бы в какой виндошной dll-ке он сидит?

2 Kolan: Работаю на китайцев, там над этим голову не ломают :-)

В принципе, уже спросил у Яндекса, спасибо :-)

Запуск Excel из дополнительного потока Найти похожие ветки