SAP ByDesign のデータ用のシンプルな VCL アプリケーションを構築

Dibyendu Datta
Lead Technology Evangelist

CData ODBC Driver for SAP ByDesign を使用して RAD Studio でSAP ByDesign のデータを表示するシンプルな VCL アプリケーションを構築する方法を説明します。

Embarcadero RAD Studio は、Delphi および C++Builder アプリケーション用の開発環境を提供します。CData ODBC Driver for SAP ByDesign を使用すると、RAD Studio 内からリアルタイムSAP ByDesign のデータにアクセスでき、データをテーブル、ビュー、ストアドプロシージャとして抽象化してSAP ByDesign のデータの取得が可能です。この記事では、SAP ByDesign に接続し、フォームデザイナを使用してシンプルな VCL アプリケーションを作成する方法を説明します。

SAP ByDesign のデータへの接続を作成

まだ設定していない場合は、ODBC DSN（データソース名）で接続プロパティを指定します。これはドライバーインストールの最後のステップです。Microsoft ODBC データソースアドミニストレーターを使用して、ODBC DSN を作成・設定できます。

SAP ByDesign に接続するには、次の接続プロパティを設定します。

Url: SAP ByDesign サイトのURL に設定。例：https://test.sapbydesign.com
User: アカウントのユーザー名に設定。
Password: アカウントのパスワードに設定。
CustomService or AnalyticsService: いずれか一方のみを指定する必要があります。データを取得するカスタムサービスがある場合はCustomService を指定します。アナリティクスサービスのレポートを取得する場合はAnalyticsService を指定します。どちらも指定されていない場合は、'cc_home_analytics.svc' がAnalyticsService プロパティのデフォルトとして使用されます。指定するサービスがわからない場合は、Services ビューをクエリして利用可能なサービスを一覧表示できます。

次に、以下の手順で Data Explorer を使用してSAP ByDesign のデータへの FireDAC 接続を作成します。

新しい VCL フォームアプリケーションで、Data Explorer の FireDAC ノードを展開します。
Data Explorer で ODBC Data Source ノードを右クリックします。
［新しい接続の追加］をクリックします。
接続の名前を入力します。
表示される FireDAC Connection Editor で、DataSource プロパティに SAP ByDesign 用 ODBC DSN の名前を設定します。

SAP ByDesign のデータに接続する VCL アプリケーションを作成

以下の手順に従って、クエリ結果をグリッドに表示するシンプルな VCL アプリケーションからSAP ByDesign のデータへのクエリ実行を開始します。

TFDConnection コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- ConnectionDefName:SAP ByDesign のデータへの FireDAC 接続を選択します。
- Connected: メニューから True を選択し、表示されるダイアログで資格情報を入力します。
TFDQuery コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- Connection: まだ指定されていない場合は、このプロパティを TFDConnection コンポーネントに設定します。
- SQL: SQL プロパティのボタンをクリックしてクエリを入力します。例:
```
SELECT ID, ProductCategoryID FROM [Inventory Balance] WHERE ProductCategoryID = '1234567'
```
- Active: このプロパティを true に設定します。
TDataSource コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- DataSet: このプロパティのメニューで、TFDQuery コンポーネントの名前を選択します。
TDBGrid コントロールをフォームにドロップし、以下のプロパティを設定します。
- DataSource: TDataSource の名前を選択します。
TFDGUIxWaitCursor をフォームにドロップします。これはランタイムエラーを回避するために必要です。