object PenDialog: TPenDialog
  Left = 247
  Top = 149
  ActiveControl = CBVisible
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Border Color Editor'
  ClientHeight = 176
  ClientWidth = 213
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object LWidth: TLabel
    Left = 89
    Top = 9
    Width = 66
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = '&Width:'
    FocusControl = SEWidth
  end
  object CBVisible: TCheckBox
    Left = 9
    Top = 8
    Width = 64
    Height = 17
    Caption = '&Visible'
    TabOrder = 0
    OnClick = CBVisibleClick
  end
  object SEWidth: TSpinEdit
    Left = 159
    Top = 4
    Width = 44
    Height = 22
    MaxValue = 100
    MinValue = 1
    TabOrder = 1
    Value = 1
    OnChange = SEWidthChange
  end
  object RGStyle: TRadioGroup
    Left = 5
    Top = 32
    Width = 100
    Height = 137
    Caption = '&Style:'
    Items.Strings = (
      'Solid'
      'Dash'
      'Dot'
      'DashDot'
      'DashDotDot')
    TabOrder = 2
    OnClick = RGStyleClick
  end
  object Button1: TButton
    Left = 122
    Top = 112
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 3
  end
  object GroupBox1: TGroupBox
    Left = 112
    Top = 32
    Width = 94
    Height = 73
    TabOrder = 4
    object SHColor: TShape
      Left = 31
      Top = 45
      Width = 28
      Height = 22
      OnMouseUp = SHColorMouseUp
    end
    object BColor: TButton
      Left = 9
      Top = 13
      Width = 75
      Height = 25
      Caption = '&Color...'
      TabOrder = 0
      OnClick = BColorClick
    end
  end
  object Button3: TButton
    Left = 122
    Top = 143
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 5
    OnClick = Button3Click
  end
end