lazarus/examples/pen_brush/unit1.lfm

object Form1: TForm1
  Left = 350
  Height = 492
  Top = 215
  Width = 440
  HelpContext = 0
  Align = alNone
  AllowDropFiles = False
  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
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  ParentBiDiMode = True
  ParentFont = False
  Position = poScreenCenter
  ShowInTaskBar = stDefault
  UseDockManager = False
  LCLVersion = '0.9.27'
  WindowState = wsNormal
  object PaintBox: TPaintBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 11
    Height = 169
    Top = 7
    Width = 418
    HelpContext = 0
    Align = alNone
    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
    AnchorSideLeft.Control = Label1
    AnchorSideTop.Control = WidthCombo
    AnchorSideTop.Side = asrCenter
    Left = 18
    Height = 14
    Top = 263
    Width = 33
    HelpContext = 0
    Align = alNone
    Alignment = taLeftJustify
    AutoSize = True
    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
    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
    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
    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
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Label1
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 82
    Height = 3
    Top = 217
    Width = 347
    HelpContext = 0
    Align = alNone
    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
    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
    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
    AnchorSideTop.Control = Label2
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 82
    Height = 3
    Top = 379
    Width = 347
    HelpContext = 0
    Align = alNone
    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
    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
    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
    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
    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
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 340
    Height = 26
    Top = 455
    Width = 89
    HelpContext = 0
    Align = alNone
    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
    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
    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 = 0
    Items.Strings = (
      '1'
      '2'
      '3'
      '4'
      '5'
      '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
    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 = 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
    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 = 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
    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
    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
    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
    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
    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
    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
    Top = 183
    Width = 110
    HelpContext = 0
    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
    CharCase = ecNormal
    Ctl3D = False
    DragCursor = crDrag
    DragMode = dmManual
    DropDownCount = 8
    Enabled = True
    ItemHeight = 13
    ItemIndex = 0
    Items.Strings = (
      'Line'
      'PolyLine'
      'Ellipse'
      '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
    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
    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