чтение из Excel таблиц в фоновом режиме

← →
Назаров Евгений (2005-02-04 01:01) [0]

Подскажите пожалуйста, как исправить ошибку:
пытаюсь прочитать табличку из Экселевского файла. в обычной процедуре получается без проблем, но если эту процедуру запихать в поток 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) [1]

Ну,все правильно.В начало потока CoInitialize(nil);
в конец CoUninitialize;

чтение из Excel таблиц в фоновом режиме Найти похожие ветки