この記事は、Thushara Wedagedara氏のブログの抄訳です
インターネット上には、便利なC++ライブラリが豊富に存在します。過去にエンバカデロのブログでも、C++の素晴らしい使い方を紹介してきました。 C++は非常に高いパフォーマンスを発揮します。C++ライブラリのソースコードを入手できる場合は、DelphiプログラムでC++を使用可能にするパッケージを作成できます。しかし、C++ライブラリのソースコードが入手できないことがよくあります。商用向けのC++ライブラリでは、いくつかのC++ヘッダーと静的ライブラリファイル（.lib）のみが提供され、.cppソースファイルが提供されていないことがよくあります。もしこのようなケースで、DelphiのアプリケーションでそれらのC++ライブラリを使用したい場合、プロキシDLLを作成すれば、ソースコードが無くてもC++ライブラリを利用することができます。
Table of Contents
DelphiからC++ DLLを呼び出すためのプロキシDLLの作成方法
DelphiからDLLを利用するためには、呼び出し規約をcdeclではなく、stdcallで関数(API)を公開する必要があります。プロキシDLLのコンパイルは、C++Builder以外にも以下のような任意のC++コンパイラが利用できます。
簡単な例を挙げてみましょう。ここでは、DLLファイルと宣言を含むヘッダーファイルがあり、実装のコード.cppファイルは存在しないものとします。この例のソースコードは以下ののURLから入手できます。
https://github.com/PacktPublishing/Delphi-High-Performance/tree/master/Chapter%208/StaticLib1
[crayon-67405ae380ec9978551476/]プロキシDLLを介してDelphiプログラムでC++ライブラリを使用する方法
まずプロキシDLLを作成する必要があります。
任意のIDEで新しいC++ DLLプロジェクトを作成してください。(下図は、Embarcadero Dev-C++を利用した場合の例)
「dllmain.cpp」ファイルが自動的に追加されます。 ただし、静的ライブラリをラップするために別のユニットが必要です。 ここでは「StaticLibWrapper.cpp」という新しいユニットを追加します。
インポートしたい静的ライブラリのヘッダファイルをプロジェクトにインクルードする
[crayon-67405ae380ed3228594275/]次に、静的ライブラリのヘッダーファイルをプロジェクトフォルダにコピーします。 そして静的ライブラリをプロジェクトに含める必要があります。 最後に下図のようにEmbarcadero Dev-C++を利用の場合は、静的ライブラリをコピーしたフォルダをIDEのライブラリパスに追加します。
VisualStudioの場合は、「構成のプロパティ| リンカー| 一般| 追加のライブラリディレクトリ設定」で行えます。
C++のDLL関数をエクスポート宣言する
ここで、DLL関数がエクスポートされたことを示すマクロを定義します。
[crayon-67405ae380ed5176307283/]次に、C++オブジェクトをキャッシュするためにIndexAllocatorクラスを実装します。このクラスはポインターの配列を格納します。Allocate”、”Release”、”Get “の3つの関数があり、ポインタをキャッシュに格納、キャッシュを解放、そしてインデックスでポインタを取得する役割を持っています。
[crayon-67405ae380edd069321923/]次にIndexAllocatorオブジェクトの割り当てと解放を行うために、Initialize関数とFinalize関数が必要です。
[crayon-67405ae380edf540005546/]そしてCppClassクラスのインスタンスを作成し、この関数でキャッシュに格納します。
[crayon-67405ae380ee1311154810/]上記のコードでは、extern指定子で”C”を宣言し、呼び出し規約としてWINAPIマクロ(__stdcall)を使用しています。DestroyCppClassも同様です。次に、主要なエクスポート関数である「CppClass_setValue」と「CppClass_getSquare」を見てみましょう。ユーザーがこれらの関数を呼び出すと、キャッシュからオブジェクトを取得し、これらの関数を呼び出して値を取得しています。
[crayon-67405ae380ee3609026019/] [crayon-67405ae380ee4247511263/]上記で示す1つ目の関数では、オブジェクトのインデックスを取得して、変数の値を設定します。2つ目の関数では、オブジェクトのインデックスを取得し、オブジェクトの “getSquare “関数を呼び出して、その値をvalue変数に格納しています。
C++ プロキシDLLをDelphiアプリケーションで使用するには？
DLLをリンクさせるには、静的あるいは動的にリンクさせる方法があります。静的ロードでは、アプリケーションの起動時にDLLがロードされます。動的ロードでは、”LoadLibrary “を呼び出すまでDLLはロードされません。この例では、静的ロードを使用してみましょう。 以下のコードは、DLLにエクスポートされた関数を宣言しています。
[crayon-67405ae380ee8581480050/]Delphiのアプリケーションが作成されたときに “Initialize”関数を呼び出し、アプリケーションが破棄されたときに “Finalize”関数を呼び出す必要があります。そして、DelphiのコードでProxy DLLを使用する際には、最初に”CreateCppClass”を呼び出してオブジェクトを作成する必要があります。これにより、今後使用するクラスIDが設定されます。その後、DLLのすべての関数を呼び出すことができます。そして最後にクラスのインスタンスを破棄する場合には “DestroyCppClass “関数を呼び出す必要があります。コード例は、以下の通りです。
[crayon-67405ae380eea099663378/]最終的に、Delphiのアプリケーションは以下のように動作します。
