Вниз
Скачать: CL | DM;

Работа с БД с применением 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]

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


 
Desdechado ©   (2005-10-26 11:18) [7]

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


 
Goldmund ©   (2005-10-26 11:31) [8]

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


 
Desdechado ©   (2005-10-26 11:51) [9]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.975 c
2-1132756782
filh
2005-11-23 17:39
2005.12.11
gzip


2-1132748523
tytus
2005-11-23 15:22
2005.12.11
Помогите примером


3-1130058026
darklord
2005-10-23 13:00
2005.12.11
update тока одной записи


1-1132043842
auz
2005-11-15 11:37
2005.12.11
TProgressBar - (Delphi6+NT4) vs (Delphi7+WinXP)


14-1132530722
SVASH
2005-11-21 02:52
2005.12.11
USBPRINT.SYS




   Наверх