Excel в Потоке

← →
Neket (2007-04-18 12:38) [0]

Подскажите как запустить формирование отчета в Excel в потоке. Когда просто запускаю то все работает, а когда перенес в Поток то отказывается.
Делаю так:

procedure MakeXL.Execute;
var
XLApp:Variant;
begin
XLApp:= CreateOleObject("Excel.Application");
XLApp.Workbooks.Add();
XLApp.Workbooks[1].WorkSheets[1].Name:="Test_NAH";
XLApp.Visible:=true;
Shapka(XLApp);
end;

← →
Сергей М. © (2007-04-18 12:40) [1]

procedure MakeXL.Execute;
..
begin
CoInitialize(nil);
try
...
finally
CoUninitialize;
end;
end;

← →
Neket (2007-04-18 12:50) [2]

Ок.. Спасибо. Но тогда ещё вопрос. А в какой модуль подключить, а то у меня пишет что неизвестная команда.

← →
Сергей М. © (2007-04-18 12:51) [3]

ActiveX

← →
Neket (2007-04-18 15:18) [4]

Спасибо.
Возник ещё вопрос.

А как правельн в таком случае закрыть Excel?

procedure MakeXL.Execute; .. begin CoInitialize(nil); try XLApp:= CreateOleObject("Excel.Application"); XLApp.Workbooks.Add(); XLApp.Workbooks[1].WorkSheets[1].Name:="Test_NAH";
......
Здесь идет работа с отчетом
......
А как теперь закрыть созданный отчет?
...... finally CoUninitialize; end;
end;

Excel в Потоке Найти похожие ветки