From 4d3c959a7b0f8144539d18d066ae171c8fbd2820 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sun, 22 Nov 2009 16:29:10 +0000
Subject: [PATCH] examples: pen, bursh: fixed caption and size

git-svn-id: trunk@22705 -
---
 examples/pen_brush/project1.lpi |  11 +-
 examples/pen_brush/unit1.lfm    | 725 ++++----------------------------
 examples/pen_brush/unit1.lrs    | 424 ++++++-------------
 3 files changed, 212 insertions(+), 948 deletions(-)

diff --git a/examples/pen_brush/project1.lpi b/examples/pen_brush/project1.lpi
index da895abed2..6cec71a574 100644
--- a/examples/pen_brush/project1.lpi
+++ b/examples/pen_brush/project1.lpi
@@ -2,10 +2,12 @@
 <CONFIG>
   <ProjectOptions>
     <PathDelim Value="\"/>
-    <Version Value="6"/>
+    <Version Value="7"/>
     <General>
+      <Flags>
+        <LRSInOutputDirectory Value="False"/>
+      </Flags>
       <MainUnit Value="0"/>
-      <IconPath Value="./"/>
       <TargetFileExt Value=".exe"/>
       <ActiveEditorIndexAtStart Value="0"/>
     </General>
@@ -23,7 +25,7 @@
     <RunParams>
       <local>
         <FormatVersion Value="1"/>
-        <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
+        <LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
       </local>
     </RunParams>
     <RequiredPackages Count="1">
@@ -40,10 +42,9 @@
       </Unit0>
       <Unit1>
         <Filename Value="unit1.pas"/>
-        <ComponentName Value="Form1"/>
         <IsPartOfProject Value="True"/>
+        <ComponentName Value="Form1"/>
         <ResourceBaseClass Value="Form"/>
-        <ResourceFilename Value="unit1.lrs"/>
         <UnitName Value="Unit1"/>
         <CursorPos X="43" Y="79"/>
         <TopLine Value="49"/>
diff --git a/examples/pen_brush/unit1.lfm b/examples/pen_brush/unit1.lfm
index 206364267b..f180ab842a 100644
--- a/examples/pen_brush/unit1.lfm
+++ b/examples/pen_brush/unit1.lfm
@@ -1,39 +1,17 @@
 object Form1: TForm1
   Left = 350
-  Height = 492
+  Height = 573
   Top = 215
-  Width = 440
-  HelpContext = 0
-  Align = alNone
-  AllowDropFiles = False
+  Width = 471
   AutoScroll = True
   AutoSize = True
-  BorderIcons = [biSystemMenu, biMinimize, biMaximize]
-  BorderStyle = bsSizeable
   Caption = 'Pen and Brush'
-  ChildSizing.LeftRightSpacing = 0
-  ChildSizing.TopBottomSpacing = 0
-  ChildSizing.HorizontalSpacing = 0
-  ChildSizing.VerticalSpacing = 0
-  ChildSizing.ControlsPerLine = 0
-  ClientHeight = 492
-  ClientWidth = 440
-  DockSite = False
-  DragKind = dkDrag
-  DragMode = dmManual
-  Enabled = True
-  Font.Height = 0
-  Font.Style = []
-  FormStyle = fsNormal
+  ClientHeight = 573
+  ClientWidth = 471
   OnCreate = FormCreate
   OnDestroy = FormDestroy
-  ParentBiDiMode = True
-  ParentFont = False
   Position = poScreenCenter
-  ShowInTaskBar = stDefault
-  UseDockManager = False
-  LCLVersion = '0.9.27'
-  WindowState = wsNormal
+  LCLVersion = '0.9.29'
   object PaintBox: TPaintBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Owner
@@ -42,24 +20,11 @@ object Form1: TForm1
     Left = 11
     Height = 169
     Top = 7
-    Width = 418
-    HelpContext = 0
-    Align = alNone
+    Width = 449
     Anchors = [akTop, akLeft, akRight]
     BorderSpacing.Left = 11
     BorderSpacing.Top = 7
     BorderSpacing.Right = 11
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    ParentColor = True
-    ParentFont = True
-    ParentShowHint = True
-    Visible = True
     OnPaint = PaintBoxPaint
   end
   object Label3: TLabel
@@ -67,136 +32,48 @@ object Form1: TForm1
     AnchorSideTop.Control = WidthCombo
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 263
-    Width = 33
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 290
+    Width = 40
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Width:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label4: TLabel
     AnchorSideLeft.Control = Label1
     AnchorSideTop.Control = CapsCombo
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 320
-    Width = 50
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 366
+    Width = 65
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'End Caps:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label5: TLabel
     AnchorSideLeft.Control = Label1
     AnchorSideTop.Control = JoinCombo
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 348
-    Width = 51
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 404
+    Width = 63
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Join Style:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label6: TLabel
     AnchorSideLeft.Control = Label1
     AnchorSideTop.Control = PenColorBox
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 292
-    Width = 30
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 328
+    Width = 38
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Color:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Bevel1: TBevel
     AnchorSideLeft.Control = Label1
@@ -205,89 +82,39 @@ object Form1: TForm1
     AnchorSideTop.Side = asrCenter
     AnchorSideRight.Control = Owner
     AnchorSideRight.Side = asrBottom
-    Left = 82
+    Left = 101
     Height = 3
-    Top = 217
-    Width = 347
-    HelpContext = 0
-    Align = alNone
+    Top = 229
+    Width = 359
     Anchors = [akTop, akLeft, akRight]
     BorderSpacing.Left = 10
-    BorderSpacing.Top = 0
     BorderSpacing.Right = 11
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    Visible = True
   end
   object Label1: TLabel
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = FigureCombo
     AnchorSideTop.Side = asrBottom
     Left = 11
-    Height = 14
-    Top = 211
-    Width = 61
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 221
+    Width = 80
     BorderSpacing.Left = 11
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Pen options:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label2: TLabel
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = JoinCombo
     AnchorSideTop.Side = asrBottom
     Left = 11
-    Height = 14
-    Top = 373
-    Width = 70
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 436
+    Width = 93
     BorderSpacing.Left = 11
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Brush options:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Bevel2: TBevel
     AnchorSideLeft.Control = Bevel1
@@ -295,157 +122,60 @@ object Form1: TForm1
     AnchorSideTop.Side = asrCenter
     AnchorSideRight.Control = Owner
     AnchorSideRight.Side = asrBottom
-    Left = 82
+    Left = 101
     Height = 3
-    Top = 379
-    Width = 347
-    HelpContext = 0
-    Align = alNone
+    Top = 444
+    Width = 359
     Anchors = [akTop, akLeft, akRight]
-    BorderSpacing.Left = 0
-    BorderSpacing.Top = 0
     BorderSpacing.Right = 11
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    Visible = True
   end
   object Label7: TLabel
     AnchorSideLeft.Control = Label1
     AnchorSideTop.Control = PenStyleCombo
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 235
-    Width = 29
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 252
+    Width = 37
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Style:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label8: TLabel
     AnchorSideLeft.Control = Label2
     AnchorSideTop.Control = BrushStyleCombo
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 397
-    Width = 29
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 467
+    Width = 37
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Style:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label9: TLabel
     AnchorSideLeft.Control = Label1
     AnchorSideTop.Control = BrushColorBox
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 426
-    Width = 30
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 505
+    Width = 38
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Color:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Label10: TLabel
     AnchorSideLeft.Control = Label1
     AnchorSideTop.Control = FigureCombo
     AnchorSideTop.Side = asrCenter
     Left = 18
-    Height = 14
-    Top = 186
-    Width = 35
-    HelpContext = 0
-    Align = alNone
-    Alignment = taLeftJustify
-    AutoSize = True
+    Height = 18
+    Top = 189
+    Width = 43
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Figure:'
-    DragCursor = crDrag
-    DragMode = dmManual
-    Enabled = True
-    Layout = tlTop
-    ParentBidiMode = True
     ParentColor = False
-    ParentFont = True
-    ParentShowHint = True
-    ShowAccelChar = True
-    Transparent = True
-    Visible = True
-    WordWrap = False
-    OptimalFill = False
   end
   object Button1: TBitBtn
     AnchorSideTop.Control = BrushColorBox
@@ -454,68 +184,31 @@ object Form1: TForm1
     AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
-    Left = 340
-    Height = 26
-    Top = 455
-    Width = 89
-    HelpContext = 0
-    Align = alNone
+    Left = 394
+    Height = 29
+    Top = 541
+    Width = 66
     Anchors = [akTop, akRight]
     AutoSize = True
-    BorderSpacing.Left = 0
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
     BorderSpacing.Around = 11
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    Cancel = False
-    Caption = '&Закрыть'
-    Default = False
-    Enabled = True
+    Caption = 'Close'
     Kind = bkClose
-    Layout = blGlyphLeft
-    Margin = -1
-    ModalResult = 0
     NumGlyphs = 0
     OnClick = Button1Click
-    ParentFont = True
-    ParentShowHint = True
-    Spacing = 3
     TabOrder = 0
-    TabStop = True
-    Visible = True
   end
   object WidthCombo: TComboBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = PenStyleCombo
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 21
-    Top = 260
-    Width = 110
-    HelpContext = 0
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
+    Height = 31
+    Top = 284
+    Width = 140
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    CharCase = ecNormal
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
-    ItemHeight = 13
+    ItemHeight = 0
     ItemIndex = 0
     Items.Strings = (
       '1'
@@ -526,331 +219,134 @@ object Form1: TForm1
       '6'
       '7'
     )
-    ItemWidth = 0
-    MaxLength = 0
     OnChange = PenChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
-    Sorted = False
     Style = csDropDownList
     TabOrder = 1
-    TabStop = True
     Text = '1'
-    Visible = True
   end
   object CapsCombo: TComboBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = PenColorBox
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 21
-    Top = 317
-    Width = 110
-    HelpContext = 0
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
+    Height = 31
+    Top = 360
+    Width = 140
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    CharCase = ecNormal
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
-    ItemHeight = 13
+    ItemHeight = 0
     ItemIndex = 0
     Items.Strings = (
       'Round'
       'Square'
       'Flat'
     )
-    ItemWidth = 0
-    MaxLength = 0
     OnChange = PenChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
-    Sorted = False
     Style = csDropDownList
     TabOrder = 2
-    TabStop = True
     Text = 'Round'
-    Visible = True
   end
   object JoinCombo: TComboBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = CapsCombo
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 21
-    Top = 345
-    Width = 110
-    HelpContext = 0
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
+    Height = 31
+    Top = 398
+    Width = 140
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    CharCase = ecNormal
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
-    ItemHeight = 13
+    ItemHeight = 0
     ItemIndex = 0
     Items.Strings = (
       'Round'
       'Bevel'
       'Mitter'
     )
-    ItemWidth = 0
-    MaxLength = 0
     OnChange = PenChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
-    Sorted = False
     Style = csDropDownList
     TabOrder = 3
-    TabStop = True
     Text = 'Round'
-    Visible = True
   end
   object PenColorBox: TColorBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = WidthCombo
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 22
-    Top = 288
-    Width = 110
-    HelpContext = 0
-    DefaultColorColor = clBlack
-    NoneColorColor = clBlack
-    Selected = clBlack
+    Height = 31
+    Top = 322
+    Width = 140
     Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
     ItemHeight = 16
-    ItemWidth = 0
     OnChange = PenChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
     TabOrder = 4
-    TabStop = True
-    Visible = True
   end
   object PenStyleCombo: TComboBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Label1
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 21
-    Top = 232
-    Width = 110
-    HelpContext = 0
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
+    Height = 31
+    Top = 246
+    Width = 140
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    CharCase = ecNormal
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
-    ItemHeight = 13
-    ItemIndex = -1
-    ItemWidth = 0
-    MaxLength = 0
+    ItemHeight = 0
     OnChange = PenChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
-    Sorted = False
     Style = csDropDownList
     TabOrder = 5
-    TabStop = True
-    Visible = True
   end
   object BrushStyleCombo: TComboBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Label2
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 21
-    Top = 394
-    Width = 110
-    HelpContext = 0
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
+    Height = 31
+    Top = 461
+    Width = 140
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    CharCase = ecNormal
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
-    ItemHeight = 13
-    ItemIndex = -1
-    ItemWidth = 0
-    MaxLength = 0
+    ItemHeight = 0
     OnChange = BrushChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
-    Sorted = False
     Style = csDropDownList
     TabOrder = 6
-    TabStop = True
-    Visible = True
   end
   object BrushColorBox: TColorBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = BrushStyleCombo
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 22
-    Top = 422
-    Width = 110
-    HelpContext = 0
-    DefaultColorColor = clBlack
-    NoneColorColor = clBlack
+    Height = 31
+    Top = 499
+    Width = 140
     Selected = clBtnFace
     Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
     ItemHeight = 16
-    ItemWidth = 0
     OnChange = BrushChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
     TabOrder = 7
-    TabStop = True
-    Visible = True
   end
   object FigureCombo: TComboBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = PaintBox
     AnchorSideTop.Side = asrBottom
     Left = 100
-    Height = 21
+    Height = 31
     Top = 183
-    Width = 110
-    HelpContext = 0
-    Align = alNone
-    ArrowKeysTraverseList = True
-    AutoComplete = False
-    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    AutoDropDown = False
+    Width = 140
     AutoSelect = False
-    AutoSize = True
     BorderSpacing.Left = 100
     BorderSpacing.Top = 7
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
-    CharCase = ecNormal
-    Ctl3D = False
-    DragCursor = crDrag
-    DragMode = dmManual
-    DropDownCount = 8
-    Enabled = True
-    ItemHeight = 13
+    ItemHeight = 0
     ItemIndex = 0
     Items.Strings = (
       'Line'
@@ -859,93 +355,40 @@ object Form1: TForm1
       'Rectangle'
       'Triangle'
     )
-    ItemWidth = 0
-    MaxLength = 0
     OnChange = FigureComboChange
-    ParentBidiMode = True
-    ParentColor = False
-    ParentCtl3D = True
-    ParentFont = True
-    ParentShowHint = True
-    Sorted = False
     Style = csDropDownList
     TabOrder = 8
-    TabStop = True
     Text = 'Line'
-    Visible = True
   end
   object cbCosmetic: TCheckBox
     AnchorSideLeft.Control = WidthCombo
     AnchorSideLeft.Side = asrBottom
     AnchorSideTop.Control = WidthCombo
     AnchorSideTop.Side = asrCenter
-    Left = 217
-    Height = 19
-    Top = 261
-    Width = 69
-    HelpContext = 0
-    Align = alNone
-    AllowGrayed = False
-    AutoSize = True
+    Left = 247
+    Height = 22
+    Top = 288
+    Width = 84
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Cosmetic'
     Checked = True
-    DragCursor = crDrag
-    DragKind = dkDrag
-    DragMode = dmManual
-    Enabled = True
     OnChange = PenChange
-    ParentColor = True
-    ParentFont = True
-    ParentShowHint = True
-    ParentBidiMode = True
     State = cbChecked
     TabOrder = 9
-    TabStop = True
-    UseOnChange = False
-    Visible = True
   end
   object cbAntialiasing: TCheckBox
     AnchorSideLeft.Control = FigureCombo
     AnchorSideLeft.Side = asrBottom
     AnchorSideTop.Control = FigureCombo
     AnchorSideTop.Side = asrCenter
-    Left = 217
-    Height = 19
-    Top = 184
-    Width = 80
-    HelpContext = 0
-    Align = alNone
+    Left = 247
+    Height = 22
+    Top = 187
+    Width = 97
     AllowGrayed = True
-    AutoSize = True
     BorderSpacing.Left = 7
-    BorderSpacing.Top = 0
-    BorderSpacing.Right = 0
-    BorderSpacing.Bottom = 0
-    BorderSpacing.Around = 0
-    BorderSpacing.CellAlignHorizontal = ccaFill
-    BorderSpacing.CellAlignVertical = ccaFill
     Caption = 'Antialiasing'
-    Checked = False
-    DragCursor = crDrag
-    DragKind = dkDrag
-    DragMode = dmManual
-    Enabled = True
     OnChange = cbAntialiasingChange
-    ParentColor = True
-    ParentFont = True
-    ParentShowHint = True
-    ParentBidiMode = True
-    State = cbUnchecked
     TabOrder = 10
-    TabStop = True
-    UseOnChange = False
-    Visible = True
   end
 end
diff --git a/examples/pen_brush/unit1.lrs b/examples/pen_brush/unit1.lrs
index 69ffa827ac..2122ba8345 100644
--- a/examples/pen_brush/unit1.lrs
+++ b/examples/pen_brush/unit1.lrs
@@ -1,306 +1,126 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('TForm1','FORMDATA',[
-  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'^'#1#6'Height'#3#236#1#3'Top'#3#215#0#5'W'
-  +'idth'#3#184#1#11'HelpContext'#2#0#5'Align'#7#6'alNone'#14'AllowDropFiles'#8
-  +#10'AutoScroll'#9#8'AutoSize'#9#11'BorderIcons'#11#12'biSystemMenu'#10'biMin'
-  +'imize'#10'biMaximize'#0#11'BorderStyle'#7#10'bsSizeable'#7'Caption'#6#13'Pe'
-  +'n and Brush'#28'ChildSizing.LeftRightSpacing'#2#0#28'ChildSizing.TopBottomS'
-  +'pacing'#2#0#29'ChildSizing.HorizontalSpacing'#2#0#27'ChildSizing.VerticalSp'
-  +'acing'#2#0#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHeight'#3#236#1#11
-  +'ClientWidth'#3#184#1#8'DockSite'#8#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8
-  +'dmManual'#7'Enabled'#9#11'Font.Height'#2#0#10'Font.Style'#11#0#9'FormStyle'
-  +#7#8'fsNormal'#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#14
-  +'ParentBiDiMode'#9#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'#13'Show'
-  +'InTaskBar'#7#9'stDefault'#14'UseDockManager'#8#10'LCLVersion'#6#6'0.9.27'#11
-  +'WindowState'#7#8'wsNormal'#0#9'TPaintBox'#8'PaintBox'#22'AnchorSideLeft.Con'
-  +'trol'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight.Co'
-  +'ntrol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2#11#6'He'
-  +'ight'#3#169#0#3'Top'#2#7#5'Width'#3#162#1#11'HelpContext'#2#0#5'Align'#7#6
-  +'alNone'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'
-  +#2#11#17'BorderSpacing.Top'#2#7#19'BorderSpacing.Right'#2#11#20'BorderSpacin'
-  +'g.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizont'
-  +'al'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#10'DragCu'
-  +'rsor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'ParentColor'#9
-  +#10'ParentFont'#9#14'ParentShowHint'#9#7'Visible'#9#7'OnPaint'#7#13'PaintBox'
-  +'Paint'#0#0#6'TLabel'#6'Label3'#22'AnchorSideLeft.Control'#7#6'Label1'#21'An'
-  +'chorSideTop.Control'#7#10'WidthCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'
-  +#4'Left'#2#18#6'Height'#2#14#3'Top'#3#7#1#5'Width'#2'!'#11'HelpContext'#2#0#5
-  +'Align'#7#6'alNone'#9'Alignment'#7#13'taLeftJustify'#8'AutoSize'#9#18'Border'
-  +'Spacing.Left'#2#7#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20
-  +'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellA'
-  +'lignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFil'
-  +'l'#7'Caption'#6#6'Width:'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManu'
-  +'al'#7'Enabled'#9#6'Layout'#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentColor'#8
-  +#10'ParentFont'#9#14'ParentShowHint'#9#13'ShowAccelChar'#9#11'Transparent'#9
-  +#7'Visible'#9#8'WordWrap'#8#11'OptimalFill'#8#0#0#6'TLabel'#6'Label4'#22'Anc'
-  +'horSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7#9'CapsCombo'#18
-  +'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#14#3'Top'#3'@'#1
-  +#5'Width'#2'2'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#9'Alignment'#7#13'ta'
-  +'LeftJustify'#8'AutoSize'#9#18'BorderSpacing.Left'#2#7#17'BorderSpacing.Top'
-  +#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpaci'
-  +'ng.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSp'
-  +'acing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#9'End Caps:'#10'DragCurs'
-  +'or'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#6'Layout'#7#5'tlTop'
-  +#14'ParentBidiMode'#9#11'ParentColor'#8#10'ParentFont'#9#14'ParentShowHint'#9
-  +#13'ShowAccelChar'#9#11'Transparent'#9#7'Visible'#9#8'WordWrap'#8#11'Optimal'
-  +'Fill'#8#0#0#6'TLabel'#6'Label5'#22'AnchorSideLeft.Control'#7#6'Label1'#21'A'
-  +'nchorSideTop.Control'#7#9'JoinCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4
-  +'Left'#2#18#6'Height'#2#14#3'Top'#3'\'#1#5'Width'#2'3'#11'HelpContext'#2#0#5
-  +'Align'#7#6'alNone'#9'Alignment'#7#13'taLeftJustify'#8'AutoSize'#9#18'Border'
-  +'Spacing.Left'#2#7#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20
-  +'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellA'
-  +'lignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFil'
-  +'l'#7'Caption'#6#11'Join Style:'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8
-  +'dmManual'#7'Enabled'#9#6'Layout'#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentC'
-  +'olor'#8#10'ParentFont'#9#14'ParentShowHint'#9#13'ShowAccelChar'#9#11'Transp'
-  +'arent'#9#7'Visible'#9#8'WordWrap'#8#11'OptimalFill'#8#0#0#6'TLabel'#6'Label'
-  +'6'#22'AnchorSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7#11'Pe'
-  +'nColorBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#14
-  +#3'Top'#3'$'#1#5'Width'#2#30#11'HelpContext'#2#0#5'Align'#7#6'alNone'#9'Alig'
-  +'nment'#7#13'taLeftJustify'#8'AutoSize'#9#18'BorderSpacing.Left'#2#7#17'Bord'
-  +'erSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0
-  +#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFil'
-  +'l'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#6'Color:'
-  +#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#6'Layout'
-  +#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentColor'#8#10'ParentFont'#9#14'Paren'
-  +'tShowHint'#9#13'ShowAccelChar'#9#11'Transparent'#9#7'Visible'#9#8'WordWrap'
-  ,#8#11'OptimalFill'#8#0#0#6'TBevel'#6'Bevel1'#22'AnchorSideLeft.Control'#7#6
-  +'Label1'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#6
-  +'Label1'#18'AnchorSideTop.Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7
-  +#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2'R'#6'Height'#2#3
-  +#3'Top'#3#217#0#5'Width'#3'['#1#11'HelpContext'#2#0#5'Align'#7#6'alNone'#7'A'
-  +'nchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#10#17'B'
-  +'orderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#11#20'BorderSpacing.Bottom'
-  +#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'cc'
-  +'aFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Visible'#9#0#0#6
-  +'TLabel'#6'Label1'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Co'
-  +'ntrol'#7#11'FigureCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#11
-  +#6'Height'#2#14#3'Top'#3#211#0#5'Width'#2'='#11'HelpContext'#2#0#5'Align'#7#6
-  +'alNone'#9'Alignment'#7#13'taLeftJustify'#8'AutoSize'#9#18'BorderSpacing.Lef'
-  +'t'#2#11#17'BorderSpacing.Top'#2#7#19'BorderSpacing.Right'#2#0#20'BorderSpac'
-  +'ing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizo'
-  +'ntal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Capti'
-  +'on'#6#12'Pen options:'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'
-  +#7'Enabled'#9#6'Layout'#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentColor'#8#10
-  +'ParentFont'#9#14'ParentShowHint'#9#13'ShowAccelChar'#9#11'Transparent'#9#7
-  +'Visible'#9#8'WordWrap'#8#11'OptimalFill'#8#0#0#6'TLabel'#6'Label2'#22'Ancho'
-  +'rSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#9'JoinCombo'#18'A'
-  +'nchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#11#6'Height'#2#14#3'Top'#3'u'#1
-  +#5'Width'#2'F'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#9'Alignment'#7#13'ta'
-  +'LeftJustify'#8'AutoSize'#9#18'BorderSpacing.Left'#2#11#17'BorderSpacing.Top'
-  +#2#7#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpaci'
-  +'ng.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSp'
-  +'acing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#14'Brush options:'#10'Dr'
-  +'agCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#6'Layout'#7#5
-  +'tlTop'#14'ParentBidiMode'#9#11'ParentColor'#8#10'ParentFont'#9#14'ParentSho'
-  +'wHint'#9#13'ShowAccelChar'#9#11'Transparent'#9#7'Visible'#9#8'WordWrap'#8#11
-  +'OptimalFill'#8#0#0#6'TBevel'#6'Bevel2'#22'AnchorSideLeft.Control'#7#6'Bevel'
-  +'1'#21'AnchorSideTop.Control'#7#6'Label2'#18'AnchorSideTop.Side'#7#9'asrCent'
-  +'er'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asr'
-  +'Bottom'#4'Left'#2'R'#6'Height'#2#3#3'Top'#3'{'#1#5'Width'#3'['#1#11'HelpCon'
-  +'text'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
-  +#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'
-  +#2#11#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpaci'
-  +'ng.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7
-  +'ccaFill'#7'Visible'#9#0#0#6'TLabel'#6'Label7'#22'AnchorSideLeft.Control'#7#6
-  +'Label1'#21'AnchorSideTop.Control'#7#13'PenStyleCombo'#18'AnchorSideTop.Side'
-  +#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#14#3'Top'#3#235#0#5'Width'#2#29#11
-  +'HelpContext'#2#0#5'Align'#7#6'alNone'#9'Alignment'#7#13'taLeftJustify'#8'Au'
-  +'toSize'#9#18'BorderSpacing.Left'#2#7#17'BorderSpacing.Top'#2#0#19'BorderSpa'
-  +'cing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!'
-  +'BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignV'
-  +'ertical'#7#7'ccaFill'#7'Caption'#6#6'Style:'#10'DragCursor'#7#6'crDrag'#8'D'
-  +'ragMode'#7#8'dmManual'#7'Enabled'#9#6'Layout'#7#5'tlTop'#14'ParentBidiMode'
-  +#9#11'ParentColor'#8#10'ParentFont'#9#14'ParentShowHint'#9#13'ShowAccelChar'
-  +#9#11'Transparent'#9#7'Visible'#9#8'WordWrap'#8#11'OptimalFill'#8#0#0#6'TLab'
-  +'el'#6'Label8'#22'AnchorSideLeft.Control'#7#6'Label2'#21'AnchorSideTop.Contr'
-  +'ol'#7#15'BrushStyleCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18
-  +#6'Height'#2#14#3'Top'#3#141#1#5'Width'#2#29#11'HelpContext'#2#0#5'Align'#7#6
-  +'alNone'#9'Alignment'#7#13'taLeftJustify'#8'AutoSize'#9#18'BorderSpacing.Lef'
-  +'t'#2#7#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpaci'
-  +'ng.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizon'
-  +'tal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Captio'
-  +'n'#6#6'Style:'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabl'
-  +'ed'#9#6'Layout'#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentColor'#8#10'Parent'
-  +'Font'#9#14'ParentShowHint'#9#13'ShowAccelChar'#9#11'Transparent'#9#7'Visibl'
-  +'e'#9#8'WordWrap'#8#11'OptimalFill'#8#0#0#6'TLabel'#6'Label9'#22'AnchorSideL'
-  +'eft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7#13'BrushColorBox'#18'A'
-  +'nchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#14#3'Top'#3#170#1
-  +#5'Width'#2#30#11'HelpContext'#2#0#5'Align'#7#6'alNone'#9'Alignment'#7#13'ta'
-  +'LeftJustify'#8'AutoSize'#9#18'BorderSpacing.Left'#2#7#17'BorderSpacing.Top'
-  ,#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpaci'
-  +'ng.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSp'
-  +'acing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#6'Color:'#10'DragCursor'
-  +#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#6'Layout'#7#5'tlTop'#14
-  +'ParentBidiMode'#9#11'ParentColor'#8#10'ParentFont'#9#14'ParentShowHint'#9#13
-  +'ShowAccelChar'#9#11'Transparent'#9#7'Visible'#9#8'WordWrap'#8#11'OptimalFil'
-  +'l'#8#0#0#6'TLabel'#7'Label10'#22'AnchorSideLeft.Control'#7#6'Label1'#21'Anc'
-  +'horSideTop.Control'#7#11'FigureCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'
-  +#4'Left'#2#18#6'Height'#2#14#3'Top'#3#186#0#5'Width'#2'#'#11'HelpContext'#2#0
-  +#5'Align'#7#6'alNone'#9'Alignment'#7#13'taLeftJustify'#8'AutoSize'#9#18'Bord'
-  +'erSpacing.Left'#2#7#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20
-  +'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellA'
-  +'lignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFil'
-  +'l'#7'Caption'#6#7'Figure:'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmMan'
-  +'ual'#7'Enabled'#9#6'Layout'#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentColor'
-  +#8#10'ParentFont'#9#14'ParentShowHint'#9#13'ShowAccelChar'#9#11'Transparent'
-  +#9#7'Visible'#9#8'WordWrap'#8#11'OptimalFill'#8#0#0#7'TBitBtn'#7'Button1'#21
-  +'AnchorSideTop.Control'#7#13'BrushColorBox'#18'AnchorSideTop.Side'#7#9'asrBo'
-  +'ttom'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'a'
-  +'srBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'
-  +#7#9'asrBottom'#4'Left'#3'T'#1#6'Height'#2#26#3'Top'#3#199#1#5'Width'#2'Y'#11
-  +'HelpContext'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#7'akRight'#0#8
-  +'AutoSize'#9#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderS'
-  +'pacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#11
-  +'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlign'
-  +'Vertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6#15'&'#208#151#208#176#208
-  +#186#209#128#209#139#209#130#209#140#7'Default'#8#7'Enabled'#9#4'Kind'#7#7'b'
-  +'kClose'#6'Layout'#7#11'blGlyphLeft'#6'Margin'#2#255#11'ModalResult'#2#0#9'N'
-  +'umGlyphs'#2#0#7'OnClick'#7#12'Button1Click'#10'ParentFont'#9#14'ParentShowH'
-  +'int'#9#7'Spacing'#2#3#8'TabOrder'#2#0#7'TabStop'#9#7'Visible'#9#0#0#9'TComb'
-  +'oBox'#10'WidthCombo'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop'
-  +'.Control'#7#13'PenStyleCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'
-  +#2'd'#6'Height'#2#21#3'Top'#3#4#1#5'Width'#2'n'#11'HelpContext'#2#0#5'Align'
-  +#7#6'alNone'#21'ArrowKeysTraverseList'#9#12'AutoComplete'#8#16'AutoCompleteT'
-  +'ext'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#12'AutoDropDo'
-  +'wn'#8#10'AutoSelect'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2'd'#17'BorderS'
-  +'pacing.Top'#2#7#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20
-  +'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'
-  +#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#8'CharCase'#7#8'ecNormal'#5
-  +'Ctl3D'#8#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#13'DropDownCo'
-  +'unt'#2#8#7'Enabled'#9#10'ItemHeight'#2#13#9'ItemIndex'#2#0#13'Items.Strings'
-  +#1#6#1'1'#6#1'2'#6#1'3'#6#1'4'#6#1'5'#6#1'6'#6#1'7'#0#9'ItemWidth'#2#0#9'Max'
-  +'Length'#2#0#8'OnChange'#7#9'PenChange'#14'ParentBidiMode'#9#11'ParentColor'
-  +#8#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#6'Sorted'#8#5'Sty'
-  +'le'#7#14'csDropDownList'#8'TabOrder'#2#1#7'TabStop'#9#4'Text'#6#1'1'#7'Visi'
-  +'ble'#9#0#0#9'TComboBox'#9'CapsCombo'#22'AnchorSideLeft.Control'#7#5'Owner'
-  +#21'AnchorSideTop.Control'#7#11'PenColorBox'#18'AnchorSideTop.Side'#7#9'asrB'
-  +'ottom'#4'Left'#2'd'#6'Height'#2#21#3'Top'#3'='#1#5'Width'#2'n'#11'HelpConte'
-  +'xt'#2#0#5'Align'#7#6'alNone'#21'ArrowKeysTraverseList'#9#12'AutoComplete'#8
-  +#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'
-  +#0#12'AutoDropDown'#8#10'AutoSelect'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2
-  +'d'#17'BorderSpacing.Top'#2#7#19'BorderSpacing.Right'#2#0#20'BorderSpacing.B'
-  +'ottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'
-  +#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#8'CharCase'#7
-  +#8'ecNormal'#5'Ctl3D'#8#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'
-  +#13'DropDownCount'#2#8#7'Enabled'#9#10'ItemHeight'#2#13#9'ItemIndex'#2#0#13
-  +'Items.Strings'#1#6#5'Round'#6#6'Square'#6#4'Flat'#0#9'ItemWidth'#2#0#9'MaxL'
-  +'ength'#2#0#8'OnChange'#7#9'PenChange'#14'ParentBidiMode'#9#11'ParentColor'#8
-  +#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#6'Sorted'#8#5'Style'
-  +#7#14'csDropDownList'#8'TabOrder'#2#2#7'TabStop'#9#4'Text'#6#5'Round'#7'Visi'
-  +'ble'#9#0#0#9'TComboBox'#9'JoinCombo'#22'AnchorSideLeft.Control'#7#5'Owner'
-  +#21'AnchorSideTop.Control'#7#9'CapsCombo'#18'AnchorSideTop.Side'#7#9'asrBott'
-  +'om'#4'Left'#2'd'#6'Height'#2#21#3'Top'#3'Y'#1#5'Width'#2'n'#11'HelpContext'
-  +#2#0#5'Align'#7#6'alNone'#21'ArrowKeysTraverseList'#9#12'AutoComplete'#8#16
-  ,'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0
-  +#12'AutoDropDown'#8#10'AutoSelect'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2
-  +'d'#17'BorderSpacing.Top'#2#7#19'BorderSpacing.Right'#2#0#20'BorderSpacing.B'
-  +'ottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'
-  +#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#8'CharCase'#7
-  +#8'ecNormal'#5'Ctl3D'#8#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'
-  +#13'DropDownCount'#2#8#7'Enabled'#9#10'ItemHeight'#2#13#9'ItemIndex'#2#0#13
-  +'Items.Strings'#1#6#5'Round'#6#5'Bevel'#6#6'Mitter'#0#9'ItemWidth'#2#0#9'Max'
-  +'Length'#2#0#8'OnChange'#7#9'PenChange'#14'ParentBidiMode'#9#11'ParentColor'
-  +#8#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#6'Sorted'#8#5'Sty'
-  +'le'#7#14'csDropDownList'#8'TabOrder'#2#3#7'TabStop'#9#4'Text'#6#5'Round'#7
-  +'Visible'#9#0#0#9'TColorBox'#11'PenColorBox'#22'AnchorSideLeft.Control'#7#5
-  +'Owner'#21'AnchorSideTop.Control'#7#10'WidthCombo'#18'AnchorSideTop.Side'#7#9
-  +'asrBottom'#4'Left'#2'd'#6'Height'#2#22#3'Top'#3' '#1#5'Width'#2'n'#11'HelpC'
-  +'ontext'#2#0#17'DefaultColorColor'#7#7'clBlack'#14'NoneColorColor'#7#7'clBla'
-  +'ck'#8'Selected'#7#7'clBlack'#5'Style'#11#16'cbStandardColors'#16'cbExtended'
-  +'Colors'#14'cbSystemColors'#13'cbCustomColor'#13'cbPrettyNames'#0#5'Align'#7
-  +#6'alNone'#21'ArrowKeysTraverseList'#9#12'AutoComplete'#8#16'AutoCompleteTex'
-  +'t'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#12'AutoDropDown'
-  +#8#10'AutoSelect'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2'd'#17'BorderSpaci'
-  +'ng.Top'#2#7#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'Bor'
-  +'derSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31
-  +'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#5'Ctl3D'#8#10'DragCursor'#7#6
-  +'crDrag'#8'DragMode'#7#8'dmManual'#13'DropDownCount'#2#8#7'Enabled'#9#10'Ite'
-  +'mHeight'#2#16#9'ItemWidth'#2#0#8'OnChange'#7#9'PenChange'#14'ParentBidiMode'
-  +#9#11'ParentColor'#8#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9
-  +#8'TabOrder'#2#4#7'TabStop'#9#7'Visible'#9#0#0#9'TComboBox'#13'PenStyleCombo'
-  +#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#6'Label1'
-  +#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#21#3'Top'#3
-  +#232#0#5'Width'#2'n'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#21'ArrowKeysTr'
-  +'averseList'#9#12'AutoComplete'#8#16'AutoCompleteText'#11#22'cbactEndOfLineC'
-  +'omplete'#20'cbactSearchAscending'#0#12'AutoDropDown'#8#10'AutoSelect'#8#8'A'
-  +'utoSize'#9#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7#19'BorderS'
-  +'pacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0
-  +'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlign'
-  +'Vertical'#7#7'ccaFill'#8'CharCase'#7#8'ecNormal'#5'Ctl3D'#8#10'DragCursor'#7
-  +#6'crDrag'#8'DragMode'#7#8'dmManual'#13'DropDownCount'#2#8#7'Enabled'#9#10'I'
-  +'temHeight'#2#13#9'ItemIndex'#2#255#9'ItemWidth'#2#0#9'MaxLength'#2#0#8'OnCh'
-  +'ange'#7#9'PenChange'#14'ParentBidiMode'#9#11'ParentColor'#8#11'ParentCtl3D'
-  +#9#10'ParentFont'#9#14'ParentShowHint'#9#6'Sorted'#8#5'Style'#7#14'csDropDow'
-  +'nList'#8'TabOrder'#2#5#7'TabStop'#9#7'Visible'#9#0#0#9'TComboBox'#15'BrushS'
-  +'tyleCombo'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7
-  +#6'Label2'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#21
-  +#3'Top'#3#138#1#5'Width'#2'n'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#21'Ar'
-  +'rowKeysTraverseList'#9#12'AutoComplete'#8#16'AutoCompleteText'#11#22'cbactE'
-  +'ndOfLineComplete'#20'cbactSearchAscending'#0#12'AutoDropDown'#8#10'AutoSele'
-  +'ct'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7#19
-  +'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Arou'
-  +'nd'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.C'
-  +'ellAlignVertical'#7#7'ccaFill'#8'CharCase'#7#8'ecNormal'#5'Ctl3D'#8#10'Drag'
-  +'Cursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#13'DropDownCount'#2#8#7'Enabl'
-  +'ed'#9#10'ItemHeight'#2#13#9'ItemIndex'#2#255#9'ItemWidth'#2#0#9'MaxLength'#2
-  +#0#8'OnChange'#7#11'BrushChange'#14'ParentBidiMode'#9#11'ParentColor'#8#11'P'
-  +'arentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#6'Sorted'#8#5'Style'#7
-  +#14'csDropDownList'#8'TabOrder'#2#6#7'TabStop'#9#7'Visible'#9#0#0#9'TColorBo'
-  +'x'#13'BrushColorBox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop'
-  +'.Control'#7#15'BrushStyleCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Lef'
-  +'t'#2'd'#6'Height'#2#22#3'Top'#3#166#1#5'Width'#2'n'#11'HelpContext'#2#0#17
-  +'DefaultColorColor'#7#7'clBlack'#14'NoneColorColor'#7#7'clBlack'#8'Selected'
-  +#7#9'clBtnFace'#5'Style'#11#16'cbStandardColors'#16'cbExtendedColors'#14'cbS'
-  +'ystemColors'#13'cbCustomColor'#13'cbPrettyNames'#0#5'Align'#7#6'alNone'#21
-  +'ArrowKeysTraverseList'#9#12'AutoComplete'#8#16'AutoCompleteText'#11#22'cbac'
-  +'tEndOfLineComplete'#20'cbactSearchAscending'#0#12'AutoDropDown'#8#10'AutoSe'
-  +'lect'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7
-  ,#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.A'
-  +'round'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacin'
-  +'g.CellAlignVertical'#7#7'ccaFill'#5'Ctl3D'#8#10'DragCursor'#7#6'crDrag'#8'D'
-  +'ragMode'#7#8'dmManual'#13'DropDownCount'#2#8#7'Enabled'#9#10'ItemHeight'#2
-  +#16#9'ItemWidth'#2#0#8'OnChange'#7#11'BrushChange'#14'ParentBidiMode'#9#11'P'
-  +'arentColor'#8#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#8'Tab'
-  +'Order'#2#7#7'TabStop'#9#7'Visible'#9#0#0#9'TComboBox'#11'FigureCombo'#22'An'
-  +'chorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#8'PaintBox'#18
-  +'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#21#3'Top'#3#183
-  +#0#5'Width'#2'n'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#21'ArrowKeysTraver'
-  +'seList'#9#12'AutoComplete'#8#16'AutoCompleteText'#11#22'cbactEndOfLineCompl'
-  +'ete'#20'cbactSearchAscending'#0#12'AutoDropDown'#8#10'AutoSelect'#8#8'AutoS'
-  +'ize'#9#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7#19'BorderSpaci'
-  +'ng.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!Bo'
-  +'rderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVer'
-  +'tical'#7#7'ccaFill'#8'CharCase'#7#8'ecNormal'#5'Ctl3D'#8#10'DragCursor'#7#6
-  +'crDrag'#8'DragMode'#7#8'dmManual'#13'DropDownCount'#2#8#7'Enabled'#9#10'Ite'
-  +'mHeight'#2#13#9'ItemIndex'#2#0#13'Items.Strings'#1#6#4'Line'#6#8'PolyLine'#6
-  +#7'Ellipse'#6#9'Rectangle'#6#8'Triangle'#0#9'ItemWidth'#2#0#9'MaxLength'#2#0
-  +#8'OnChange'#7#17'FigureComboChange'#14'ParentBidiMode'#9#11'ParentColor'#8
-  +#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#6'Sorted'#8#5'Style'
-  +#7#14'csDropDownList'#8'TabOrder'#2#8#7'TabStop'#9#4'Text'#6#4'Line'#7'Visib'
-  +'le'#9#0#0#9'TCheckBox'#10'cbCosmetic'#22'AnchorSideLeft.Control'#7#10'Width'
-  +'Combo'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#10
-  +'WidthCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#3#217#0#6'Height'
-  +#2#19#3'Top'#3#5#1#5'Width'#2'E'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#11
-  +'AllowGrayed'#8#8'AutoSize'#9#18'BorderSpacing.Left'#2#7#17'BorderSpacing.To'
-  +'p'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSp'
-  +'acing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'Borde'
-  +'rSpacing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#8'Cosmetic'#7'Checked'
-  +#9#10'DragCursor'#7#6'crDrag'#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManu'
-  +'al'#7'Enabled'#9#8'OnChange'#7#9'PenChange'#11'ParentColor'#9#10'ParentFont'
-  +#9#14'ParentShowHint'#9#14'ParentBidiMode'#9#5'State'#7#9'cbChecked'#8'TabOr'
-  +'der'#2#9#7'TabStop'#9#11'UseOnChange'#8#7'Visible'#9#0#0#9'TCheckBox'#14'cb'
-  +'Antialiasing'#22'AnchorSideLeft.Control'#7#11'FigureCombo'#19'AnchorSideLef'
-  +'t.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#11'FigureCombo'#18'Ancho'
-  +'rSideTop.Side'#7#9'asrCenter'#4'Left'#3#217#0#6'Height'#2#19#3'Top'#3#184#0
-  +#5'Width'#2'P'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#11'AllowGrayed'#9#8
-  +'AutoSize'#9#18'BorderSpacing.Left'#2#7#17'BorderSpacing.Top'#2#0#19'BorderS'
-  +'pacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0
-  +'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlign'
-  +'Vertical'#7#7'ccaFill'#7'Caption'#6#12'Antialiasing'#7'Checked'#8#10'DragCu'
-  +'rsor'#7#6'crDrag'#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabl'
-  +'ed'#9#8'OnChange'#7#20'cbAntialiasingChange'#11'ParentColor'#9#10'ParentFon'
-  +'t'#9#14'ParentShowHint'#9#14'ParentBidiMode'#9#5'State'#7#11'cbUnchecked'#8
-  +'TabOrder'#2#10#7'TabStop'#9#11'UseOnChange'#8#7'Visible'#9#0#0#0
+  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'^'#1#6'Height'#3'='#2#3'Top'#3#215#0#5'Wi'
+  +'dth'#3#215#1#10'AutoScroll'#9#8'AutoSize'#9#7'Caption'#6#13'Pen and Brush'
+  +#12'ClientHeight'#3'='#2#11'ClientWidth'#3#215#1#8'OnCreate'#7#10'FormCreate'
+  +#9'OnDestroy'#7#11'FormDestroy'#8'Position'#7#14'poScreenCenter'#10'LCLVersi'
+  +'on'#6#6'0.9.29'#0#9'TPaintBox'#8'PaintBox'#22'AnchorSideLeft.Control'#7#5'O'
+  +'wner'#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight.Control'#7#5
+  +'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2#11#6'Height'#3#169
+  +#0#3'Top'#2#7#5'Width'#3#193#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+  +#18'BorderSpacing.Left'#2#11#17'BorderSpacing.Top'#2#7#19'BorderSpacing.Righ'
+  +'t'#2#11#7'OnPaint'#7#13'PaintBoxPaint'#0#0#6'TLabel'#6'Label3'#22'AnchorSid'
+  +'eLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7#10'WidthCombo'#18'An'
+  +'chorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#18#3'Top'#3'"'#1#5
+  +'Width'#2'('#18'BorderSpacing.Left'#2#7#7'Caption'#6#6'Width:'#11'ParentColo'
+  +'r'#8#0#0#6'TLabel'#6'Label4'#22'AnchorSideLeft.Control'#7#6'Label1'#21'Anch'
+  +'orSideTop.Control'#7#9'CapsCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'L'
+  +'eft'#2#18#6'Height'#2#18#3'Top'#3'n'#1#5'Width'#2'A'#18'BorderSpacing.Left'
+  +#2#7#7'Caption'#6#9'End Caps:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label5'#22
+  +'AnchorSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7#9'JoinCombo'
+  +#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#18#3'Top'#3
+  +#148#1#5'Width'#2'?'#18'BorderSpacing.Left'#2#7#7'Caption'#6#11'Join Style:'
+  +#11'ParentColor'#8#0#0#6'TLabel'#6'Label6'#22'AnchorSideLeft.Control'#7#6'La'
+  +'bel1'#21'AnchorSideTop.Control'#7#11'PenColorBox'#18'AnchorSideTop.Side'#7#9
+  +'asrCenter'#4'Left'#2#18#6'Height'#2#18#3'Top'#3'H'#1#5'Width'#2'&'#18'Borde'
+  +'rSpacing.Left'#2#7#7'Caption'#6#6'Color:'#11'ParentColor'#8#0#0#6'TBevel'#6
+  +'Bevel1'#22'AnchorSideLeft.Control'#7#6'Label1'#19'AnchorSideLeft.Side'#7#9
+  +'asrBottom'#21'AnchorSideTop.Control'#7#6'Label1'#18'AnchorSideTop.Side'#7#9
+  +'asrCenter'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7
+  +#9'asrBottom'#4'Left'#2'e'#6'Height'#2#3#3'Top'#3#229#0#5'Width'#3'g'#1#7'An'
+  +'chors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#10#19'Bo'
+  +'rderSpacing.Right'#2#11#0#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'#7
+  +#5'Owner'#21'AnchorSideTop.Control'#7#11'FigureCombo'#18'AnchorSideTop.Side'
+  +#7#9'asrBottom'#4'Left'#2#11#6'Height'#2#18#3'Top'#3#221#0#5'Width'#2'P'#18
+  +'BorderSpacing.Left'#2#11#17'BorderSpacing.Top'#2#7#7'Caption'#6#12'Pen opti'
+  +'ons:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label2'#22'AnchorSideLeft.Control'#7
+  +#5'Owner'#21'AnchorSideTop.Control'#7#9'JoinCombo'#18'AnchorSideTop.Side'#7#9
+  +'asrBottom'#4'Left'#2#11#6'Height'#2#18#3'Top'#3#180#1#5'Width'#2']'#18'Bord'
+  +'erSpacing.Left'#2#11#17'BorderSpacing.Top'#2#7#7'Caption'#6#14'Brush option'
+  +'s:'#11'ParentColor'#8#0#0#6'TBevel'#6'Bevel2'#22'AnchorSideLeft.Control'#7#6
+  +'Bevel1'#21'AnchorSideTop.Control'#7#6'Label2'#18'AnchorSideTop.Side'#7#9'as'
+  +'rCenter'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9
+  +'asrBottom'#4'Left'#2'e'#6'Height'#2#3#3'Top'#3#188#1#5'Width'#3'g'#1#7'Anch'
+  +'ors'#11#5'akTop'#6'akLeft'#7'akRight'#0#19'BorderSpacing.Right'#2#11#0#0#6
+  +'TLabel'#6'Label7'#22'AnchorSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.C'
+  +'ontrol'#7#13'PenStyleCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2
+  +#18#6'Height'#2#18#3'Top'#3#252#0#5'Width'#2'%'#18'BorderSpacing.Left'#2#7#7
+  +'Caption'#6#6'Style:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label8'#22'AnchorSid'
+  +'eLeft.Control'#7#6'Label2'#21'AnchorSideTop.Control'#7#15'BrushStyleCombo'
+  +#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'#2#18#3'Top'#3
+  +#211#1#5'Width'#2'%'#18'BorderSpacing.Left'#2#7#7'Caption'#6#6'Style:'#11'Pa'
+  +'rentColor'#8#0#0#6'TLabel'#6'Label9'#22'AnchorSideLeft.Control'#7#6'Label1'
+  +#21'AnchorSideTop.Control'#7#13'BrushColorBox'#18'AnchorSideTop.Side'#7#9'as'
+  +'rCenter'#4'Left'#2#18#6'Height'#2#18#3'Top'#3#249#1#5'Width'#2'&'#18'Border'
+  +'Spacing.Left'#2#7#7'Caption'#6#6'Color:'#11'ParentColor'#8#0#0#6'TLabel'#7
+  +'Label10'#22'AnchorSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7
+  +#11'FigureCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#18#6'Height'
+  +#2#18#3'Top'#3#189#0#5'Width'#2'+'#18'BorderSpacing.Left'#2#7#7'Caption'#6#7
+  +'Figure:'#11'ParentColor'#8#0#0#7'TBitBtn'#7'Button1'#21'AnchorSideTop.Contr'
+  +'ol'#7#13'BrushColorBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSide'
+  +'Right.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'Anchor'
+  +'SideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'L'
+  +'eft'#3#138#1#6'Height'#2#29#3'Top'#3#29#2#5'Width'#2'B'#7'Anchors'#11#5'akT'
+  +'op'#7'akRight'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#11#7'Caption'#6#5
+  +'Close'#4'Kind'#7#7'bkClose'#9'NumGlyphs'#2#0#7'OnClick'#7#12'Button1Click'#8
+  +'TabOrder'#2#0#0#0#9'TComboBox'#10'WidthCombo'#22'AnchorSideLeft.Control'#7#5
+  ,'Owner'#21'AnchorSideTop.Control'#7#13'PenStyleCombo'#18'AnchorSideTop.Side'
+  +#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#31#3'Top'#3#28#1#5'Width'#3#140#0#10
+  +'AutoSelect'#8#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7#10'Item'
+  +'Height'#2#0#9'ItemIndex'#2#0#13'Items.Strings'#1#6#1'1'#6#1'2'#6#1'3'#6#1'4'
+  +#6#1'5'#6#1'6'#6#1'7'#0#8'OnChange'#7#9'PenChange'#5'Style'#7#14'csDropDownL'
+  +'ist'#8'TabOrder'#2#1#4'Text'#6#1'1'#0#0#9'TComboBox'#9'CapsCombo'#22'Anchor'
+  +'SideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#11'PenColorBox'#18
+  +'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#31#3'Top'#3'h'#1
+  +#5'Width'#3#140#0#10'AutoSelect'#8#18'BorderSpacing.Left'#2'd'#17'BorderSpac'
+  +'ing.Top'#2#7#10'ItemHeight'#2#0#9'ItemIndex'#2#0#13'Items.Strings'#1#6#5'Ro'
+  +'und'#6#6'Square'#6#4'Flat'#0#8'OnChange'#7#9'PenChange'#5'Style'#7#14'csDro'
+  +'pDownList'#8'TabOrder'#2#2#4'Text'#6#5'Round'#0#0#9'TComboBox'#9'JoinCombo'
+  +#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#9'CapsCom'
+  +'bo'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#31#3'Top'
+  +#3#142#1#5'Width'#3#140#0#10'AutoSelect'#8#18'BorderSpacing.Left'#2'd'#17'Bo'
+  +'rderSpacing.Top'#2#7#10'ItemHeight'#2#0#9'ItemIndex'#2#0#13'Items.Strings'#1
+  +#6#5'Round'#6#5'Bevel'#6#6'Mitter'#0#8'OnChange'#7#9'PenChange'#5'Style'#7#14
+  +'csDropDownList'#8'TabOrder'#2#3#4'Text'#6#5'Round'#0#0#9'TColorBox'#11'PenC'
+  +'olorBox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7
+  +#10'WidthCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'
+  +#2#31#3'Top'#3'B'#1#5'Width'#3#140#0#5'Style'#11#16'cbStandardColors'#16'cbE'
+  +'xtendedColors'#14'cbSystemColors'#13'cbCustomColor'#13'cbPrettyNames'#0#10
+  +'AutoSelect'#8#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7#10'Item'
+  +'Height'#2#16#8'OnChange'#7#9'PenChange'#8'TabOrder'#2#4#0#0#9'TComboBox'#13
+  +'PenStyleCombo'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Contr'
+  +'ol'#7#6'Label1'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'
+  +#2#31#3'Top'#3#246#0#5'Width'#3#140#0#10'AutoSelect'#8#18'BorderSpacing.Left'
+  +#2'd'#17'BorderSpacing.Top'#2#7#10'ItemHeight'#2#0#8'OnChange'#7#9'PenChange'
+  +#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#5#0#0#9'TComboBox'#15'BrushStyl'
+  +'eCombo'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#6
+  +'Label2'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'#2#31#3
+  +'Top'#3#205#1#5'Width'#3#140#0#10'AutoSelect'#8#18'BorderSpacing.Left'#2'd'
+  +#17'BorderSpacing.Top'#2#7#10'ItemHeight'#2#0#8'OnChange'#7#11'BrushChange'#5
+  +'Style'#7#14'csDropDownList'#8'TabOrder'#2#6#0#0#9'TColorBox'#13'BrushColorB'
+  +'ox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#15'Br'
+  +'ushStyleCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'd'#6'Height'
+  +#2#31#3'Top'#3#243#1#5'Width'#3#140#0#8'Selected'#7#9'clBtnFace'#5'Style'#11
+  +#16'cbStandardColors'#16'cbExtendedColors'#14'cbSystemColors'#13'cbCustomCol'
+  +'or'#13'cbPrettyNames'#0#10'AutoSelect'#8#18'BorderSpacing.Left'#2'd'#17'Bor'
+  +'derSpacing.Top'#2#7#10'ItemHeight'#2#16#8'OnChange'#7#11'BrushChange'#8'Tab'
+  +'Order'#2#7#0#0#9'TComboBox'#11'FigureCombo'#22'AnchorSideLeft.Control'#7#5
+  +'Owner'#21'AnchorSideTop.Control'#7#8'PaintBox'#18'AnchorSideTop.Side'#7#9'a'
+  +'srBottom'#4'Left'#2'd'#6'Height'#2#31#3'Top'#3#183#0#5'Width'#3#140#0#10'Au'
+  +'toSelect'#8#18'BorderSpacing.Left'#2'd'#17'BorderSpacing.Top'#2#7#10'ItemHe'
+  +'ight'#2#0#9'ItemIndex'#2#0#13'Items.Strings'#1#6#4'Line'#6#8'PolyLine'#6#7
+  +'Ellipse'#6#9'Rectangle'#6#8'Triangle'#0#8'OnChange'#7#17'FigureComboChange'
+  +#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#8#4'Text'#6#4'Line'#0#0#9'TChec'
+  +'kBox'#10'cbCosmetic'#22'AnchorSideLeft.Control'#7#10'WidthCombo'#19'AnchorS'
+  +'ideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#10'WidthCombo'#18
+  +'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#3#247#0#6'Height'#2#22#3'Top'#3
+  +' '#1#5'Width'#2'T'#18'BorderSpacing.Left'#2#7#7'Caption'#6#8'Cosmetic'#7'Ch'
+  +'ecked'#9#8'OnChange'#7#9'PenChange'#5'State'#7#9'cbChecked'#8'TabOrder'#2#9
+  +#0#0#9'TCheckBox'#14'cbAntialiasing'#22'AnchorSideLeft.Control'#7#11'FigureC'
+  +'ombo'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#11
+  +'FigureCombo'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#3#247#0#6'Height'
+  +#2#22#3'Top'#3#187#0#5'Width'#2'a'#11'AllowGrayed'#9#18'BorderSpacing.Left'#2
+  +#7#7'Caption'#6#12'Antialiasing'#8'OnChange'#7#20'cbAntialiasingChange'#8'Ta'
+  +'bOrder'#2#10#0#0#0
 ]);