Delphi登录后发现占有了Oracle的很多进程

Question

我是在每个Dll文件中都加了一个ADOConnection控件。
调用dll过程中，每打开一个dll窗口就增加了一个后台进程。希望所有dll共用一个ADO，但不清楚如何共用？请高手指点

Answer 1

这样做,当然会出现这种情况,
一般的做法是,在主窗体搞一个ADOConnection,
然后用传数将其传递到DLL文件中供其使用

Answer 2

在DLL文件中这样写procedure showycdj(connstr:TADOConnection;qxstr:tagLIMITS;usernamestr:WideString);
begin
  dmyc:=Tdmyc.Create(nil);
  try
    dmyc.ADOConnection1.ConnectionString:=connstr.ConnectionString;
    frmycdj:=Tfrmycdj.Create(Application);
//    frmyw:=Tfrmyw.Create(Application);
    with frmycdj do
    try
      UserName:=usernamestr;
      qx:=qxstr;
      ShowModal;
    finally
      Free;
    end;
  except
    dmyc.Free;
  end;
end;

Answer 3

感谢好友hui717的帮助！我在主程序加了DataModule把ADO等控件都加在其中了。在Dll(uses DataModule.pas)的调用中提示错误：
‘Access violation at address 0286337B in module prgmain.dll.read of address 000000058’刚才搜索帮助的时候有人提到过初始化，不清楚如何处理。