VCL フォームアプリケーションで四角形と楕円を描画する
グラフィックを使用する VCL フォーム アプリケーションの作成方法 への移動
この手順では,VCL フォームに四角形と楕円を描画します。
- VCL フォームを作成する。
- 四角形と楕円を描画する,フォームの OnPaint イベントハンドラを作成する。
- アプリケーションをビルドして実行する。
VCL フォームを作成しイメージを配置する
- [ファイル > 新規作成 > その他]の[Delphi プロジェクト > ]または[C++Builder プロジェクト]を選択し,[VCL フォームアプリケーション]アイコンをダブルクリックします。VCL フォームデザイナが表示されます。
- フォームビューで,必要であればフォームをクリックして,オブジェクトインスペクタに Form1 を表示します。
OnPaint イベントハンドラを作成する
- オブジェクトインスペクタの[イベント]タブで,Form1 OnPaint イベントをダブルクリックします。コードエディタが表示され,TForm1.FormPaint(Delphi)または TForm1::FormPaint(C++)イベントハンドラブロックにカーソルが置かれます。
- 次のイベントハンドラコードを入力します。
Canvas.Rectangle (0, 0, ClientWidth div 2, ClientHeight div 2); Canvas.Ellipse (0, 0, ClientWidth div 2, ClientHeight div 2);
Canvas->Rectangle( 0, 0, ClientWidth / 2, ClientHeight / 2 ); Canvas->Ellipse( 0, 0, ClientWidth / 2, ClientHeight / 2 );
プログラムを実行する
- [実行 > 実行]を選択します。
- アプリケーションが起動し,フォームの左上 4 分の 1 の領域に四角形と楕円が表示されます。