object Form1: TForm1
  Left = 627
  Height = 240
  Top = 322
  Width = 320
  Caption = 'Polymorphic drawing example'
  ClientHeight = 240
  ClientWidth = 320
  OnCreate = FormCreate
  LCLVersion = '2.0.12.0'
  object rgShape: TRadioGroup
    Left = 41
    Height = 68
    Top = 141
    Width = 239
    AutoFill = True
    Caption = 'Type of FDrawing'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 49
    ClientWidth = 229
    Items.Strings = (
      'TSquare'
      'TCircle'
    )
    OnClick = rgShapeClick
    TabOrder = 0
  end
end