vbaからdelphiへの接続をアブノーマルにします

Question

私はVBAマクロでCOMオブジェクトを作成し、それをDelphi DLL（D2009）に渡したいと考えています。 Delphiでの私の手続き宣言はどのように見えるのですか？

背景：私は期待してい （期待して）するVBAマクロ： は 、 は、Delphi DLLが閉じるまで が生き続ける、デルファイDLLプロシージャにCOMオブジェクトを渡すのDelphi DLLを呼び出す、COMオブジェクトを作成します（DLLにはユーザーが対話するための埋め込みフォームがあります）。

私はVBAマクロに私が完了したことを知らせるためにコールバック関数を作成する必要があると思うが、それはきちんと整えることができるが、私はこの質問とは独立に作業するだろう。

更新 具体的には、エクスポートされた関数の宣言はDelphi DLLのためにどうすべきですか？

Answer 1

あなたは、TADOConnectionのインスタンスを作成し、stdcall呼び出し規約を使用することをお勧めし新しいインターフェイスリンク

library Project1; 
uses ADODB; 

{$R *.res} 

    procedure SetConnection(aDBConnection : _Connection); stdcall; 
    var connect : TADOConnection; 
    begin 
     connect := TADOConnection.Create(nil); 
     try 
      connect.ConnectionObject := aDBConnection; 
      //here you can use your connection 
     finally 
      connect.Free(); 
     end; 
    end; 


exports SetConnection name 'SetDBConnection'; 

begin 
end. 

でConnectionObjectを交換デルファイ手続き にADO接続インタフェースリンク_Connectionを渡す必要があります。 exportキーワードのエントリポイントを見つけるために、あなたはLoadLibraryとgetProcAddressをできるようsetConnection procは、SetDBConnection名前のuotsideから提供されています（私はそれを使用して、ライブラリをロードする方法を言うことができないので、本当に私はVBAを知らない）