Freelog 10/Freelog010.iso/BAS/Graphism/GraphPap/gpaperfr.exe/GraphPap.exe/0/RCDATA/TWINMAIN/TWINMAIN.txt

Text File | 2000-03-07 | 89KB | 3,666 lines

object WinMain: TWinMain
  Left = 251
  Top = 37
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Graph paper printer 4.20'
  ClientHeight = 544
  ClientWidth = 754
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PanelDiagram: TPanel
    Left = 425
    Top = 0
    Width = 329
    Height = 334
    TabOrder = 1
    object Shape5: TShape
      Left = 1
      Top = 1
      Width = 327
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label26: TLabel
      Left = 144
      Top = 3
      Width = 40
      Height = 13
      Caption = 'Design'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtKeepPerso: TButton
      Left = 114
      Top = 296
      Width = 100
      Height = 25
      Hint = 'To add the design in personal papers'
      Caption = '&Keep design'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnClick = BtKeepPersoClick
    end
    object BtYesEditPerso: TButton
      Left = 16
      Top = 296
      Width = 145
      Height = 25
      Caption = '&Yes, keep new parameters'
      TabOrder = 1
      TabStop = False
      Visible = False
      OnClick = BtOKCancelEditPersoClick
    end
    object BtNoEditPerso: TButton
      Tag = 1
      Left = 168
      Top = 296
      Width = 145
      Height = 25
      Caption = '&No, reset old parameters'
      TabOrder = 2
      TabStop = False
      Visible = False
      OnClick = BtOKCancelEditPersoClick
    end
  end
  object PanelPol: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 4
    Visible = False
    object GBAngles: TGroupBox
      Left = 169
      Top = 12
      Width = 148
      Height = 60
      Caption = ' Polar scale'
      TabOrder = 1
      object Label18: TLabel
        Left = 7
        Top = 25
        Width = 42
        Height = 13
        Caption = 'Divisions'
      end
      object CBAngle: TComboBox
        Left = 56
        Top = 22
        Width = 83
        Height = 21
        Style = csDropDownList
        DropDownCount = 12
        ItemHeight = 13
        Items.Strings = (
          '5 degrees'
          '6 degrees'
          '9 degrees'
          '10 degrees'
          '15 degrees'
          '30 degrees'
          '45 degrees'
          '60 degrees'
          '90 degrees'
          'Absent')
        TabOrder = 0
        OnChange = RefreshPreview
      end
    end
    object GBIncreasingGrad: TGroupBox
      Left = 170
      Top = 78
      Width = 147
      Height = 59
      Caption = ' Increasing graduations '
      TabOrder = 2
      object RBCenterToOut: TRadioButton
        Left = 20
        Top = 16
        Width = 113
        Height = 17
        Caption = 'Center to outside'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = RefreshPreview
      end
      object RBOutToCenter: TRadioButton
        Tag = 1
        Left = 20
        Top = 36
        Width = 113
        Height = 17
        Caption = 'Outside to center'
        TabOrder = 1
        OnClick = RefreshPreview
      end
    end
    object GroupBox3: TGroupBox
      Left = 8
      Top = 12
      Width = 153
      Height = 125
      Caption = ' Radial scale '
      TabOrder = 0
      object Label16: TLabel
        Left = 4
        Top = 30
        Width = 27
        Height = 13
        Caption = 'Scale'
      end
      object Label17: TLabel
        Left = 4
        Top = 66
        Width = 42
        Height = 13
        Caption = 'Divisions'
      end
      object CBRScale: TComboBox
        Tag = 2
        Left = 50
        Top = 25
        Width = 95
        Height = 21
        Style = csDropDownList
        DropDownCount = 10
        ItemHeight = 13
        TabOrder = 0
        OnChange = CBRadScaleChange
      end
      object CBRDiv: TComboBox
        Tag = 2
        Left = 50
        Top = 63
        Width = 95
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 1
        OnChange = RefreshPreview
      end
      object CBSubdivPol: TCheckBox
        Tag = 1
        Left = 35
        Top = 97
        Width = 83
        Height = 17
        Caption = 'Sub-divisions'
        Checked = True
        State = cbChecked
        TabOrder = 4
        OnClick = CBSubdivClick
      end
      object EditRDiv: TEdit
        Tag = 2
        Left = 50
        Top = 63
        Width = 44
        Height = 21
        MaxLength = 3
        TabOrder = 2
        Text = '10'
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyRDiv: TButton
        Tag = 2
        Left = 102
        Top = 64
        Width = 41
        Height = 21
        Caption = 'Apply'
        TabOrder = 3
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
  end
  object PanelCustom: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 5
    Visible = False
    object Label8: TLabel
      Left = 18
      Top = 38
      Width = 121
      Height = 13
      Caption = 'Space between light lines'
    end
    object Label11: TLabel
      Left = 18
      Top = 64
      Width = 113
      Height = 13
      Caption = 'One medium line  every '
    end
    object Label12: TLabel
      Left = 18
      Top = 90
      Width = 103
      Height = 13
      Caption = 'One heavy line every '
    end
    object Label13: TLabel
      Left = 253
      Top = 66
      Width = 38
      Height = 13
      Caption = 'light line'
    end
    object Label14: TLabel
      Left = 253
      Top = 91
      Width = 55
      Height = 13
      Caption = 'medium line'
    end
    object Label9: TLabel
      Left = 145
      Top = 15
      Width = 35
      Height = 13
      Caption = 'Vertical'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object LblUMeasureSpaceCust: TLabel
      Left = 253
      Top = 38
      Width = 19
      Height = 13
      Caption = 'Unit'
    end
    object Label15: TLabel
      Left = 197
      Top = 15
      Width = 47
      Height = 13
      Caption = 'Horizontal'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Bevel2: TBevel
      Left = 7
      Top = 6
      Width = 312
      Height = 143
      Shape = bsFrame
    end
    object EditXSpace: TEdit
      Tag = 8
      Left = 144
      Top = 34
      Width = 48
      Height = 21
      MaxLength = 8
      TabOrder = 0
      Text = '0.2'
      OnKeyPress = EditDiagramKeyPress
    end
    object EditYSpace: TEdit
      Tag = 9
      Left = 199
      Top = 34
      Width = 48
      Height = 21
      MaxLength = 8
      TabOrder = 3
      Text = '0.3'
      OnKeyPress = EditDiagramKeyPress
    end
    object EditFMedX: TEdit
      Tag = 18
      Left = 144
      Top = 61
      Width = 48
      Height = 21
      MaxLength = 4
      TabOrder = 1
      Text = '2'
      OnKeyPress = EditDiagramKeyPress
    end
    object EditFThickX: TEdit
      Tag = 19
      Left = 144
      Top = 87
      Width = 48
      Height = 21
      MaxLength = 4
      TabOrder = 2
      Text = '2'
      OnKeyPress = EditDiagramKeyPress
    end
    object EditFMedY: TEdit
      Tag = 20
      Left = 199
      Top = 61
      Width = 48
      Height = 21
      MaxLength = 4
      TabOrder = 4
      Text = '4'
      OnKeyPress = EditDiagramKeyPress
    end
    object EditFThickY: TEdit
      Tag = 21
      Left = 199
      Top = 87
      Width = 48
      Height = 21
      MaxLength = 4
      TabOrder = 5
      Text = '2'
      OnKeyPress = EditDiagramKeyPress
    end
    object BtApplyCustom: TButton
      Tag = 8
      Left = 145
      Top = 115
      Width = 103
      Height = 21
      Caption = 'Apply'
      TabOrder = 6
      TabStop = False
      OnClick = BtApplyDiagramClick
    end
  end
  object PanelclGrid: TPanel
    Left = 426
    Top = 212
    Width = 326
    Height = 72
    BevelOuter = bvNone
    TabOrder = 24
    Visible = False
    object GroupBox4: TGroupBox
      Left = 7
      Top = 2
      Width = 312
      Height = 68
      Caption = ' Lines '
      TabOrder = 0
      object LblEpaisseurTrait: TLabel
        Left = 11
        Top = 29
        Width = 28
        Height = 13
        Caption = 'Width'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label23: TLabel
        Left = 11
        Top = 46
        Width = 24
        Height = 13
        Caption = 'Color'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label1: TLabel
        Left = 63
        Top = 11
        Width = 31
        Height = 13
        Caption = 'Heavy'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
      end
      object LblEpBig: TLabel
        Left = 61
        Top = 29
        Width = 30
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '3'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Shape1: TShape
        Left = 67
        Top = 48
        Width = 20
        Height = 10
        Shape = stEllipse
      end
      object Label10: TLabel
        Left = 108
        Top = 11
        Width = 37
        Height = 13
        Caption = 'Medium'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
      end
      object LblEpMiddle: TLabel
        Left = 108
        Top = 29
        Width = 30
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '2'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Shape2: TShape
        Left = 115
        Top = 48
        Width = 20
        Height = 10
        Shape = stEllipse
      end
      object Label21: TLabel
        Left = 156
        Top = 11
        Width = 23
        Height = 13
        Caption = 'Light'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
      end
      object LblEpSmall: TLabel
        Left = 152
        Top = 29
        Width = 30
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '1'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Shape3: TShape
        Left = 158
        Top = 48
        Width = 20
        Height = 10
        Shape = stEllipse
      end
      object PanelclSubdiv: TPanel
        Left = 184
        Top = 9
        Width = 66
        Height = 50
        BevelOuter = bvNone
        TabOrder = 0
        Visible = False
        object Label25: TLabel
          Left = 3
          Top = 1
          Width = 59
          Height = 13
          Caption = 'Subdivisions'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
        end
        object Shape4: TShape
          Left = 23
          Top = 38
          Width = 20
          Height = 10
          Shape = stEllipse
        end
        object PBoxSubdiv: TPaintBox
          Left = 3
          Top = 26
          Width = 59
          Height = 2
          Color = clWhite
          ParentColor = False
          OnPaint = PBoxSubdivPaint
        end
      end
      object BtChangeColorGrid: TButton
        Left = 255
        Top = 23
        Width = 48
        Height = 24
        Hint = 'color and width of lines'
        Caption = 'Ch&ange'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        TabStop = False
        OnClick = BtChangeColorClick
      end
    end
  end
  object PanelPerso: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 271
    BevelOuter = bvNone
    TabOrder = 19
    Visible = False
    object LbPerso: TListBox
      Left = 0
      Top = 0
      Width = 224
      Height = 271
      Align = alLeft
      ItemHeight = 13
      TabOrder = 0
      OnClick = LbPersoClick
      OnDblClick = BtEditPersoClick
      OnKeyDown = LbPersoKeyDown
    end
    object BtDeletePerso: TButton
      Left = 244
      Top = 145
      Width = 66
      Height = 25
      Caption = '&Delete'
      TabOrder = 1
      TabStop = False
      OnClick = BtDeletePersoClick
    end
    object BtEditPerso: TButton
      Left = 244
      Top = 57
      Width = 66
      Height = 25
      Caption = '&Edit'
      TabOrder = 2
      TabStop = False
      OnClick = BtEditPersoClick
    end
    object BtRenamePerso: TButton
      Left = 244
      Top = 101
      Width = 66
      Height = 25
      Caption = '&Rename'
      TabOrder = 3
      TabStop = False
      OnClick = BtRenamePersoClick
    end
    object BtSortPerso: TButton
      Left = 244
      Top = 189
      Width = 66
      Height = 25
      Caption = 'S&ort'
      TabOrder = 4
      TabStop = False
      OnClick = BtSortPersoClick
    end
  end
  object PanelPreview: TPanel
    Left = 0
    Top = 0
    Width = 425
    Height = 409
    BorderWidth = 1
    Caption = 'PanelPreview'
    TabOrder = 30
    object Shape6: TShape
      Left = 2
      Top = 2
      Width = 421
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object LblPreview: TLabel
      Left = 90
      Top = 4
      Width = 246
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object ScrollBox: TScrollBox
      Left = 78
      Top = 65
      Width = 208
      Height = 271
      HorzScrollBar.Tracking = True
      VertScrollBar.Tracking = True
      BorderStyle = bsNone
      Color = clWhite
      ParentColor = False
      TabOrder = 0
      object Feuille: TPanel
        Left = 0
        Top = 0
        Width = 208
        Height = 271
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object PBox: TPaintBox
          Left = 0
          Top = 0
          Width = 208
          Height = 271
          Align = alClient
          Color = clSilver
          ParentColor = False
          OnMouseDown = PBoxMouseDown
          OnMouseMove = PBoxMouseMove
          OnMouseUp = PBoxMouseUp
          OnPaint = PBoxPaint
        end
      end
    end
  end
  object PanelSizePosition: TPanel
    Left = 0
    Top = 409
    Width = 425
    Height = 134
    TabOrder = 0
    object Shape7: TShape
      Left = 1
      Top = 1
      Width = 423
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label27: TLabel
      Left = 192
      Top = 3
      Width = 41
      Height = 13
      Caption = 'Outline'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtCenterV: TButton
      Left = 307
      Top = 31
      Width = 96
      Height = 19
      Hint = 'Diagram in the center of the page'
      Caption = 'Center vertically'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      TabStop = False
      OnClick = BtCenterVClick
    end
    object BtCenterH: TButton
      Left = 307
      Top = 55
      Width = 96
      Height = 19
      Hint = 'Diagram in the center of the page'
      Caption = 'Center horizontally'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      TabStop = False
      OnClick = BtCenterHClick
    end
    object BtFullPaper: TButton
      Left = 307
      Top = 80
      Width = 96
      Height = 19
      Hint = 'No margins'
      Caption = 'Full paper'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      TabStop = False
      OnClick = BtFullPaperClick
    end
    object GBMargins: TGroupBox
      Left = 19
      Top = 25
      Width = 125
      Height = 100
      Caption = ' Margins '
      TabOrder = 0
      object Label28: TLabel
        Left = 16
        Top = 46
        Width = 33
        Height = 13
        Caption = 'Bottom'
        FocusControl = EditBMargin
      end
      object Label29: TLabel
        Left = 16
        Top = 21
        Width = 21
        Height = 13
        Caption = 'Left '
        FocusControl = EditLMargin
      end
      object EditBMargin: TEdit
        Left = 64
        Top = 45
        Width = 49
        Height = 21
        TabOrder = 1
        OnKeyPress = EditFormatKeyPress
      end
      object EditLMargin: TEdit
        Left = 64
        Top = 18
        Width = 49
        Height = 21
        TabOrder = 0
        OnKeyPress = EditFormatKeyPress
      end
      object BtApplyMargins: TBitBtn
        Left = 37
        Top = 73
        Width = 50
        Height = 19
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyMarginsClick
      end
    end
    object BtStdSize: TButton
      Left = 307
      Top = 104
      Width = 96
      Height = 19
      Hint = 'Default margins'
      Caption = 'Standard margins'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 7
      TabStop = False
      OnClick = BtStdSizeClick
    end
    object GBDiametre: TGroupBox
      Tag = 1
      Left = 162
      Top = 25
      Width = 125
      Height = 100
      Caption = '  Size '
      TabOrder = 2
      Visible = False
      object LblDiam: TLabel
        Left = 10
        Top = 35
        Width = 42
        Height = 13
        Caption = 'Diameter'
        FocusControl = EditDiam
      end
      object EditDiam: TEdit
        Tag = 1
        Left = 60
        Top = 32
        Width = 49
        Height = 21
        TabOrder = 0
        OnKeyPress = EditFormatKeyPress
      end
      object BtApplyDiametre: TBitBtn
        Tag = 1
        Left = 37
        Top = 68
        Width = 50
        Height = 19
        Caption = 'Apply'
        TabOrder = 1
        TabStop = False
        OnClick = BtApplyLargHautClick
      end
    end
    object GBCote: TGroupBox
      Tag = 3
      Left = 162
      Top = 25
      Width = 125
      Height = 100
      Caption = '  Size '
      TabOrder = 3
      Visible = False
      object Label33: TLabel
        Left = 5
        Top = 33
        Width = 53
        Height = 13
        Caption = 'Side length'
        FocusControl = EditCote
      end
      object EditCote: TEdit
        Tag = 1
        Left = 64
        Top = 30
        Width = 49
        Height = 21
        TabOrder = 0
        OnKeyPress = EditFormatKeyPress
      end
      object BtApplyCote: TBitBtn
        Tag = 3
        Left = 37
        Top = 65
        Width = 50
        Height = 19
        Caption = 'Apply'
        TabOrder = 1
        TabStop = False
        OnClick = BtApplyLargHautClick
      end
    end
    object GBLargHaut: TGroupBox
      Left = 162
      Top = 25
      Width = 125
      Height = 100
      Caption = ' Size '
      DragKind = dkDock
      TabOrder = 1
      Visible = False
      object LblWidth: TLabel
        Left = 11
        Top = 20
        Width = 28
        Height = 13
        Caption = 'Width'
        FocusControl = EditWidth
      end
      object LblHeight: TLabel
        Left = 11
        Top = 47
        Width = 31
        Height = 13
        Caption = 'Height'
        FocusControl = EditHeight
      end
      object EditWidth: TEdit
        Tag = 1
        Left = 56
        Top = 17
        Width = 49
        Height = 21
        TabOrder = 0
        OnKeyPress = EditFormatKeyPress
      end
      object EditHeight: TEdit
        Tag = 1
        Left = 56
        Top = 44
        Width = 49
        Height = 21
        TabOrder = 1
        OnKeyPress = EditFormatKeyPress
      end
      object BtApplyLargHaut: TBitBtn
        Left = 37
        Top = 73
        Width = 50
        Height = 19
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyLargHautClick
      end
    end
  end
  object PanelGeneral: TPanel
    Left = 425
    Top = 431
    Width = 329
    Height = 112
    TabOrder = 29
    object Shape12: TShape
      Left = 1
      Top = 1
      Width = 327
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label30: TLabel
      Left = 141
      Top = 4
      Width = 45
      Height = 13
      Caption = 'General'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtLoupe: TSpeedButton
      Left = 13
      Top = 34
      Width = 43
      Height = 62
      Hint = 'Enlarge with true colors'
      AllowAllUp = True
      GroupIndex = 2
      Caption = 'Zoom'
      Glyph.Data = {
        76090000424D7609000000000000760000002800000080000000240000000100
        0400000000000009000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF
        F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF
        F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF
        F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF
        F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF
        F808800FFFFFFFFFFFFFFFFFFFFFFFFFF808800FFFFFFFFFFFFFFFFFFFFFFFFF
        F808800FFFFFFFFFFFFFFFFFFFFFFFFFF808800FFFFFFFFFFFFFFFFFFFFFFFFF
        88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF
        88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF
        88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF
        88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF
        88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF
        88808000FFFFFFFFFFFFFFFFFFFFFFFF88808000FFFFFFFFFFFFFFFFFFFFFFFF
        88800000FFFFFFFFFFFFFFFFFFFFFFFF88800000FFFFFFFFFFFFFFFFFFFFFFFF
        88800000FFFFFFFFFFFFFFFFFFFFFFFF88800000FFFFFFFFFFFFFFFFFFFFFFFF
        88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF
        88080000FFFFFFFFFFFFFFFFFFFFFFFF88080000FFFFFFFFFFFFFFFFFFFFFFFF
        88880800FFFFFFFFFFFFFFFFFFFFFFFF88880800FFFFFFFFFFFFFFFFFFFFFFFF
        88880800FFFFFFFFFFFFFFFFFFFFFFFF88880800FFFFFFFFFFFFFFFFFFFFFFFF
        F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF
        F880000FFFFFFFFFFFFFFFFFFFFFFFFFF880000FFFFFFFFFFFFFFFFFFFFFFFFF
        F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF
        F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF
        F880800FFFFFFFFFFFFFFFFFFFFFFFFFF880800FFFFFFFFFFFFFFFFFFFFFFFFF
        F880800FFFFFFFFFFFFFFFFFFFFFFFFFF880800FFFFFFFFFFFFFFFFFFFFFFFFF
        F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF
        F808000FFFFFFFFFFFFFFFFFFFFFFFFFF808000FFFFFFFFFFFFFFFFFFFFFFFFF
        FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF8080FFFFFFFFFFFFFFFFFFFFFFFFFFFF8080FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF8080FFFFFFFFFFFFFFFFFFFFFFFFFFFF8080FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF8800FFFFFFFFFFFFFFFFFFFFFFFFFFFF8800FFFFFFFFFFFFFFFFFFFFFFFFFF
        F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF
        F888000FFFFFFFFFFFFFFFFFFFFFFFFFF888000FFFFFFFFFFFFFFFFFFFFFFFFF
        08000000FFFFFFFFFFFFFFFFFFFFFFFF08000000FFFFFFFFFFFFFFFFFFFFFFFF
        08000000FFFFFFFFFFFFFFFFFFFFFFFF08000000FFFFFFFFFFFFFFFFFFFFF880
        00000000000FFFFFFFFFFFFFFFFFF88000000000000FFFFFFFFFFFFFFFFFF880
        00000000000FFFFFFFFFFFFFFFFFF88000000000000FFFFFFFFFFFFFFFF80000
        EEEEEEEE88800FFFFFFFFFFFFFF800009999999988800FFFFFFFFFFFFFF80000
        9999999988800FFFFFFFFFFFFFF800009999999988800FFFFFFFFFFFFF000EEE
        EEEEEEEEEEE800FFFFFFFFFFFF00099999999999999800FFFFFFFFFFFF000999
        99999999999800FFFFFFFFFFFF00099999999999999800FFFFFFFFFFF000EEEE
        EEEEEEEEEEEE800FFFFFFFFFF0009999999999999999800FFFFFFFFFF0009999
        999999999999800FFFFFFFFFF0009999999999999999800FFFFFFFFFF00EEEEE
        EEEEEEEEEEEEE80FFFFFFFFFF0099999999999999999980FFFFFFFFFF0099999
        999999999999980FFFFFFFFFF0099999999999999999980FFFFFFFFF80EEEEEE
        EEEEEEEEEEEEEE00FFFFFFFF809999999999999999999900FFFFFFFF80999999
        9999999999999900FFFFFFFF809999999999999999999900FFFFFFFF80EEEEEE
        EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999
        9999999999999980FFFFFFFF809999999999999999999980FFFFFFFF80EEEEEE
        EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999
        9999999999999980FFFFFFFF809999999999999999999980FFFFFFFF80EEEEEE
        EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999
        9999999999999980FFFFFFFF809999999999999999999980FFFFFFFF80EEEEEE
        EEEEEEEEEEEEEE80FFFFFFFF809999999999999999999980FFFFFFFF80999999
        9999999999999980FFFFFFFF809999999999999999999980FFFFFFFFF00EEEEE
        EEEEEEEEEEEEE80FFFFFFFFFF0099999999999999999980FFFFFFFFFF0099999
        999999999999980FFFFFFFFFF0099999999999999999980FFFFFFFFFF800EEEE
        EEEEEEEEEEEE800FFFFFFFFFF8009999999999999999800FFFFFFFFFF8009999
        999999999999800FFFFFFFFFF8009999999999999999800FFFFFFFFFFF800EEE
        EEEEEEEEEEE800FFFFFFFFFFFF80099999999999999800FFFFFFFFFFFF800999
        99999999999800FFFFFFFFFFFF80099999999999999800FFFFFFFFFFFFF800EE
        EEEEEEEEEE800FFFFFFFFFFFFFF800999999999999800FFFFFFFFFFFFFF80099
        9999999999800FFFFFFFFFFFFFF800999999999999800FFFFFFFFFFFFFFF8880
        0EEEEEE08000FFFFFFFFFFFFFFFF8880099999908000FFFFFFFFFFFFFFFF8880
        099999908000FFFFFFFFFFFFFFFF8880099999908000FFFFFFFFFFFFFFFFFF80
        0080000000FFFFFFFFFFFFFFFFFFFF800080000000FFFFFFFFFFFFFFFFFFFF80
        0080000000FFFFFFFFFFFFFFFFFFFF800080000000FFFFFFFFFFFFFFFFFFFFFF
        F800000FFFFFFFFFFFFFFFFFFFFFFFFFF800000FFFFFFFFFFFFFFFFFFFFFFFFF
        F800000FFFFFFFFFFFFFFFFFFFFFFFFFF800000FFFFFFFFFFFFF}
      Layout = blGlyphTop
      NumGlyphs = 4
      ParentShowHint = False
      ShowHint = True
      OnClick = BtLoupeClick
    end
    object BtAbout: TButton
      Left = 157
      Top = 71
      Width = 72
      Height = 28
      Hint = 'Copyright notice'
      Caption = 'A&bout'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnClick = BtAboutClick
    end
    object BtHelp: TBitBtn
      Left = 242
      Top = 31
      Width = 72
      Height = 28
      Hint = 'Frequently asked questions'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      TabStop = False
      OnClick = BtHelpClick
      Kind = bkHelp
    end
    object BtSetup: TButton
      Left = 157
      Top = 31
      Width = 72
      Height = 28
      Hint = 'On the desktop, in the start menu'
      Caption = 'Shortcuts'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      TabStop = False
      OnClick = BtSetupClick
    end
    object BtExit: TBitBtn
      Left = 242
      Top = 71
      Width = 72
      Height = 28
      Hint = 'To quit the program'
      Caption = 'E&xit'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      TabStop = False
      OnClick = BtExitClick
      Glyph.Data = {
        BE060000424DBE06000000000000360400002800000024000000120000000100
        0800000000008802000000000000000000000001000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
        A600000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0003F8F8F8F8F8
        F8F8F8F80707FF07FF07F807FFF8F8F8F8F8F8F8F8F8F8030303030303FF0404
        0404040000F8F8F8FFFFFF0404040404F8F8F8F8F8F8F8F8F8F8FF030303FFFF
        F8FF0303030304FD05000007FFFFFF0403030303F8F8F8F8F8F8F8F8F8F80303
        03F8F8F8F8FF030303030405FD0500FFFFFFFF040303030303030303F8FFF8F8
        F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF040303030303030303
        F8F807F8F8FF030303F8FF0303FF030303030405FD0500FFFEFFFE0403030303
        03030303F8FFF807F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF04
        0303030303030303F8F807F8F8FF030303F8FF0303FF030303030405FD0500FF
        FEFFFE040303030303030303F8FFF807F8FF030303F8FF0303FF0303030304FD
        05FD00FFFFFFFF040303030303030303F8F807F8F8FF030303F8FF0303FF0303
        03030405FD0500FFFEFFFE040303030303030303F8FFF807F8FF030303F8FF03
        03FF0303030304FD05FD00FEFFFEFF040303030303030303F8F807F8F8FF0303
        03F8FF0303FF030303030405FD0500FFFEFFFE040303030303030303F8FFF807
        F8FF030303F8FF0303FF0303030304FD05FD00FEFFFEFF040303030303030303
        F8F807F8F8FF030303F8FF0303FF030303030404040404040404040403030303
        03030303F8FFF8FFF8FFFFFFFFF8FF0303FF0303030303030303030303030303
        0303030303030303F8F8F8F8F8F8F8F8F8F8030303FF03030303030300000000
        000003030303030303030303030303FFFFFFFFFFFF03030303FF030303030303
        00FAFAFAFA00030303030303030303030303F8F8F8F8F8F8FF03030303FF0303
        03030303000000000000030303030303030303030303F8FFFFFFFFF8FF030303
        03FF}
      NumGlyphs = 2
    end
    object BtConfig: TButton
      Left = 72
      Top = 31
      Width = 72
      Height = 28
      Hint = 'Accuracy, subdivisions, metric/imperial'
      Caption = 'Configuration'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      TabStop = False
      OnClick = BtConfigClick
    end
    object BtSetupPrn: TButton
      Left = 72
      Top = 71
      Width = 72
      Height = 28
      Hint = 'Paper size, printer properties'
      Caption = 'Printer setup'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      TabStop = False
      OnClick = BtSetupPrnClick
    end
  end
  object PanelPrintingPage: TPanel
    Left = 425
    Top = 334
    Width = 164
    Height = 97
    TabOrder = 27
    object Shape10: TShape
      Left = 1
      Top = 1
      Width = 162
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label31: TLabel
      Left = 34
      Top = 4
      Width = 97
      Height = 13
      Caption = 'Printable surface'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Shape8: TShape
      Left = 28
      Top = 31
      Width = 108
      Height = 36
      Brush.Color = clInfoBk
    end
    object LblWPaper: TLabel
      Left = 34
      Top = 34
      Width = 53
      Height = 13
      Caption = 'LblWPaper'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object LblHPaper: TLabel
      Left = 35
      Top = 50
      Width = 50
      Height = 13
      Caption = 'LblHPaper'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object RBPortrait: TRadioButton
      Left = 14
      Top = 73
      Width = 55
      Height = 17
      Caption = 'Portrait'
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RBOrientClick
    end
    object RBLandscape: TRadioButton
      Tag = 1
      Left = 78
      Top = 73
      Width = 75
      Height = 17
      Caption = 'Landscape'
      TabOrder = 1
      OnClick = RBOrientClick
    end
  end
  object PanelOutPut: TPanel
    Left = 589
    Top = 334
    Width = 165
    Height = 97
    TabOrder = 28
    object Shape11: TShape
      Left = 1
      Top = 1
      Width = 163
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label32: TLabel
      Left = 63
      Top = 4
      Width = 39
      Height = 13
      Caption = 'Output'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtImprimer: TSpeedButton
      Left = 88
      Top = 42
      Width = 67
      Height = 34
      Hint = 'Default printer'
      Caption = '&Print'
      Glyph.Data = {
        96090000424D9609000000000000360000002800000028000000140000000100
        1800000000006009000000000000000000000000000000000000007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFF
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFF
        FFFFFFFFFFFFFF007F7F007F7F007F7F000000000000000000007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000000000000000
        007F7F007F7F007F7F007F7F7F7F7F7F7F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7F7F7F7F7F7F7FFFFFFFFF
        FFFF007F7F000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000000000000000000000007F7F007F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7FFFFFFF007F7F000000
        FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000007F7F007F7F7F7F7FFFFFFF00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F000000FFFFFFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBF000000007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F7F7F7FFFFFFF007F7F000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000FF0000FFBFBFBFBFBFBF
        000000007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFF
        FFFF007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F
        7F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7FFFFFFF007F7F7F7F7F
        0000000000007F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F7F7F0000000000007F7F7F007F7F007F7F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F007F7F007F7F007F7F0000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
        7FFFFFFF007F7F007F7F007F7F007F7F007F7F000000000000FFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000007F7F
        007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7FFFFFFF007F7FFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7F7F7F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F000000FFFFFF000000000000000000000000
        000000000000000000000000FFFFFF000000007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F7F7F7FFFFFFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F7F7F7FFFFFFF007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFF7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F0000
        00FFFFFF000000000000000000000000000000000000000000000000FFFFFF00
        0000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F7F7F7FFFFF
        FF007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000FFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7FFFFFFFFFFF
        FF007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F000000FFFFFF000000000000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F7F7F7FFFFFFF7F7F7F7F7F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFF7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F0000
        0000000000000000000000000000000000000000000000000000000000000000
        0000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtImprimerClick
    end
    object BtCopy: TButton
      Left = 10
      Top = 27
      Width = 67
      Height = 29
      Hint = 'Clipboard'
      Caption = '&Copy'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnClick = BtCopyClick
    end
    object BtSaveToFile: TButton
      Left = 9
      Top = 61
      Width = 67
      Height = 29
      Hint = 'Metafile (*.emf)'
      Caption = '&Save'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      TabStop = False
      OnClick = BtSaveToFileClick
    end
  end
  object PanelCart: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 3
    Visible = False
    object GroupBox1: TGroupBox
      Left = 7
      Top = 13
      Width = 153
      Height = 108
      Caption = ' Abscissa '
      TabOrder = 0
      object Label2: TLabel
        Left = 4
        Top = 32
        Width = 27
        Height = 13
        Caption = 'Scale'
      end
      object Label3: TLabel
        Left = 4
        Top = 71
        Width = 42
        Height = 13
        Caption = 'Divisions'
      end
      object CBXScale: TComboBox
        Left = 50
        Top = 27
        Width = 95
        Height = 21
        Style = csDropDownList
        DropDownCount = 10
        ItemHeight = 13
        TabOrder = 0
        OnChange = CBCartScaleChange
      end
      object CBXDiv: TComboBox
        Left = 50
        Top = 68
        Width = 95
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 1
        OnChange = RefreshPreview
      end
      object EditXDiv: TEdit
        Left = 50
        Top = 68
        Width = 44
        Height = 21
        MaxLength = 3
        TabOrder = 2
        Text = '31'
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyXDiv: TButton
        Left = 102
        Top = 69
        Width = 41
        Height = 21
        Caption = 'Apply'
        TabOrder = 3
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
    object GroupBox2: TGroupBox
      Left = 166
      Top = 13
      Width = 153
      Height = 108
      Caption = ' Ordinate '
      TabOrder = 1
      object Label6: TLabel
        Left = 4
        Top = 32
        Width = 27
        Height = 13
        Caption = 'Scale'
      end
      object Label19: TLabel
        Left = 4
        Top = 71
        Width = 42
        Height = 13
        Caption = 'Divisions'
      end
      object CBYScale: TComboBox
        Tag = 1
        Left = 50
        Top = 27
        Width = 95
        Height = 21
        Style = csDropDownList
        DropDownCount = 10
        ItemHeight = 13
        TabOrder = 0
        OnChange = CBCartScaleChange
      end
      object CBYDiv: TComboBox
        Tag = 1
        Left = 50
        Top = 68
        Width = 95
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 1
        OnChange = RefreshPreview
      end
      object EditYDiv: TEdit
        Tag = 1
        Left = 50
        Top = 68
        Width = 44
        Height = 21
        MaxLength = 3
        TabOrder = 2
        Text = '31'
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyYDiv: TButton
        Tag = 1
        Left = 102
        Top = 69
        Width = 41
        Height = 21
        Caption = 'Apply'
        TabOrder = 3
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
    object CBSubDivCart: TCheckBox
      Left = 120
      Top = 130
      Width = 87
      Height = 17
      Caption = 'Sub-divisions'
      Checked = True
      State = cbChecked
      TabOrder = 2
      OnClick = CBSubdivClick
    end
    object CBStaggeredDots: TCheckBox
      Left = 127
      Top = 129
      Width = 97
      Height = 17
      Caption = 'Staggered dots'
      TabOrder = 3
      OnClick = RefreshPreview
    end
  end
  object PanelBee: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 6
    Visible = False
    object GroupBox9: TGroupBox
      Left = 56
      Top = 25
      Width = 213
      Height = 99
      Caption = ' Pattern '
      TabOrder = 0
      object LblUnitBee: TLabel
        Left = 177
        Top = 26
        Width = 23
        Height = 13
        Caption = 'unite'
      end
      object Label35: TLabel
        Left = 12
        Top = 26
        Width = 65
        Height = 13
        Caption = 'Width of motif'
      end
      object EditDiamBee: TEdit
        Tag = 7
        Left = 89
        Top = 23
        Width = 78
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyDiamBee: TButton
        Tag = 7
        Left = 89
        Top = 59
        Width = 78
        Height = 25
        Caption = 'Apply'
        TabOrder = 1
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
  end
  object PanelTri: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 7
    Visible = False
    object GroupBox11: TGroupBox
      Left = 50
      Top = 38
      Width = 225
      Height = 74
      Caption = ' Side scale '
      TabOrder = 0
      object LblScales: TLabel
        Left = 24
        Top = 33
        Width = 42
        Height = 13
        Caption = 'Divisions'
        FocusControl = CBDivTri
      end
      object CBDivTri: TComboBox
        Left = 80
        Top = 27
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 11
        ItemHeight = 13
        TabOrder = 0
        OnChange = RefreshPreview
      end
    end
  end
  object PanelMerc: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 8
    Visible = False
    object GroupBox18: TGroupBox
      Left = 26
      Top = 23
      Width = 273
      Height = 105
      Caption = ' Geometry '
      TabOrder = 0
      object Label50: TLabel
        Left = 17
        Top = 32
        Width = 79
        Height = 13
        Caption = 'P&arallels spacing'
        FocusControl = CBYDivMerc
      end
      object Label49: TLabel
        Left = 16
        Top = 63
        Width = 84
        Height = 13
        Caption = 'Lat&itude (0 to 80�)'
        FocusControl = EditLatitude
      end
      object CBYDivMerc: TComboBox
        Left = 121
        Top = 24
        Width = 134
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 11
        ItemHeight = 13
        TabOrder = 0
        OnChange = RefreshPreview
      end
      object EditLatitude: TEdit
        Tag = 6
        Left = 122
        Top = 57
        Width = 73
        Height = 21
        TabOrder = 1
        Text = 'EditLatitude'
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyLatitude: TButton
        Tag = 6
        Left = 207
        Top = 57
        Width = 49
        Height = 23
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
  end
  object PanelMusic: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 9
    Visible = False
    object Label38: TLabel
      Left = 24
      Top = 63
      Width = 64
      Height = 13
      Caption = 'Staves/score'
    end
    object Label39: TLabel
      Left = 25
      Top = 87
      Width = 46
      Height = 13
      Caption = 'Bars/staff'
    end
    object Bevel1: TBevel
      Left = 6
      Top = 51
      Width = 155
      Height = 95
      Shape = bsFrame
    end
    object SEStavesOnScore: TSpinEdit
      Left = 95
      Top = 57
      Width = 41
      Height = 22
      EditorEnabled = False
      MaxValue = 20
      MinValue = 1
      TabOrder = 1
      Value = 4
      OnChange = SEStavesOnScoreChange
    end
    object SEBars: TSpinEdit
      Left = 95
      Top = 84
      Width = 41
      Height = 22
      EditorEnabled = False
      MaxValue = 20
      MinValue = 0
      TabOrder = 2
      Value = 4
      OnChange = SEBarsChange
    end
    object GroupBox7: TGroupBox
      Left = 166
      Top = 0
      Width = 152
      Height = 147
      Caption = ' Distances '
      TabOrder = 4
      object Label41: TLabel
        Left = 12
        Top = 25
        Width = 76
        Height = 13
        Caption = 'Between scores'
      end
      object LblStaff12: TLabel
        Left = 12
        Top = 57
        Width = 68
        Height = 13
        Caption = 'Staff 1- Staff 2'
      end
      object LblOtherStaves: TLabel
        Left = 12
        Top = 88
        Width = 78
        Height = 13
        Caption = 'Following staves'
      end
      object Label4: TLabel
        Left = 29
        Top = 112
        Width = 93
        Height = 13
        Caption = 'Unit = 1 lines space'
      end
      object SEDistScores: TSpinEdit
        Left = 98
        Top = 20
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 50
        MinValue = 2
        TabOrder = 0
        Value = 4
        OnChange = RefreshPreview
      end
      object SEStave12: TSpinEdit
        Left = 98
        Top = 51
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 40
        MinValue = 2
        TabOrder = 1
        Value = 7
        OnChange = RefreshPreview
      end
      object SEStave23: TSpinEdit
        Left = 98
        Top = 82
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 20
        MinValue = 2
        TabOrder = 2
        Value = 3
        OnChange = RefreshPreview
      end
    end
    object GroupBox8: TGroupBox
      Left = 6
      Top = 0
      Width = 155
      Height = 46
      Caption = ' Space between lines '
      TabOrder = 0
      object LblUnitMusic: TLabel
        Left = 72
        Top = 23
        Width = 14
        Height = 13
        Caption = 'cm'
      end
      object EditEcLiMus: TEdit
        Tag = 10
        Left = 12
        Top = 18
        Width = 56
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyMusic: TButton
        Tag = 10
        Left = 105
        Top = 19
        Width = 37
        Height = 22
        Caption = 'Apply'
        TabOrder = 1
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
    object PanelKeyMusic: TPanel
      Left = 9
      Top = 104
      Width = 150
      Height = 41
      BevelOuter = bvNone
      TabOrder = 3
      object Label7: TLabel
        Left = 3
        Top = 3
        Width = 49
        Height = 13
        Caption = 'Space for '
      end
      object Label90: TLabel
        Left = 4
        Top = 16
        Width = 63
        Height = 13
        Caption = 'key signature'
      end
      object Label91: TLabel
        Left = 73
        Top = 26
        Width = 6
        Height = 13
        Caption = '0'
      end
      object Label92: TLabel
        Left = 106
        Top = 26
        Width = 6
        Height = 13
        Caption = '5'
      end
      object Label93: TLabel
        Left = 136
        Top = 26
        Width = 12
        Height = 13
        Caption = '10'
      end
      object TBKeyMusic: TTrackBar
        Left = 69
        Top = 6
        Width = 81
        Height = 20
        Orientation = trHorizontal
        Frequency = 1
        Position = 0
        SelEnd = 0
        SelStart = 0
        TabOrder = 0
        ThumbLength = 12
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = RefreshPreview
      end
    end
  end
  object PanelWei: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 15
    TabStop = True
    Visible = False
    object GroupBox20: TGroupBox
      Left = 7
      Top = 2
      Width = 312
      Height = 44
      Caption = ' Abscissa '
      TabOrder = 0
      object Label37: TLabel
        Left = 63
        Top = 16
        Width = 84
        Height = 13
        Caption = 'Range of lifetimes'
        FocusControl = CBXDivWeib
      end
      object CBXDivWeib: TComboBox
        Left = 158
        Top = 13
        Width = 90
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnChange = RefreshPreview
      end
    end
    object GroupBox22: TGroupBox
      Left = 7
      Top = 74
      Width = 312
      Height = 73
      Caption = ' Additional features '
      TabOrder = 1
      object CBMoreAxesWeib: TCheckBox
        Left = 9
        Top = 19
        Width = 294
        Height = 17
        Caption = 'Axes to calculate the Weibull scale and shape parameters'
        TabOrder = 0
        OnClick = RefreshPreview
      end
      object CBMedianRanks: TCheckBox
        Left = 9
        Top = 45
        Width = 118
        Height = 17
        Caption = 'Median ranks scale'
        TabOrder = 1
        OnClick = CBMedianRanksClick
      end
      object PanelNWeibull: TPanel
        Left = 185
        Top = 40
        Width = 121
        Height = 28
        BevelOuter = bvNone
        TabOrder = 2
        object Label99: TLabel
          Left = 39
          Top = 8
          Width = 29
          Height = 13
          Caption = 'Points'
          FocusControl = EditNbPtWeib
        end
        object EditNbPtWeib: TEdit
          Tag = 3
          Left = 3
          Top = 4
          Width = 32
          Height = 21
          TabOrder = 0
          Text = '100'
          OnKeyPress = EditDiagramKeyPress
        end
        object BtApplyNbWeibull: TButton
          Tag = 3
          Left = 76
          Top = 4
          Width = 42
          Height = 21
          Caption = 'Apply'
          TabOrder = 1
          TabStop = False
          OnClick = BtApplyDiagramClick
        end
      end
    end
    object CBSubDivWeib: TCheckBox
      Left = 101
      Top = 53
      Width = 123
      Height = 17
      Caption = 'Sub-divisions of axes'
      Checked = True
      State = cbChecked
      TabOrder = 2
      OnClick = CBSubdivClick
    end
  end
  object PanelAxo: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 11
    Visible = False
    object Label44: TLabel
      Left = 65
      Top = 15
      Width = 90
      Height = 13
      Caption = 'Horizontal divisions'
    end
    object CBXDivAxo: TComboBox
      Left = 167
      Top = 11
      Width = 93
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
      OnChange = RefreshPreview
    end
    object GBAnglesPerspective: TGroupBox
      Left = 7
      Top = 42
      Width = 159
      Height = 105
      Caption = ' Perspective angles '
      TabOrder = 1
      object Label46: TLabel
        Left = 12
        Top = 27
        Width = 18
        Height = 13
        Caption = 'Left'
      end
      object Label47: TLabel
        Left = 11
        Top = 59
        Width = 25
        Height = 13
        Caption = 'Right'
      end
      object Label45: TLabel
        Left = 36
        Top = 80
        Width = 86
        Height = 13
        Caption = '(15 to 60 degrees)'
      end
      object EditLeftAngle: TEdit
        Tag = 4
        Left = 44
        Top = 24
        Width = 41
        Height = 21
        TabOrder = 0
        Text = 'EditLeftAngle'
        OnKeyPress = EditDiagramKeyPress
      end
      object EditRightAngle: TEdit
        Tag = 4
        Left = 45
        Top = 52
        Width = 41
        Height = 21
        TabOrder = 1
        Text = 'EditRightAngle'
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyAxo: TButton
        Tag = 4
        Left = 97
        Top = 36
        Width = 52
        Height = 25
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
    object GBVLinesAxo: TGroupBox
      Left = 175
      Top = 56
      Width = 141
      Height = 71
      Caption = ' Vertical lines '
      TabOrder = 2
      object Label48: TLabel
        Left = 7
        Top = 48
        Width = 128
        Height = 13
        Caption = '(not shown on the preview)'
      end
      object RBWithAxoV: TRadioButton
        Left = 13
        Top = 24
        Width = 43
        Height = 17
        Caption = 'With'
        TabOrder = 0
        OnClick = RBAxoVClick
      end
      object RBWithoutAxoV: TRadioButton
        Left = 69
        Top = 24
        Width = 61
        Height = 17
        Caption = 'Without'
        TabOrder = 1
        OnClick = RBAxoVClick
      end
    end
  end
  object PanelLogit: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 12
    TabStop = True
    Visible = False
    object Label52: TLabel
      Left = 40
      Top = 46
      Width = 72
      Height = 13
      Caption = 'Abscissa range'
      FocusControl = CBXDivLogit
    end
    object CBXDivLogit: TComboBox
      Left = 134
      Top = 43
      Width = 105
      Height = 21
      ItemHeight = 13
      TabOrder = 0
      OnChange = RefreshPreview
    end
    object CBSubDivLogit: TCheckBox
      Left = 119
      Top = 90
      Width = 87
      Height = 17
      Caption = 'Sub-divisions'
      Checked = True
      State = cbChecked
      TabOrder = 1
      OnClick = CBSubdivClick
    end
  end
  object PanelBrick: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 17
    Visible = False
    object GroupBox13: TGroupBox
      Left = 33
      Top = 16
      Width = 259
      Height = 118
      Caption = ' Bricks'
      TabOrder = 0
      object LblUnitHBrick: TLabel
        Left = 142
        Top = 29
        Width = 23
        Height = 13
        Caption = 'unite'
      end
      object Label56: TLabel
        Left = 14
        Top = 61
        Width = 28
        Height = 13
        Caption = 'Width'
      end
      object LblUnitWBrick: TLabel
        Left = 142
        Top = 61
        Width = 25
        Height = 13
        Caption = 'Unite'
      end
      object Label43: TLabel
        Left = 13
        Top = 28
        Width = 31
        Height = 13
        Caption = 'Height'
      end
      object EditHBrick: TEdit
        Tag = 11
        Left = 52
        Top = 24
        Width = 80
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object EditWBrick: TEdit
        Tag = 12
        Left = 53
        Top = 55
        Width = 80
        Height = 21
        TabOrder = 1
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyBrick: TButton
        Tag = 11
        Left = 182
        Top = 40
        Width = 61
        Height = 21
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
      object RBBrickAligned: TRadioButton
        Left = 60
        Top = 89
        Width = 57
        Height = 17
        Caption = 'Aligned'
        TabOrder = 3
        OnClick = RefreshPreview
      end
      object RBBrickStaggered: TRadioButton
        Left = 148
        Top = 89
        Width = 73
        Height = 17
        Caption = 'Staggered'
        TabOrder = 4
        OnClick = RefreshPreview
      end
    end
  end
  object PanelLosange: TPanel
    Tag = 13
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 14
    Visible = False
    object GroupBox10: TGroupBox
      Left = 56
      Top = 11
      Width = 213
      Height = 128
      Caption = ' Diamonds '
      TabOrder = 0
      object Label57: TLabel
        Left = 12
        Top = 28
        Width = 31
        Height = 13
        Caption = 'Height'
      end
      object LblUnitHLosange: TLabel
        Left = 146
        Top = 29
        Width = 23
        Height = 13
        Caption = 'unite'
      end
      object Label63: TLabel
        Left = 12
        Top = 60
        Width = 28
        Height = 13
        Caption = 'Width'
      end
      object LblUnitWLosange: TLabel
        Left = 147
        Top = 61
        Width = 25
        Height = 13
        Caption = 'Unite'
      end
      object EditHLosange: TEdit
        Tag = 16
        Left = 66
        Top = 24
        Width = 70
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object EditWLosange: TEdit
        Tag = 17
        Left = 66
        Top = 56
        Width = 70
        Height = 21
        TabOrder = 1
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyLosange: TButton
        Tag = 16
        Left = 67
        Top = 90
        Width = 70
        Height = 21
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
  end
  object PanelclPat: TPanel
    Left = 426
    Top = 212
    Width = 326
    Height = 72
    BevelOuter = bvNone
    TabOrder = 23
    Visible = False
    object GroupBox6: TGroupBox
      Left = 7
      Top = 2
      Width = 312
      Height = 68
      Caption = ' Line '
      TabOrder = 0
      object ShapeColorPat: TShape
        Left = 278
        Top = 16
        Width = 20
        Height = 10
        Shape = stEllipse
      end
      object Label64: TLabel
        Left = 246
        Top = 13
        Width = 24
        Height = 13
        Caption = 'Color'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object LblWPat3: TLabel
        Left = 202
        Top = 45
        Width = 18
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '100'
      end
      object LblWPat2: TLabel
        Left = 141
        Top = 45
        Width = 17
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '50'
      end
      object LblWPat1: TLabel
        Left = 74
        Top = 45
        Width = 19
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '1'
      end
      object LblUnitPat: TLabel
        Left = 11
        Top = 42
        Width = 46
        Height = 13
        AutoSize = False
        Caption = 'Unit'
      end
      object Label66: TLabel
        Left = 14
        Top = 22
        Width = 28
        Height = 13
        Caption = 'Width'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object BtChangeColorPat: TButton
        Left = 249
        Top = 34
        Width = 48
        Height = 24
        Hint = 'Color of pattern'
        Caption = 'Ch&ange'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        TabStop = False
        OnClick = BtChangeColorPatClick
      end
      object TBPat: TTrackBar
        Left = 72
        Top = 17
        Width = 150
        Height = 29
        LineSize = 10
        Max = 100
        Min = 1
        Orientation = trHorizontal
        PageSize = 10
        Frequency = 10
        Position = 50
        SelEnd = 0
        SelStart = 0
        TabOrder = 1
        ThumbLength = 20
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = TBPatChange
      end
    end
  end
  object PanelTable: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 18
    Visible = False
    object GroupBox16: TGroupBox
      Left = 7
      Top = 1
      Width = 312
      Height = 41
      Caption = ' Rows '
      TabOrder = 0
      object Label24: TLabel
        Left = 7
        Top = 16
        Width = 37
        Height = 13
        Caption = 'Number'
      end
      object LblHRows: TLabel
        Left = 143
        Top = 15
        Width = 49
        Height = 13
        Caption = 'LblHRows'
      end
      object Label36: TLabel
        Left = 103
        Top = 15
        Width = 40
        Height = 13
        Caption = 'Height : '
      end
      object SERows: TSpinEdit
        Left = 53
        Top = 11
        Width = 42
        Height = 22
        EditorEnabled = False
        MaxValue = 50
        MinValue = 2
        TabOrder = 0
        Value = 2
        OnChange = SERowsChange
      end
    end
    object GroupBox17: TGroupBox
      Left = 7
      Top = 44
      Width = 312
      Height = 105
      Caption = ' Columns '
      TabOrder = 1
      object Label51: TLabel
        Left = 5
        Top = 18
        Width = 37
        Height = 13
        Caption = 'Number'
      end
      object Label34: TLabel
        Left = 5
        Top = 67
        Width = 279
        Height = 13
        Caption = 'To widen or narrow a column, left-click on one of its border '
      end
      object Label40: TLabel
        Left = 17
        Top = 82
        Width = 172
        Height = 13
        Caption = 'and move the line gliding the mouse.'
      end
      object Label53: TLabel
        Left = 6
        Top = 45
        Width = 288
        Height = 13
        Caption = 'To select/unselect a column, rigth-click on it (yellow flagged).'
      end
      object SECols: TSpinEdit
        Left = 49
        Top = 14
        Width = 44
        Height = 22
        EditorEnabled = False
        MaxValue = 0
        MinValue = 2
        TabOrder = 0
        Value = 2
        OnChange = SEColsChange
      end
      object BtEqualizeCols: TButton
        Left = 100
        Top = 14
        Width = 134
        Height = 22
        Caption = 'Equalize selected columns'
        TabOrder = 1
        TabStop = False
        OnClick = BtEqualColumnsClick
      end
      object BtUnselectCols: TButton
        Left = 242
        Top = 14
        Width = 65
        Height = 22
        Caption = 'Unselect all'
        TabOrder = 2
        TabStop = False
        OnClick = BtUnselectColsClick
      end
    end
  end
  object PanelEllipse: TPanel
    Tag = 13
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    Caption = 'PanelEllipse'
    TabOrder = 16
    Visible = False
    object GroupBox19: TGroupBox
      Left = 7
      Top = 11
      Width = 312
      Height = 128
      Caption = ' Motif '
      TabOrder = 0
      object Label54: TLabel
        Left = 23
        Top = 28
        Width = 31
        Height = 13
        Caption = 'Height'
      end
      object LblUnitHEllipse: TLabel
        Left = 157
        Top = 29
        Width = 23
        Height = 13
        Caption = 'unite'
      end
      object Label59: TLabel
        Left = 23
        Top = 60
        Width = 28
        Height = 13
        Caption = 'Width'
      end
      object LblUnitWEllipse: TLabel
        Left = 158
        Top = 61
        Width = 25
        Height = 13
        Caption = 'Unite'
      end
      object EditHEllipse: TEdit
        Tag = 13
        Left = 77
        Top = 24
        Width = 70
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object EditWEllipse: TEdit
        Tag = 14
        Left = 77
        Top = 56
        Width = 70
        Height = 21
        TabOrder = 1
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyEllipse: TButton
        Tag = 13
        Left = 209
        Top = 42
        Width = 70
        Height = 21
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
      object RBEllipseCrossed: TRadioButton
        Left = 75
        Top = 96
        Width = 65
        Height = 17
        Caption = 'Crossed'
        TabOrder = 3
        OnClick = RefreshPreview
      end
      object RBEllipseTangent: TRadioButton
        Left = 171
        Top = 96
        Width = 65
        Height = 17
        Caption = 'Tangent'
        TabOrder = 4
        OnClick = RefreshPreview
      end
    end
  end
  object PanelclDot: TPanel
    Left = 426
    Top = 212
    Width = 326
    Height = 72
    BevelOuter = bvNone
    Caption = 'PanelclDot'
    TabOrder = 25
    Visible = False
    object GroupBox5: TGroupBox
      Left = 7
      Top = 2
      Width = 312
      Height = 68
      Caption = ' Dots '
      TabOrder = 0
      object Label58: TLabel
        Left = 12
        Top = 21
        Width = 42
        Height = 13
        Caption = 'Diameter'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object LblDiamDot1: TLabel
        Left = 76
        Top = 45
        Width = 17
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '50'
      end
      object LblDiamDot2: TLabel
        Left = 137
        Top = 45
        Width = 21
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '100'
      end
      object LblDiamDot3: TLabel
        Left = 201
        Top = 45
        Width = 21
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '150'
      end
      object LblUnitDot: TLabel
        Left = 13
        Top = 42
        Width = 19
        Height = 13
        Caption = 'Unit'
      end
      object Label67: TLabel
        Left = 246
        Top = 13
        Width = 24
        Height = 13
        Caption = 'Color'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object ShapeColorDot: TShape
        Left = 278
        Top = 16
        Width = 20
        Height = 10
        Shape = stEllipse
      end
      object TBDot: TTrackBar
        Left = 72
        Top = 17
        Width = 150
        Height = 28
        LineSize = 5
        Max = 100
        Min = 50
        Orientation = trHorizontal
        PageSize = 5
        Frequency = 5
        Position = 50
        SelEnd = 0
        SelStart = 0
        TabOrder = 0
        ThumbLength = 20
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = TBDotChange
      end
      object BtChangeColorDot: TButton
        Left = 249
        Top = 34
        Width = 48
        Height = 20
        Hint = 'Color of dots'
        Caption = 'Ch&ange'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        TabStop = False
        OnClick = BtChangeColorDotClick
      end
    end
  end
  object PanelGuitar: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 10
    Visible = False
    object GBGuitar: TGroupBox
      Left = 7
      Top = 11
      Width = 312
      Height = 127
      Caption = 'Strings'
      TabOrder = 0
      object LblUnitGuitar: TLabel
        Left = 86
        Top = 67
        Width = 14
        Height = 13
        Caption = 'cm'
      end
      object Label69: TLabel
        Left = 46
        Top = 67
        Width = 37
        Height = 13
        Caption = 'Unit = 1'
      end
      object Label5: TLabel
        Left = 104
        Top = 21
        Width = 37
        Height = 13
        Caption = 'Number'
      end
      object Label55: TLabel
        Left = 26
        Top = 54
        Width = 119
        Height = 13
        Caption = 'Distance between strings'
      end
      object Label62: TLabel
        Left = 46
        Top = 106
        Width = 97
        Height = 13
        Caption = 'Unit = 1 string space'
      end
      object Label60: TLabel
        Left = 26
        Top = 93
        Width = 120
        Height = 13
        Caption = 'Distance between staves'
      end
      object EditEcCords: TEdit
        Tag = 22
        Left = 155
        Top = 56
        Width = 70
        Height = 21
        TabOrder = 1
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyGuitar: TButton
        Tag = 22
        Left = 242
        Top = 57
        Width = 44
        Height = 22
        Caption = 'Apply'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
      object SEDistStaves: TSpinEdit
        Left = 157
        Top = 95
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 20
        MinValue = 2
        TabOrder = 3
        Value = 4
        OnChange = RefreshPreview
      end
      object SENCords: TSpinEdit
        Left = 155
        Top = 17
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 8
        MinValue = 4
        TabOrder = 0
        Value = 6
        OnChange = RefreshPreview
      end
    end
  end
  object PanelNomCurPaper: TPanel
    Left = 444
    Top = 33
    Width = 179
    Height = 21
    Color = clWhite
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 31
  end
  object BtChangePaper: TBitBtn
    Left = 639
    Top = 33
    Width = 101
    Height = 21
    Caption = 'Change &variant'
    TabOrder = 2
    OnClick = BtChangePaperClick
    Glyph.Data = {
      AE000000424DAE0000000000000076000000280000000D000000070000000100
      0400000000003800000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFF0FFFFF
      F000FFFFF000FFFFF000FFFF00000FFFF000FFF0000000FFF000FF000000000F
      F000F00000000000F0000000000000000000}
  end
  object PanelEditing: TPanel
    Left = 432
    Top = 28
    Width = 316
    Height = 34
    BevelOuter = bvNone
    BorderWidth = 1
    Caption = 'PanelEditing'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 32
    Visible = False
    object Shape13: TShape
      Left = 13
      Top = 6
      Width = 289
      Height = 20
    end
    object LblEditing: TLabel
      Left = 19
      Top = 9
      Width = 278
      Height = 15
      Alignment = taCenter
      AutoSize = False
      Caption = 'LblEditing'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object PanelHandWriting: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 20
    Visible = False
    object GBPairedLines: TGroupBox
      Left = 7
      Top = 7
      Width = 312
      Height = 52
      Caption = ' Distances between horizontal lines '
      TabOrder = 0
      object Label22: TLabel
        Left = 12
        Top = 23
        Width = 54
        Height = 13
        Caption = 'Paired lines'
      end
      object Label42: TLabel
        Left = 154
        Top = 23
        Width = 70
        Height = 13
        Caption = 'Groups of lines'
      end
      object LblUnitHandWri1: TLabel
        Left = 120
        Top = 23
        Width = 3
        Height = 13
        Caption = '-'
      end
      object LblUnitHandWri2: TLabel
        Left = 279
        Top = 23
        Width = 3
        Height = 13
        Caption = '-'
      end
      object EditDistPair: TEdit
        Tag = 23
        Left = 69
        Top = 20
        Width = 46
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object EditDistGroup: TEdit
        Tag = 24
        Left = 228
        Top = 20
        Width = 46
        Height = 21
        TabOrder = 1
        OnKeyPress = EditDiagramKeyPress
      end
    end
    object CBObliques: TCheckBox
      Left = 68
      Top = 123
      Width = 111
      Height = 17
      Caption = 'Show inclined lines'
      Checked = True
      State = cbChecked
      TabOrder = 3
      OnClick = CBObliquesClick
    end
    object GBInclinedLines: TGroupBox
      Left = 7
      Top = 63
      Width = 312
      Height = 52
      Caption = ' Inclined lines '
      TabOrder = 2
      object Label61: TLabel
        Left = 8
        Top = 23
        Width = 70
        Height = 13
        Caption = 'Horiz. distance'
      end
      object Label65: TLabel
        Left = 187
        Top = 23
        Width = 27
        Height = 13
        Caption = 'Angle'
      end
      object Label68: TLabel
        Left = 268
        Top = 23
        Width = 38
        Height = 13
        Caption = 'degrees'
      end
      object LblUnitHandWri3: TLabel
        Left = 138
        Top = 23
        Width = 3
        Height = 13
        Caption = '-'
      end
      object EditDistObl: TEdit
        Tag = 25
        Left = 83
        Top = 19
        Width = 50
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object EditAngleObl: TEdit
        Tag = 26
        Left = 222
        Top = 19
        Width = 41
        Height = 21
        TabOrder = 1
        OnKeyPress = EditDiagramKeyPress
      end
    end
    object BtApplyPair: TButton
      Tag = 23
      Left = 190
      Top = 122
      Width = 53
      Height = 21
      Caption = 'Apply'
      TabOrder = 4
      TabStop = False
      OnClick = BtApplyDiagramClick
    end
    object GBSingleLines: TGroupBox
      Left = 7
      Top = 7
      Width = 312
      Height = 52
      Caption = 'Horizontal lines '
      TabOrder = 1
      object Label70: TLabel
        Left = 62
        Top = 23
        Width = 73
        Height = 13
        Caption = 'Vertic. distance'
      end
      object LblUnitHandWri4: TLabel
        Left = 193
        Top = 23
        Width = 3
        Height = 13
        Caption = '-'
      end
      object EditDistSingle: TEdit
        Tag = 27
        Left = 142
        Top = 20
        Width = 46
        Height = 21
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
    end
  end
  object PanelLines: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    Caption = 'PanelLines'
    TabOrder = 13
    Visible = False
    object GroupBox12: TGroupBox
      Left = 41
      Top = 27
      Width = 245
      Height = 96
      Caption = ' Pattern '
      TabOrder = 0
      object Label20: TLabel
        Left = 9
        Top = 28
        Width = 99
        Height = 13
        Caption = 'Space between lines'
      end
      object LblUnitLinePattern: TLabel
        Left = 200
        Top = 28
        Width = 19
        Height = 13
        Caption = 'Unit'
      end
      object EditLines: TEdit
        Tag = 15
        Left = 118
        Top = 23
        Width = 75
        Height = 21
        MaxLength = 8
        TabOrder = 0
        OnKeyPress = EditDiagramKeyPress
      end
      object BtApplyLines: TButton
        Tag = 15
        Left = 119
        Top = 59
        Width = 75
        Height = 21
        Caption = 'Apply'
        TabOrder = 1
        TabStop = False
        OnClick = BtApplyDiagramClick
      end
    end
  end
  object PanelOvalShape: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 26
    Visible = False
    object Label71: TLabel
      Left = 88
      Top = 40
      Width = 73
      Height = 13
      Caption = 'Radial divisions'
    end
    object CBAngleEllipse: TComboBox
      Left = 88
      Top = 72
      Width = 145
      Height = 21
      Style = csDropDownList
      DropDownCount = 10
      ItemHeight = 13
      Items.Strings = (
        '5 degrees'
        '6 degrees'
        '9 degrees'
        '10 degrees'
        '15 degrees'
        '30 degrees'
        '45 degrees'
        '60 degrees'
        '90 degrees'
        'Absent')
      TabOrder = 0
      OnChange = RefreshPreview
    end
  end
  object PanelNotch: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 21
    Visible = False
    object Label72: TLabel
      Left = 21
      Top = 9
      Width = 81
      Height = 13
      Caption = 'Width of notches'
    end
    object LblUnitNotch: TLabel
      Left = 199
      Top = 8
      Width = 3
      Height = 13
      Caption = '-'
    end
    object EditWNotch: TEdit
      Tag = 28
      Left = 112
      Top = 4
      Width = 80
      Height = 21
      TabOrder = 0
      OnKeyPress = EditDiagramKeyPress
    end
    object GroupBox14: TGroupBox
      Left = 7
      Top = 35
      Width = 312
      Height = 112
      Caption = ' Spaces between notches '
      TabOrder = 1
      object Label74: TLabel
        Left = 12
        Top = 24
        Width = 47
        Height = 13
        Caption = 'Horizontal'
      end
      object Label75: TLabel
        Left = 15
        Top = 72
        Width = 35
        Height = 13
        Caption = 'Vertical'
      end
      object Label76: TLabel
        Left = 222
        Top = 25
        Width = 63
        Height = 13
        Caption = 'x notch width'
      end
      object Label77: TLabel
        Left = 222
        Top = 71
        Width = 67
        Height = 13
        Caption = 'x notch height'
      end
      object Label78: TLabel
        Left = 75
        Top = 48
        Width = 6
        Height = 13
        Caption = '0'
      end
      object Label79: TLabel
        Left = 77
        Top = 96
        Width = 6
        Height = 13
        Caption = '1'
      end
      object Label80: TLabel
        Left = 201
        Top = 96
        Width = 12
        Height = 13
        Caption = '10'
      end
      object Label81: TLabel
        Left = 198
        Top = 48
        Width = 15
        Height = 13
        Caption = '1.0'
      end
      object Label82: TLabel
        Left = 134
        Top = 48
        Width = 15
        Height = 13
        Caption = '0.5'
      end
      object Label83: TLabel
        Left = 133
        Top = 96
        Width = 6
        Height = 13
        Caption = '5'
      end
      object TBNotchVertic: TTrackBar
        Left = 69
        Top = 68
        Width = 150
        Height = 27
        Min = 1
        Orientation = trHorizontal
        Frequency = 1
        Position = 2
        SelEnd = 0
        SelStart = 0
        TabOrder = 1
        ThumbLength = 20
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = RefreshPreview
      end
      object TBNotchHoriz: TTrackBar
        Left = 67
        Top = 20
        Width = 150
        Height = 27
        Orientation = trHorizontal
        Frequency = 1
        Position = 0
        SelEnd = 0
        SelStart = 0
        TabOrder = 0
        ThumbLength = 20
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = RefreshPreview
      end
    end
    object BtApplyNotch: TButton
      Tag = 28
      Left = 255
      Top = 4
      Width = 47
      Height = 22
      Caption = 'Apply'
      TabOrder = 2
      TabStop = False
      OnClick = BtApplyDiagramClick
    end
  end
  object PanelPercus: TPanel
    Left = 426
    Top = 62
    Width = 326
    Height = 150
    BevelOuter = bvNone
    TabOrder = 22
    Visible = False
    object Label84: TLabel
      Left = 16
      Top = 16
      Width = 117
      Height = 13
      Caption = 'Space between the lines'
    end
    object LblUnitPercus: TLabel
      Left = 88
      Top = 44
      Width = 3
      Height = 13
      Caption = '-'
    end
    object Label86: TLabel
      Left = 13
      Top = 78
      Width = 46
      Height = 13
      Caption = 'Bars/staff'
    end
    object Bevel3: TBevel
      Left = 7
      Top = 9
      Width = 161
      Height = 133
      Shape = bsFrame
    end
    object SBPercus: TScrollBox
      Left = 181
      Top = 32
      Width = 136
      Height = 110
      HorzScrollBar.Visible = False
      VertScrollBar.Increment = 22
      VertScrollBar.Tracking = True
      BorderStyle = bsNone
      TabOrder = 3
    end
    object Panel1: TPanel
      Left = 181
      Top = 9
      Width = 30
      Height = 22
      Caption = 'Staff'
      TabOrder = 4
    end
    object Panel2: TPanel
      Left = 211
      Top = 9
      Width = 45
      Height = 22
      Caption = 'Nb lines'
      TabOrder = 5
    end
    object Panel3: TPanel
      Left = 256
      Top = 9
      Width = 61
      Height = 22
      Caption = 'Space after'
      TabOrder = 6
    end
    object EditEcLiPercus: TEdit
      Tag = 29
      Left = 15
      Top = 40
      Width = 68
      Height = 21
      TabOrder = 0
      OnKeyPress = EditDiagramKeyPress
    end
    object SEBarPercus: TSpinEdit
      Left = 82
      Top = 72
      Width = 57
      Height = 22
      EditorEnabled = False
      MaxValue = 20
      MinValue = 0
      TabOrder = 1
      Value = 0
      OnChange = SEBarPercusChange
    end
    object BtApplyPercus: TButton
      Tag = 29
      Left = 117
      Top = 40
      Width = 41
      Height = 22
      Caption = 'Apply'
      TabOrder = 7
      TabStop = False
      OnClick = BtApplyDiagramClick
    end
    object PanelKeyPercus: TPanel
      Left = 10
      Top = 100
      Width = 154
      Height = 41
      BevelOuter = bvNone
      TabOrder = 2
      object Label73: TLabel
        Left = 3
        Top = 3
        Width = 49
        Height = 13
        Caption = 'Space for '
      end
      object Label85: TLabel
        Left = 4
        Top = 16
        Width = 63
        Height = 13
        Caption = 'key signature'
      end
      object Label87: TLabel
        Left = 73
        Top = 26
        Width = 6
        Height = 13
        Caption = '0'
      end
      object Label89: TLabel
        Left = 106
        Top = 26
        Width = 6
        Height = 13
        Caption = '5'
      end
      object Label88: TLabel
        Left = 136
        Top = 26
        Width = 12
        Height = 13
        Caption = '10'
      end
      object TBKeyPercus: TTrackBar
        Left = 69
        Top = 6
        Width = 81
        Height = 20
        Orientation = trHorizontal
        Frequency = 1
        Position = 0
        SelEnd = 0
        SelStart = 0
        TabOrder = 0
        ThumbLength = 12
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = RefreshPreview
      end
    end
  end
  object PrinterSetupDialog: TPrinterSetupDialog
    Left = 16
    Top = 50
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Left = 392
    Top = 376
  end
  object SaveDialog: TSaveDialog
    DefaultExt = 'emf'
    Filter = 'Extended metafile (*.emf)|*.emf'
    Title = 'Save a graph paper as a metafile'
    Left = 352
    Top = 376
  end
  object TimerLB1: TTimer
    Enabled = False
    Interval = 200
    OnTimer = TimerLB1Timer
    Left = 16
    Top = 85
  end
end