| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Excel в Потоке
Neket © (2007-04-18 12:38:00)Подскажите как запустить формирование отчета в 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;
Neket (2007-04-18 15:18:00) [1]Спасибо.
Возник ещё вопрос.
А как правельн в таком случае закрыть 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;
Сергей М. (2007-04-18 12:51:00) [2]ActiveX
Neket (2007-04-18 12:50:00) [3]Ок.. Спасибо. Но тогда ещё вопрос. А в какой модуль подключить, а то у меня пишет что неизвестная команда.
Сергей М. (2007-04-18 12:40:00) [4]procedure MakeXL.Execute;
..
begin
CoInitialize(nil);
try
...
finally
CoUninitialize;
end;
end;
| |
