![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
чтение из Excel таблиц в фоновом режиме [D7]
Назаров Евгений © (2005-02-04 01:01:00)Подскажите пожалуйста, как исправить ошибку:
пытаюсь прочитать табличку из Экселевского файла. в обычной процедуре получается без проблем, но если эту процедуру запихать в поток Thread, то при выполнении следующего кода
if not Assigned(IXLSApp) then
begin
isCreate := NewInstance or (not SUCCEEDED(GetActiveObject(Excel8TLB.CLASS_Application_,nil,IU)));
if isCreate then
FIXLSApp := CreateComObject(Excel8TLB.CLASS_Application_) as Excel8TLB._Application
else FIXLSApp := IU as Excel8TLB._Application;
end;
происходит ошибка:
EOleException with message 'Не был произведен вызов CoInitialize'
GanibalLector (2005-02-04 01:56:00) [1]Ну,все правильно.В начало потока CoInitialize(nil);
в конец CoUninitialize;