ステップ 6 - ルック アンド フィールを変更するためのプロパティを追加する

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

FireMonkey のプリミティブ コントロールを作成する への移動

TRegularPolygon コンポーネントを拡張してルック アンド フィールの変更を可能にすることができます。たとえば、背景色を変更できます。

他の FireMonkey プリミティブ コンポーネントには、通常、以下のようなルック アンド フィールに関するプロパティがあります。

  • Fill プロパティ
  • Stroke プロパティ
  • StrokeCap プロパティ
  • StrokeDash プロパティ
  • StrokeJoin プロパティ
  • StrokeThickness プロパティ

これらのプロパティを使用できるよう、published プロパティとして改めて追加します。

TRegularPolygon コンポーネントの interface セクションは次のようになります。

type
  TRegularPolygon = class(TShape)
  private
    { private 宣言 }
    FNumberOfSides: Integer;
    FPath: TPathData;
    procedure SetNumberOfSides(const Value: Integer);
  protected
    { protected 宣言 }
    procedure CreatePath;
    procedure Paint; override;
  public
    { public 宣言 }
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    function PointInObject(X, Y: Single): Boolean; override;
  published
    { published 宣言 }
    property NumberOfSides: Integer read FNumberOfSides write SetNumberOfSides;
    property Fill;
    property Stroke;
    property StrokeCap;
    property StrokeDash;
    property StrokeJoin;
    property StrokeThickness;
  end;

[プロジェクト マネージャ]でパッケージをビルドして、インストールします。TestRegularPolygonUnit に戻ります。これで、新しいコンポーネントのルック アンド フィールを変更するオプションを使用できます。

Resized1727.png

前のステップ