object MainForm: TMainForm Left = 417 Height = 240 Top = 298 Width = 320 Caption = 'MainForm' ClientHeight = 240 ClientWidth = 320 OnCreate = FormCreate LCLVersion = '2.0.12.0' object rgPeople: TRadioGroup Left = 16 Height = 185 Top = 16 Width = 281 AutoFill = True Caption = 'Chose a TPerson Instance' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 166 ClientWidth = 271 Items.Strings = ( 'David Beckham' 'William Shakespeare' 'Mae West' 'Blaise Pascal' ) OnClick = rgPeopleClick TabOrder = 0 end end