![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Компонент TADOConnection в потоке
EdSin © (2006-02-09 09:36:00)Здравствуйте. Я столкнулся с такой проблемой.
Пишу процедуру (Делфи 7):
procedure AAA
var
hhh : TADOConnection;
begin
hhh:=TADOConnection.Create(nil);
end;
Все работает и все хорошо.
Но если я пишу тоже самое в потоке:
procedure TTT.Execute
var
hhh : TADOConnection;
begin
hhh:=TADOConnection.Create(nil);
end;
то ничего не хорошо. Ругается. Говорит "не было вызвано CoInitialize".
Не пойму в чем проблема, не пойму ошибку.
Может кто сталкивался с таким??? Подскажите, пожалуйста.
EdSin (2006-02-09 18:09:00) [1]Спасибо. Буду копать. О результатах доложу :))))
Fay (2006-02-09 17:38:00) [2]uses ActiveX
EdSin (2006-02-09 17:35:00) [3]:) я так и не понял, какой код нужно добавить???
procedure TTT.Execute
var
hhh : TADOConnection;
begin
CoInitialize;
hhh:=TADOConnection.Create(nil);
CoUnInitialize;
end;
Это не работает. Делфи вообще ничего не может сказать про
CoInitialize :(
wal (2006-02-09 10:02:00) [4]
> Не пойму в чем проблема, не пойму ошибку.
Ошибку ты сам уже написал: не было вызвано CoInitialize.
Надо бы вызвать, чтобы с COM работать. CoUnInitialize в конце не забыть.