| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Не был произведён вызов CoInitialize [D7, MSSQL]

kblc ©   (2005-05-30 09:44:00) 

Уважаемые мастера, у меня к вам вопрос:

вот текс кода:


uses ..., ADODB, ...
...
procedure TfrConnection.GetDatabases(const ServerName: string; Storage: TStrings);
var
 Connection: TADOConnection;
 Query: TADOQuery;
begin
 Storage.Clear;

 Connection:=TADOConnection.Create(nil);
....
end;

Почему при Connection:=TADOConnection.Create(nil);у меня возникает exception "EOLESysError with text "Не был произведён вызов CoInitialize"  ".
Что это значит?

---

kblc   (2005-05-31 08:47:00) [1]

2DigitMan: thnx

---

Виталий Панасенко   (2005-05-30 14:53:00) [2]


uses ..., ADODB, ActiveX,...
...
procedure TfrConnection.GetDatabases(const ServerName: string; Storage: TStrings);
var
Connection: TADOConnection;
Query: TADOQuery;
begin
Storage.Clear;

 CoInitialize(nil);

Connection:=TADOConnection.Create(nil);
....
end;



---

Digitman   (2005-05-30 14:27:00) [3]

> это происходит тогда, когда я это выполняю в библиотеке


да, происходит ... например, если проекты хост-приложения и библ-ки используют разные Делфи-соглашения об использовании ран-тайм-пакетов


> иначе такого не бывает вообще


не факт.

в ряде случаев это "бывает" тогда когда создание объекта автоматизации происходит в доп.трэде процесса


> как лучше сделать, писать этот когд всегда? ...
> или это лучше сделать при инициализации библиотеки... и
> перед её уничтожением?


универсальных рекомендаций нет.

но требование одно - если инициализация все же требуется, выполнять ее нужно до самой первой попытки создания олей/СОМ-объекта в конкретном трэде ... соответственно деинициализацию нужно выполнять после уничтожения этого объекта

---

kblc   (2005-05-30 14:14:00) [4]

почему такая проблема возникает вообще? ведь это происходит тогда, когда я это выполняю в библиотеке... иначе такого не бывает вообще...

и как лучше сделать, писать этот когд всегда? ...
или это лучше сделать при инициализации библиотеки... и перед её уничтожением?

---

Digitman   (2005-05-30 09:56:00) [5]

uses ActiveX;

CoInitialize(nil);
try
Connection:=TADOConnection.Create(nil);
try
..//работа с объектом Connection
finally
 Connection.Free;
end;
finally
CoUnInitialize;
end;

---

Alexander Panov   (2005-05-30 09:55:00) [6]

kblc ©   (30.05.05 9:50) [3]
да и как я могу его вызвать если я ТОЛЬКО создаю его???

кого его?

набери CoInitialize и нажми F1.

---

kblc   (2005-05-30 09:50:00) [7]

Что значит "его нужно вызвать" ????????? а я что делаю???

---

kblc   (2005-05-30 09:50:00) [8]

да и как я могу его вызвать если я ТОЛЬКО создаю его???

---

Виталий Панасенко   (2005-05-30 09:47:00) [9]

Что его нужно вызвать.. не это ли тебе пишут ?

---

Наверх