object propertiesForm: TpropertiesForm
  Left = 308
  Height = 285
  Top = 239
  Width = 400
  Caption = 'TLabel properties demo'
  ClientHeight = 285
  ClientWidth = 400
  OnCreate = FormCreate
  LCLVersion = '2.0.12.0'
  object rgAlignment: TRadioGroup
    Left = 0
    Height = 130
    Top = 150
    Width = 125
    AutoFill = True
    Caption = 'Alignment'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 110
    ClientWidth = 121
    ItemIndex = 0
    Items.Strings = (
      'taLeftJustify'
      'taRightJustify'
      'taCenter'
    )
    OnClick = rgAlignmentClick
    TabOrder = 0
  end
  object rgLayout: TRadioGroup
    Left = 137
    Height = 130
    Top = 150
    Width = 125
    AutoFill = True
    Caption = 'Layout'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 110
    ClientWidth = 121
    ItemIndex = 0
    Items.Strings = (
      'tlTop'
      'tlCenter'
      'tlBottom'
    )
    OnClick = rgLayoutClick
    TabOrder = 1
  end
  object cgFontStyle: TCheckGroup
    Left = 274
    Height = 130
    Top = 150
    Width = 125
    AutoFill = True
    Caption = 'Font.Style'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 110
    ClientWidth = 121
    Items.Strings = (
      'fsBold'
      'fsItalic'
      'fsUnderline'
      'fsStrikeout'
    )
    OnItemClick = cgFontStyleItemClick
    TabOrder = 2
    Data = {
      0400000002020202
    }
  end
end
