VCL フォームに ActiveX ボタンを作成する

提供: RAD Studio
移動先: 案内検索

VCL フォーム アプリケーションの作成方法 への移動


Delphi コントロールと同様に、ActiveX コントロールのコンポーネントを IDE でフォームなどの論理コンテナに配置すると、プログラム コードが生成されます。 ActiveX コントロールと Delphi コントロールの主な相違は、ActiveX コントロールは言語に依存しないことです。 たとえば、ActiveX コントロールを作成して、Delphi や C++Builder だけでなく、Windows 上のさまざまなプログラミング環境に配置することができます。

この手順では、VCL フォームの ActiveX ウィザードを使用して ActiveX コントロールを作成します。 コントロールをテストする場合は、IDE でコントロールを VCL コンポーネントとしてコンピュータにインストールできます。 コントロールをインストールするには、まず、コントロールのパッケージを作成する必要があります。 主な手順は次のとおりです。


VCL フォームに ActiveX ボタンを作成する手順:

  1. ActiveX ボタン コントロールのための ActiveX ライブラリ プロジェクトを作成します。
  2. ツールバーにアイコンが表示されるように ActiveX ボタンを登録します。
  3. ActiveX ボタンのためのパッケージを作成します。
  4. パッケージをインストールします。
  5. ActiveX ボタンをテストします。


ActiveX ボタン コントロールのための ActiveX ライブラリ プロジェクトを作成するには:

  1. ローカル ドライブに ActiveX プロジェクトのディレクトリを作成します。 そのディレクトリに簡単に見つけられる名前を付けます(たとえば、ActiveX)。
  2. [ファイル|新規作成|その他...]をクリックして、[新規作成]ダイアログで [ActiveX]ページを選択します。
  3. [ActiveX]フォルダで、ActiveX ライブラリをダブルクリックします。 これにより、インプロセス ActiveX オブジェクトのホストとして使用できる DLL(ダイナミック リンク ライブラリ)プロジェクトが作成されます。
  4. [ファイル|新規作成|その他...]を再度選択します。
  5. [ActiveX]フォルダで、[ActiveX コントロール]をダブルクリックします。 [ActiveX コントロール ウィザード]が表示されます。
  6. [コンポーネント名]ドロップダウンで、[TButton]を選択します。
  7. デフォルトでは、[CoClass 名]に「ButtonX」と表示されます。 ActiveX ボタンに表示する名前を入力します(たとえば、MyActiveXButton)。

    メモ: 変更した名前が、実装ユニット名とプロジェクト名に反映されます。 残りのフィールドはデフォルト値のままにします。

  8. [OK] をクリックします。 ウィザードにより、ActiveX コントロールの実装に必要なコードが生成され、プロジェクトに追加されます。 プロジェクトが既に ActiveX ライブラリである場合は、現在のプロジェクトにコントロールが追加されます。

    メモ: プロジェクトがまだ ActiveX ライブラリではない場合は、警告 ダイアログが表示され、新しい ActiveX ライブラリ プロジェクトを開始するかどうかを確認されます。

  9. [OK]をクリックして、新しい ActiveX ライブラリ プロジェクトを開始します。

ActiveX ボタンを登録するには:

  1. プロジェクトをビルドして、すべてのファイルを ActiveX プロジェクト ディレクトリに保存します。 デバッグに関する警告は無視します。 プロジェクトがビルドされ、プロジェクト ディレクトリに OCX ファイルが作成されます。
  2. [実行|ActiveX サーバーの登録]を選択して、ActiveX ボタンを登録します。 ダイアログ ボックスに、登録が成功したことを示すメッセージと生成された OCX ファイルのパスが表示されます。
  3. [OK] をクリックします。

ActiveX ボタンのための新しいパッケージを作成するには:

  1. 新しいパッケージを作成するには、[ファイル|新規作成|その他...]を選択します。 [新規作成]ダイアログが表示されます。
  2. [Delphi プロジェクト](または、[C++Buileder プロジェクト])フォルダで[パッケージ]をダブルクリックして、[パッケージ - package.dpk]ダイアログを表示し、[追加]をクリックします。
  3. [追加]ダイアログの[ユニットの追加]タブで、プロジェクト ディレクトリを参照します。
  4. ButtonXControl1_TLB.pas ファイルを選択して、[開く]をクリックします。
  5. [OK]をクリックしてファイルをパッケージに追加し、[パッケージ - package.dpk]ダイアログに戻ります。 [パッケージ - package.dpk]ダイアログに、パッケージ内のファイルと必要な 2 つのファイルが表示されます。 (rtl.dcp と vcl.dcp)

必要なファイルを追加して、パッケージをインストールするには:

  1. [パッケージ - package.dpk]ダイアログで、rtl.dcp を選択して[追加]をクリックします。
  2. [追加]ダイアログの[ユニットの追加]タブで、Delphi の Lib ディレクトリを参照して、rtl.dcp ファイルを選択します。[開く]をクリックします。次に、[追加]ダイアログで[OK]をクリックします。
  3. [パッケージ - package.dpk]ダイアログで、vcl.dcp を選択して[追加]をクリックします。
  4. [追加]ダイアログの[ユニットの追加]タブで、Delphi の Lib ディレクトリを参照して、vcl.dcp ファイルを選択します。[開く]をクリックします。次に、[追加]ダイアログで[OK]をクリックします。
  5. パッケージ - package.dpk ダイアログで、コンパイル をクリックしてパッケージをコンパイルします。 パッケージがインストールされたことを示すダイアログが表示されます。 [OK] をクリックします。
  6. [パッケージ - package.dpk]ダイアログの右上隅にある[X]をクリックして、ダイアログを閉じます。 パッケージを保存するように求めるメッセージが表示されます。
  7. パッケージをプロジェクト ディレクトリに保存します。

ボタンをテストするには:

  1. [ファイル|新規作成]からアプリケーションを作成します。
  2. [ツール パレット][ActiveX]カテゴリで、作成したボタンを探してフォームに配置します。 ボタンがフォームに表示されます。

関連項目