Работа с БД с применением DLL

← →
Goldmund © (2005-10-26 10:31) [0]

Привет всем. Есть форма в DLL, на нее надо выкинуть БД, делаю это через ADO и DBGrid. Вызываю процедуру из DLL, форму выводить он не хочет, без компонентов ADO все работает. Подскажите, плиз, какие дополнительные настройки нужно применять в этом случае.

← →
stone © (2005-10-26 10:33) [1]

А что пишет? Ошибку какую выдает? Код вызова покажи в приложениии и в ДЛЛ.

← →
Goldmund © (2005-10-26 10:40) [2]

Выдает ошибку: Project DemoDLL1.exe raised exception class EOleSysError with message "Не был произведен вызов CoInitialize".
в приложении:
procedure ShowDemoForm(AOwner: TComponent); external "DataCheck.dll"; procedure TMainForm.BitBtn1Click(Sender: TObject); begin ShowDemoForm(Application); end;
В ДЛЛ:
procedure ShowDemoForm(AOwner: TComponent); begin DemoForm := TDemoForm.Create(AOwner); DemoForm.ShowModal; DemoForm.Free; end;

← →
stone © (2005-10-26 10:43) [3]

> "Не был произведен вызов CoInitialize".

Что и предполагалось...
> procedure ShowDemoForm(AOwner: TComponent);
> begin
CoInitialize(Nil);
> DemoForm := TDemoForm.Create(AOwner);
> DemoForm.ShowModal;
> DemoForm.Free;
CoUnInitialize;
> end;

← →
Goldmund © (2005-10-26 10:49) [4]

Я понимаю что я ламо, но с этим что делать:
[Error] DataCheck.dpr(18): Undeclared identifier: "CoInitialize"

← →
Fay © (2005-10-26 10:52) [5]

2 Goldmund © (26.10.05 10:49) [4]
uses ActiveX ?

← →
Goldmund © (2005-10-26 11:03) [6]

Но теперь при загрузке БД, программа вешаеться намертво

что есть "выкинуть БД" и "загрузка БД"?

При выставление AdoTable1.Active:=true;

что в трассировке видно?

Работа с БД с применением DLL Найти похожие ветки