Chip 1999 Extra/Chip_Extra_1999.iso/top50/graphpp/gpaper.exe/GraphPap.exe/0/RCDATA/TWINMAIN/TWINMAIN.txt

Text File | 1999-05-31 | 46.8 KB | 1,705 lines

object WinMain: TWinMain
  Left = 301
  Top = 27
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Graph paper printer 3.31'
  ClientHeight = 499
  ClientWidth = 622
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 352
    Top = 0
    Width = 270
    Height = 167
    TabOrder = 0
    object Shape4: TShape
      Left = 1
      Top = 1
      Width = 268
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label1: TLabel
      Left = 65
      Top = 3
      Width = 140
      Height = 13
      Caption = 'Definition of the diagram'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label22: TLabel
      Left = 9
      Top = 33
      Width = 73
      Height = 13
      Caption = '&Kind of diagram'
      FocusControl = CBPap
    end
    object CBPap: TComboBox
      Left = 96
      Top = 30
      Width = 153
      Height = 22
      Style = csOwnerDrawFixed
      DropDownCount = 12
      ItemHeight = 16
      TabOrder = 0
      OnChange = ChangePap
    end
    object PanelMercator: TPanel
      Left = 1
      Top = 61
      Width = 268
      Height = 100
      BevelOuter = bvNone
      TabOrder = 1
      object LblLatitude: TLabel
        Left = 8
        Top = 11
        Width = 84
        Height = 13
        Caption = 'Lat&itude (0 to 80�)'
        FocusControl = EditLatitude
      end
      object LblParal: TLabel
        Left = 159
        Top = 25
        Width = 79
        Height = 13
        Caption = 'P&arallels spacing'
        FocusControl = CBParall
      end
      object EditLatitude: TEdit
        Left = 24
        Top = 35
        Width = 49
        Height = 21
        TabOrder = 0
        Text = 'EditLatitude'
        OnExit = BtApplyLatitudeClick
      end
      object BtApplyLatitude: TButton
        Left = 14
        Top = 65
        Width = 75
        Height = 23
        Caption = 'Apply &latitude'
        TabOrder = 1
        TabStop = False
        OnClick = BtApplyLatitudeClick
      end
      object CBParall: TComboBox
        Left = 140
        Top = 53
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 11
        ItemHeight = 13
        TabOrder = 2
        OnChange = RefreshPreview
      end
    end
    object PanelCartesian: TPanel
      Left = 1
      Top = 62
      Width = 268
      Height = 100
      BevelOuter = bvNone
      TabOrder = 2
      object LblAbsc: TLabel
        Left = 30
        Top = 8
        Width = 42
        Height = 13
        Caption = '&Abscissa'
        FocusControl = CBAbsci
      end
      object LblOrdo: TLabel
        Left = 170
        Top = 8
        Width = 40
        Height = 13
        Caption = '&Ordinate'
        FocusControl = CBOrdi
      end
      object CBAbsci: TComboBox
        Left = 8
        Top = 30
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 30
        ItemHeight = 13
        TabOrder = 0
        OnChange = CBScaleAbsOrdChange
      end
      object CBOrdi: TComboBox
        Left = 140
        Top = 30
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 30
        ItemHeight = 13
        TabOrder = 1
        OnChange = CBScaleAbsOrdChange
      end
      object BtSubdiviCart: TButton
        Left = 64
        Top = 64
        Width = 145
        Height = 25
        Caption = 'Su&bdivide non linear scales'
        TabOrder = 2
        TabStop = False
        OnClick = BtSubdiviCartClick
      end
    end
    object PanelCustomGrid: TPanel
      Left = 1
      Top = 60
      Width = 268
      Height = 106
      BevelOuter = bvNone
      TabOrder = 3
      TabStop = True
      object Label16: TLabel
        Left = 8
        Top = 6
        Width = 127
        Height = 13
        Caption = '&Spacing between thin lines'
      end
      object Label17: TLabel
        Left = 224
        Top = 6
        Width = 16
        Height = 13
        Caption = 'mm'
      end
      object Label18: TLabel
        Left = 8
        Top = 30
        Width = 107
        Height = 13
        Caption = 'One medium line every'
      end
      object Label19: TLabel
        Left = 8
        Top = 53
        Width = 94
        Height = 13
        Caption = 'One thick line every'
      end
      object Label20: TLabel
        Left = 188
        Top = 30
        Width = 41
        Height = 13
        Caption = 'thin lines'
      end
      object Label21: TLabel
        Left = 186
        Top = 53
        Width = 60
        Height = 13
        Caption = 'medium lines'
      end
      object EditPas: TEdit
        Left = 144
        Top = 2
        Width = 72
        Height = 21
        TabOrder = 0
        Text = 'EditPas'
        OnExit = BtApplyCustomClick
      end
      object EditNbDivMid: TEdit
        Left = 144
        Top = 26
        Width = 33
        Height = 21
        TabOrder = 1
        Text = 'EditNbDivMid'
        OnExit = BtApplyCustomClick
      end
      object EditNbDivBig: TEdit
        Left = 144
        Top = 51
        Width = 33
        Height = 21
        TabOrder = 2
        Text = 'EditNbDivBig'
        OnExit = BtApplyCustomClick
      end
      object BtApplyCustom: TBitBtn
        Left = 64
        Top = 78
        Width = 137
        Height = 23
        Caption = 'Apply cust&om data'
        TabOrder = 3
        TabStop = False
        OnClick = BtApplyCustomClick
      end
    end
    object PanelTriang: TPanel
      Left = 1
      Top = 59
      Width = 268
      Height = 107
      Align = alBottom
      BevelOuter = bvNone
      Caption = 'PanelTriang'
      TabOrder = 4
      object LblScales: TLabel
        Left = 43
        Top = 42
        Width = 32
        Height = 13
        Caption = 'Sc&ales'
        FocusControl = CBTriang
      end
      object CBTriang: TComboBox
        Left = 105
        Top = 39
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 11
        ItemHeight = 13
        TabOrder = 0
        OnChange = RefreshPreview
      end
    end
    object PanelBee: TPanel
      Left = 1
      Top = 60
      Width = 268
      Height = 106
      BevelOuter = bvNone
      TabOrder = 5
      object Label31: TLabel
        Left = 50
        Top = 22
        Width = 65
        Height = 13
        Caption = 'Cells diamete&r'
        FocusControl = EditBee
      end
      object Label32: TLabel
        Left = 189
        Top = 23
        Width = 14
        Height = 13
        Caption = 'cm'
      end
      object EditBee: TEdit
        Left = 128
        Top = 17
        Width = 49
        Height = 21
        TabOrder = 0
        Text = 'EditBee'
        OnExit = BtApplyDiamBeeClick
      end
      object BtApplyDiamBee: TButton
        Left = 80
        Top = 60
        Width = 105
        Height = 25
        Caption = '&Apply diameter'
        TabOrder = 1
        OnClick = BtApplyDiamBeeClick
      end
    end
    object PanelAxono: TPanel
      Left = 1
      Top = 60
      Width = 268
      Height = 106
      BevelOuter = bvNone
      TabOrder = 6
      object Label26: TLabel
        Left = 9
        Top = 9
        Width = 63
        Height = 13
        Caption = 'Vertical sc&ale'
      end
      object Label28: TLabel
        Left = 9
        Top = 58
        Width = 18
        Height = 13
        Caption = 'Left'
      end
      object Label29: TLabel
        Left = 91
        Top = 58
        Width = 25
        Height = 13
        Caption = 'Right'
      end
      object LblAnglesLimites: TLabel
        Left = 8
        Top = 34
        Width = 179
        Height = 13
        Caption = 'Perspective angles (15 to 60 degrees)'
      end
      object Label30: TLabel
        Left = 32
        Top = 83
        Width = 195
        Height = 13
        Caption = '( vertical lines not shown on the preview )'
      end
      object CbAxono: TComboBox
        Left = 95
        Top = 5
        Width = 120
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 0
        OnChange = RefreshPreview
      end
      object EditLeftAngle: TEdit
        Left = 41
        Top = 54
        Width = 41
        Height = 21
        TabOrder = 1
        Text = 'EditLeftAngle'
        OnExit = BtApplyAnglesClick
      end
      object EditRightAngle: TEdit
        Left = 125
        Top = 54
        Width = 41
        Height = 21
        TabOrder = 2
        Text = 'EditRightAngle'
        OnExit = BtApplyAnglesClick
      end
      object BtApplyAngles: TButton
        Left = 183
        Top = 52
        Width = 75
        Height = 25
        Caption = 'Apply &angles'
        TabOrder = 3
        TabStop = False
        OnClick = BtApplyAnglesClick
      end
    end
    object PanelMusic: TPanel
      Left = 1
      Top = 59
      Width = 268
      Height = 107
      BevelOuter = bvNone
      TabOrder = 7
      object Label12: TLabel
        Left = 8
        Top = 8
        Width = 64
        Height = 13
        Caption = 'Staves/score'
      end
      object LblStave12: TLabel
        Left = 135
        Top = 55
        Width = 68
        Height = 13
        Caption = 'Staff 1- Staff 2'
      end
      object LblStave23: TLabel
        Left = 136
        Top = 81
        Width = 60
        Height = 13
        Caption = 'Other staves'
      end
      object Label13: TLabel
        Left = 135
        Top = 29
        Width = 76
        Height = 13
        Caption = 'Between scores'
      end
      object Label24: TLabel
        Left = 134
        Top = 5
        Width = 125
        Height = 13
        Caption = 'Distances (in lines spaces)'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
      end
      object Label14: TLabel
        Left = 11
        Top = 32
        Width = 46
        Height = 13
        Caption = 'Bars/staff'
      end
      object RGLineSpace: TRadioGroup
        Left = 8
        Top = 53
        Width = 112
        Height = 49
        Caption = ' Lines space (mm) '
        Columns = 2
        ItemIndex = 1
        Items.Strings = (
          '1.5'
          '2.0'
          '2.5'
          '3.0')
        TabOrder = 2
        OnClick = RefreshPreview
      end
      object SEStavesOnScore: TSpinEdit
        Left = 79
        Top = 2
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 12
        MinValue = 1
        TabOrder = 0
        Value = 4
        OnChange = SEStavesOnScoreChange
      end
      object SEStave12: TSpinEdit
        Left = 221
        Top = 50
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 40
        MinValue = 2
        TabOrder = 4
        Value = 7
        OnChange = RefreshPreview
      end
      object SEStave23: TSpinEdit
        Left = 221
        Top = 77
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 20
        MinValue = 2
        TabOrder = 5
        Value = 3
        OnChange = RefreshPreview
      end
      object SEDistScores: TSpinEdit
        Left = 221
        Top = 24
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 50
        MinValue = 2
        TabOrder = 3
        Value = 4
        OnChange = RefreshPreview
      end
      object SEBars: TSpinEdit
        Left = 79
        Top = 29
        Width = 41
        Height = 22
        EditorEnabled = False
        MaxValue = 20
        MinValue = 1
        TabOrder = 1
        Value = 4
        OnChange = RefreshPreview
      end
    end
    object PanelWeibull: TPanel
      Left = 1
      Top = 57
      Width = 268
      Height = 109
      BevelOuter = bvNone
      TabOrder = 8
      object Label33: TLabel
        Left = 12
        Top = 20
        Width = 104
        Height = 13
        Caption = 'Number of data p&oints'
        FocusControl = EditNbreWeibull
      end
      object Label34: TLabel
        Left = 12
        Top = 51
        Width = 113
        Height = 13
        Caption = 'Abscissa range (li&fetime)'
        FocusControl = CBWeibull
      end
      object CBWeibull: TComboBox
        Left = 136
        Top = 48
        Width = 105
        Height = 21
        ItemHeight = 13
        TabOrder = 1
        OnChange = RefreshPreview
      end
      object EditNbreWeibull: TEdit
        Left = 136
        Top = 17
        Width = 34
        Height = 21
        TabOrder = 0
        Text = '100'
        OnExit = BtApplyWeibullClick
      end
      object BtSubDivWeib: TButton
        Left = 20
        Top = 78
        Width = 147
        Height = 25
        Caption = 'Su&bdivide non linear scales'
        TabOrder = 2
        TabStop = False
        OnClick = BtSubdiviCartClick
      end
      object BtApplyWeibull: TButton
        Left = 181
        Top = 16
        Width = 75
        Height = 25
        Caption = '&Apply number'
        TabOrder = 3
        TabStop = False
        OnClick = BtApplyWeibullClick
      end
      object BtHelpWeibull: TBitBtn
        Left = 184
        Top = 78
        Width = 75
        Height = 25
        Caption = '&Weibull'
        TabOrder = 4
        TabStop = False
        OnClick = BtHelpWeibullClick
        Kind = bkHelp
      end
    end
    object PanelPolar: TPanel
      Left = 1
      Top = 58
      Width = 268
      Height = 108
      BevelOuter = bvNone
      TabOrder = 9
      object LblRadial: TLabel
        Left = 30
        Top = 4
        Width = 58
        Height = 13
        Caption = '&Radial scale'
        FocusControl = CBRadial
      end
      object LblAngle: TLabel
        Left = 170
        Top = 4
        Width = 55
        Height = 13
        Caption = '&Angle scale'
        FocusControl = CBPolar
      end
      object LblIncrGradu: TLabel
        Left = 6
        Top = 50
        Width = 107
        Height = 13
        Caption = 'Increasing graduations'
        Visible = False
      end
      object CBPolar: TComboBox
        Left = 140
        Top = 22
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 13
        ItemHeight = 13
        TabOrder = 1
        OnChange = CBScalePolarChange
      end
      object CBRadial: TComboBox
        Left = 8
        Top = 22
        Width = 120
        Height = 21
        Style = csDropDownList
        Color = clWhite
        DropDownCount = 30
        ItemHeight = 13
        TabOrder = 0
        OnChange = CBScalePolarChange
      end
      object BtSubDiviPol: TButton
        Left = 123
        Top = 65
        Width = 138
        Height = 25
        Caption = 'Su&bdivide non linear scales'
        TabOrder = 2
        TabStop = False
        Visible = False
        OnClick = BtSubdiviCartClick
      end
      object RBDebutLogCenter: TRadioButton
        Left = 9
        Top = 67
        Width = 113
        Height = 17
        Caption = 'Center to outside'
        Checked = True
        TabOrder = 3
        TabStop = True
        Visible = False
        OnClick = RBDebutLogPolarClick
      end
      object RBDebutLogOutside: TRadioButton
        Left = 9
        Top = 86
        Width = 113
        Height = 16
        Caption = 'Outside to center'
        TabOrder = 4
        Visible = False
        OnClick = RBDebutLogPolarClick
      end
    end
  end
  object Panel4: TPanel
    Left = 352
    Top = 167
    Width = 270
    Height = 231
    TabOrder = 1
    object Shape5: TShape
      Left = 1
      Top = 1
      Width = 268
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label7: TLabel
      Left = 35
      Top = 3
      Width = 221
      Height = 13
      Caption = 'Diagram size and position on the sheet'
      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 = 10
      Top = 158
      Width = 43
      Height = 62
      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
      OnClick = BtLoupeClick
    end
    object Button1: TButton
      Left = 62
      Top = 158
      Width = 96
      Height = 25
      Hint = 'diagram in the center of the page'
      Caption = 'Center &vertically'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      TabStop = False
      OnClick = BtCentrerVClick
    end
    object Button2: TButton
      Left = 62
      Top = 195
      Width = 96
      Height = 25
      Hint = 'diagram in the center of the page'
      Caption = 'Center hori&zontally'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      TabStop = False
      OnClick = BtCentrerHClick
    end
    object BtFullPaper: TButton
      Left = 166
      Top = 158
      Width = 96
      Height = 25
      Hint = 'no margins'
      Caption = '&Full paper'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      TabStop = False
      OnClick = BtFullPaperClick
    end
    object GroupBox2: TGroupBox
      Left = 10
      Top = 32
      Width = 121
      Height = 114
      Caption = ' Margins (cm) '
      TabOrder = 0
      object Label4: TLabel
        Left = 16
        Top = 53
        Width = 33
        Height = 13
        Caption = 'Bottom'
        FocusControl = EditBMargin
      end
      object Label5: TLabel
        Left = 16
        Top = 28
        Width = 21
        Height = 13
        Caption = 'Left '
        FocusControl = EditLMargin
      end
      object EditBMargin: TEdit
        Left = 56
        Top = 50
        Width = 49
        Height = 21
        TabOrder = 1
        Text = 'EditBMargin'
        OnExit = BtApplyMarginsClick
      end
      object EditLMargin: TEdit
        Left = 56
        Top = 23
        Width = 49
        Height = 21
        TabOrder = 0
        Text = 'EditLMargin'
        OnExit = BtApplyMarginsClick
      end
      object BtApplyMargins: TBitBtn
        Left = 23
        Top = 80
        Width = 75
        Height = 25
        Caption = 'Apply &margins'
        TabOrder = 2
        TabStop = False
        OnClick = BtApplyMarginsClick
      end
    end
    object BtStdSize: TButton
      Left = 166
      Top = 196
      Width = 96
      Height = 25
      Hint = 'default margins'
      Caption = 'Stan&dard margins'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      TabStop = False
      OnClick = BtStdSizeClick
    end
  end
  object Panel6: TPanel
    Left = 451
    Top = 399
    Width = 171
    Height = 100
    TabOrder = 2
    object Shape12: TShape
      Left = 1
      Top = 1
      Width = 169
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label27: TLabel
      Left = 32
      Top = 4
      Width = 108
      Height = 13
      Caption = 'General commands'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtAbout: TButton
      Left = 17
      Top = 29
      Width = 63
      Height = 25
      Caption = 'Abo&ut'
      TabOrder = 0
      TabStop = False
      OnClick = BtAboutClick
    end
    object BtHelp: TBitBtn
      Left = 92
      Top = 29
      Width = 63
      Height = 25
      TabOrder = 1
      TabStop = False
      OnClick = BtHelpClick
      Kind = bkHelp
    end
    object BtSetup: TButton
      Left = 17
      Top = 68
      Width = 63
      Height = 25
      Hint = 'on the desktop or in the start menu'
      Caption = 'S&hortcuts'
      TabOrder = 2
      TabStop = False
      OnClick = BtSetupClick
    end
    object BtExit: TBitBtn
      Left = 92
      Top = 68
      Width = 63
      Height = 25
      Caption = 'E&xit'
      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
  end
  object Panel2: TPanel
    Left = 0
    Top = 399
    Width = 171
    Height = 100
    TabOrder = 3
    object Shape1: TShape
      Left = 51
      Top = 54
      Width = 20
      Height = 10
      Shape = stEllipse
    end
    object Shape2: TShape
      Left = 98
      Top = 54
      Width = 20
      Height = 10
      Shape = stEllipse
    end
    object Shape3: TShape
      Left = 142
      Top = 54
      Width = 20
      Height = 10
      Shape = stEllipse
    end
    object LblEpBig: TLabel
      Left = 44
      Top = 38
      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 LblEpMiddle: TLabel
      Left = 91
      Top = 38
      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 LblEpSmall: TLabel
      Left = 136
      Top = 38
      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 Label2: TLabel
      Left = 46
      Top = 22
      Width = 27
      Height = 13
      Caption = 'Thick'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsUnderline]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 92
      Top = 22
      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 Label6: TLabel
      Left = 140
      Top = 22
      Width = 21
      Height = 13
      Caption = 'Thin'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsUnderline]
      ParentFont = False
    end
    object Label10: TLabel
      Left = 7
      Top = 37
      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 Label11: TLabel
      Left = 7
      Top = 52
      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 Label9: TLabel
      Left = 8
      Top = 22
      Width = 25
      Height = 13
      Caption = 'Lines'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Shape9: TShape
      Left = 1
      Top = 1
      Width = 169
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object LblSetLine: TLabel
      Left = 8
      Top = 4
      Width = 155
      Height = 15
      Alignment = taCenter
      AutoSize = False
      Caption = 'Style of lines '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtLineColors: TButton
      Left = 56
      Top = 70
      Width = 57
      Height = 25
      Hint = 'color and width of lines'
      Caption = 'Cha&nge'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnClick = BtLineColorsClick
    end
  end
  object Panel11: TPanel
    Left = 0
    Top = 0
    Width = 352
    Height = 398
    BorderWidth = 1
    Caption = 'Panel11'
    TabOrder = 4
    object Shape6: TShape
      Left = 2
      Top = 2
      Width = 348
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object LblPreview: TLabel
      Left = 135
      Top = 4
      Width = 82
      Height = 13
      Caption = 'Sheet preview'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Feuille: TPanel
      Left = 74
      Top = 69
      Width = 215
      Height = 282
      BevelOuter = bvNone
      Color = clWhite
      TabOrder = 0
      object PBox: TPaintBox
        Left = 0
        Top = 0
        Width = 215
        Height = 282
        Align = alClient
        Color = clSilver
        ParentColor = False
        OnMouseDown = PBoxMouseDown
        OnMouseMove = PBoxMouseMove
        OnMouseUp = PBoxMouseUp
        OnPaint = PBoxPaint
      end
    end
  end
  object PanelWidthHeight: TPanel
    Left = 491
    Top = 192
    Width = 127
    Height = 120
    BevelOuter = bvNone
    TabOrder = 5
    object GroupBox3: TGroupBox
      Left = 2
      Top = 7
      Width = 121
      Height = 113
      Caption = '  Size  (cm) '
      TabOrder = 0
      object LblWidth: TLabel
        Left = 11
        Top = 26
        Width = 28
        Height = 13
        Caption = 'Width'
        FocusControl = EditWidth
      end
      object LblHeight: TLabel
        Left = 11
        Top = 53
        Width = 31
        Height = 13
        Caption = 'Height'
        FocusControl = EditHeight
      end
      object EditWidth: TEdit
        Left = 56
        Top = 23
        Width = 49
        Height = 21
        TabOrder = 0
        Text = 'EditWidth'
        OnExit = BtSizeClick
      end
      object EditHeight: TEdit
        Left = 56
        Top = 50
        Width = 49
        Height = 21
        TabOrder = 1
        Text = 'EditHeight'
        OnExit = BtSizeClick
      end
      object BtSizeRect: TBitBtn
        Left = 23
        Top = 79
        Width = 75
        Height = 25
        Caption = 'Apply &size'
        TabOrder = 2
        TabStop = False
        OnClick = BtSizeClick
      end
    end
  end
  object PanelDiam: TPanel
    Left = 488
    Top = 192
    Width = 129
    Height = 131
    BevelOuter = bvNone
    TabOrder = 6
    object GroupBox1: TGroupBox
      Left = 4
      Top = 7
      Width = 121
      Height = 114
      Caption = '  Size  (cm) '
      TabOrder = 0
      object LblDiam: TLabel
        Left = 11
        Top = 35
        Width = 42
        Height = 13
        Caption = 'Diame&ter'
        FocusControl = EditDiam
      end
      object EditDiam: TEdit
        Left = 56
        Top = 32
        Width = 49
        Height = 21
        TabOrder = 0
        Text = 'EditDiam'
        OnExit = BtSizeClick
      end
      object BtSizeCircle: TBitBtn
        Left = 23
        Top = 76
        Width = 75
        Height = 25
        Caption = 'Apply &size'
        TabOrder = 1
        TabStop = False
        OnClick = BtSizeClick
      end
    end
  end
  object PanelCoteTri: TPanel
    Left = 492
    Top = 191
    Width = 121
    Height = 129
    BevelOuter = bvNone
    TabOrder = 7
    object GroupBox4: TGroupBox
      Left = 0
      Top = 8
      Width = 121
      Height = 114
      Caption = '  Size  (cm) '
      TabOrder = 0
      object Label15: TLabel
        Left = 5
        Top = 33
        Width = 53
        Height = 13
        Caption = 'Si&de length'
        FocusControl = EditCote
      end
      object EditCote: TEdit
        Left = 64
        Top = 30
        Width = 49
        Height = 21
        TabOrder = 0
        OnExit = BtSizeClick
      end
      object BtSizeTriang: TBitBtn
        Left = 23
        Top = 73
        Width = 75
        Height = 25
        Caption = 'Apply &size'
        TabOrder = 1
        TabStop = False
        OnClick = BtSizeClick
      end
    end
  end
  object Panel3: TPanel
    Left = 171
    Top = 399
    Width = 140
    Height = 100
    TabOrder = 8
    object Shape8: TShape
      Left = 16
      Top = 25
      Width = 108
      Height = 36
      Brush.Color = clInfoBk
    end
    object LblHPaper: TLabel
      Left = 28
      Top = 44
      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 LblWPaper: TLabel
      Left = 28
      Top = 28
      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 Shape10: TShape
      Left = 1
      Top = 1
      Width = 138
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label25: TLabel
      Left = 36
      Top = 4
      Width = 73
      Height = 13
      Caption = 'Printer setup'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtSetupPrn: TButton
      Left = 12
      Top = 68
      Width = 43
      Height = 25
      Hint = 'paper size and orientation, printer properties'
      Caption = 'S&etup'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnClick = BtSetupPrnClick
    end
    object BtAccuracy: TButton
      Left = 63
      Top = 68
      Width = 65
      Height = 25
      Hint = 'correction +/- 1% for exact divisions'
      Caption = 'Accurac&y'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      TabStop = False
      OnClick = BtAccuracyClick
    end
  end
  object Panel5: TPanel
    Left = 311
    Top = 399
    Width = 140
    Height = 100
    TabOrder = 9
    object Shape7: TShape
      Left = 1
      Top = 1
      Width = 138
      Height = 20
      Align = alTop
      Brush.Color = clNavy
    end
    object Label23: TLabel
      Left = 23
      Top = 4
      Width = 94
      Height = 13
      Caption = 'Print / Clipboard'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object BtImprime: TSpeedButton
      Left = 13
      Top = 68
      Width = 61
      Height = 25
      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 = False
      OnClick = BtImprimerClick
    end
    object RBA4: TRadioButton
      Left = 25
      Top = 25
      Width = 77
      Height = 17
      Caption = 'Real scale'
      TabOrder = 0
      OnClick = RBA4Click
    end
    object RBA3: TRadioButton
      Left = 25
      Top = 44
      Width = 75
      Height = 17
      Caption = 'A4 --> A3'
      TabOrder = 1
      OnClick = RBA3Click
    end
    object BtCopy: TButton
      Left = 86
      Top = 68
      Width = 44
      Height = 25
      Hint = 'diagram without margins to the clipboard'
      Caption = '&Copy'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      TabStop = False
      OnClick = BtCopyClick
    end
  end
  object PrintDialog: TPrintDialog
    Left = 24
    Top = 144
  end
  object PrinterSetupDialog: TPrinterSetupDialog
    Left = 24
    Top = 192
  end
end