DSPackのインストール ~Delphiソースコード集
DSPackのダウンロード
DSPackは以下URLからダウンロードできます。[Clone or download]をクリックして、[Download Zip]をクリックすればダウンロードを開始します。
https://github.com/amikey/dspack
![](./img/02/dspack01.jpg)
DSPackファイルの展開
ダウンロードした「dspack-master.zip」ファイルをを右クリックして「すべて展開」をクリックします。ファイルを下のフォルダーに展開する(F:)で、
C:\Users\Public\Documents\Embarcadero\Studio\19.0\lib
を指定して「展開」ボタンをクリックします。
![](./img/02/dspack02.jpg)
DSPackのインストール(以下Delphi10.2を使っています)
Delphiを起動します。「ファイル」⇒「プロジェクトを開く」から、
C:\Users\Public\Documents\Embarcadero\Studio\19.0\lib\dspack-master\packages\DSPackDXE2.groupproj
ファイルを選択して開きます。
![](./img/02/dspack03.jpg)
DSPackDXE2を右クリックし「すべてコンパイル」をクリックします。
![](./img/02/dspack04.jpg)
エラーが表示されるので、OKをクリックします。
![](./img/02/dspack05.jpg)
ソースコードのエラー箇所が表示されますが、エラーはこの行より4つ上の1844行です。
![](./img/02/dspack06.jpg)
1844行目
Event, Param1, Param2: Integer;を以下2行に修正します。
Event: Integer;
Param1, Param2: NativeInt;
![](./img/02/dspack07.jpg)
もう一度DSPackDXE2を右クリックし「すべてコンパイル」をクリックします。
![](./img/02/dspack04.jpg)
エラーにならずコンパイルできるので、OKボタンを押します。
![](./img/02/dspack09.jpg)
DSPackDesign_DXE2.pblを右クリックして「インストール」をクリックします。
![](./img/02/dspack10.jpg)
インストール完了のウィンドウが表示されるのでOKボタンをクリックします。
![](./img/02/dspack11.jpg)
「すべて保存」をクリックします。
![](./img/02/dspack12.jpg)
「ファイル」→「すべて閉じる」をクリックします。
![](./img/02/dspack13.jpg)
「ツール」→「オプション」をクリックします。
![](./img/02/dspack13-2.jpg)
「環境オプション」→「Delphiオプション」→ライブラリをクリックし、ライブラリパスの右にある「・・・」ボタンを押します。
![](./img/02/dspack13-3.jpg)
下部のテキストボックスに
C:\Users\Public\Documents\Embarcadero\Studio\19.0\lib\dspack-master\src\DSPack
を入力して、「追加」ボタンをクリックします。
![](./img/02/dspack13-4.jpg)
ツールパレットの「DSPack」からコントロールを配置できます。
![](./img/02/dspack15.jpg)