unit ShapesForm;

interface

uses
  SysUtils, Types, UITypes, Classes, Variants, FMX_Types, FMX_Controls, FMX_Forms,
  FMX_Dialogs, FMX_Objects;

type
  TfrmShapes = class(TForm)
    Line1: TLine;
    Rectangle1: TRectangle;
    RoundRect1: TRoundRect;
    Ellipse1: TEllipse;
    Circle1: TCircle;
    Arc1: TArc;
    Pie1: TPie;
    Text1: TText;
    Path1: TPath;
    Image1: TImage;
    PaintBox1: TPaintBox;
    CalloutRectangle1: TCalloutRectangle;
    Selection1: TSelection;
    SelectionPoint1: TSelectionPoint;
    Label1: TLabel;
    ImageControl1: TImageControl;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmShapes: TfrmShapes;

implementation

{$R *.lfm}

end.
