object Form1: TForm1 Left = 340 Height = 385 Top = 449 Width = 682 Caption = 'Form1' ClientHeight = 385 ClientWidth = 682 OnCreate = FormCreate OnDestroy = FormDestroy Position = poScreenCenter LCLVersion = '0.9.31' object RG: TRadioGroup Left = 504 Height = 248 Top = 16 Width = 169 Anchors = [akTop, akRight] AutoFill = True Caption = 'Mapping mode' 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 = 230 ClientWidth = 165 ItemIndex = 0 Items.Strings = ( 'ANISOTROPIC' 'ISOTROPIC' 'LOENGLISH' 'HIENGLISH' 'LOMETRIC' 'HIMETRIC' 'TWIPS' 'ANISOTROPIC mirr.' ) OnClick = RGClick TabOrder = 0 end object Label1: TLabel Left = 554 Height = 14 Top = 288 Width = 90 Anchors = [akTop, akRight] Caption = 'Resize the window' ParentColor = False end object Label2: TLabel Left = 554 Height = 14 Top = 307 Width = 88 Anchors = [akTop, akRight] Caption = 'to see differences' ParentColor = False end object PB: TPaintBox Left = 0 Height = 385 Top = 0 Width = 488 Align = alLeft Anchors = [akTop, akLeft, akRight, akBottom] OnPaint = PBPaint end end