如题

解决方案 »

  1.   

    你传进去不就得了,举个例子
    library Chda;{ Important note about DLL memory management: ShareMem must be the
      first unit in your library's USES clause AND your project's (select
      Project-View Source) USES clause if your DLL exports any procedures or
      functions that pass strings as parameters or function results. This
      applies to all strings passed to and from your DLL--even those that
      are nested in records and classes. ShareMem is the interface unit to
      the BORLNDMM.DLL shared memory manager, which must be deployed along
      with your DLL. To avoid using BORLNDMM.DLL, pass string information
      using PChar or ShortString parameters. }uses
      SysUtils,
      Classes,
      Forms,
      ExtCtrls,
      windows,
      ADODB,
    你自己的工程文件;{$R *.res}Function GetFormOne(aCn:TADOConnection;aApp:TApplication;aModuleName:PChar):TForm; export; stdcall;
    begin
      FCn:=aCn;
      FModuleName:=aModuleName;
      Application:=aApp;
      Result:=TChdaForm.create(Application);
    end;procedure SetOldApplication;stdcall;export;
    begin
      Application:=FApp;
    end;exports
      GetFormOne,SetOldApplication;begin
        FApp:=Application;
    end.
      

  2.   

    用Ado的原生对象,传入_connection就可以了。
      

  3.   

    TO zsr(老牛) :能不能详细点