把Connection当参数传到Dll的Function中去。

解决方案 »

  1.   

    哦?能否给个SOURCE?在DLL中用的是MDI子窗口,拜托。
      

  2.   

    如果全部数据组件都要用一套不大现实,我的意见是只传Connection,
    Dll中用自己的DataSet,这样也可以保证只有一个连接存在。你的Function这样写:Function DllConn(Conn: TAdoConnection): Boolean;
    var
      i:Integer;
    Begin
      For i:=0 To DMInDll.ControlCount-1 Do
      Begin
        If Controls[i] is TAdoDataSet Then
          DMInDll.Controls[i].Connection := Conn;
      End;
    End;Exports
       DllConn names 'DllConn';没有调试,大概是这个意思吧。
    另外我倒想请教一下如何把Dll中的Form做成MDI子窗口?他不是只能ShowModal的吗?