object Form1: TForm1
  Left = 16
  Top = 75
  Width = 1022
  Height = 588
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PowerCad1: TPowerCad
    Left = 193
    Top = 0
    Width = 821
    Height = 561
    RulerVisible = True
    RulerSystem = rsMetric
    VerticalZero = vzTop
    HorizontalZero = vzLeft
    Align = alClient
    OnKeyDown = PowerCad1KeyDown
    OnKeyUp = PowerCad1KeyUp
    ZoomScale = 100
    GuidesVisible = True
    BackGround = clWhite
    PageColor = clWhite
    Grids = True
    GridType = grtLine
    CenterGuide = False
    DrawShadow = True
    GridColor = clSilver
    GuideColor = clGreen
    RulerColor = clSilver
    GridStep = 2
    WorkHeight = 150
    WorkWidth = 180
    PageLayout = plCustom
    PageOrient = poLandscape
    GuideTrace = gtNone
    SnapToGuides = False
    SnapToNearPoint = False
    SnapToGrids = True
    ScrollBars = True
    OnSurfaceMove = PowerCad1SurfaceMove
    DefaultPenColor = clBlack
    DefaultBrushColor = clBlue
    DefaultPenWidth = 3
    DefaultPenStyle = psSolid
    DefaultBrushStyle = bsClear
    DefaultRowStyle = rsNone
    DefaultTextHeight = 10
    DefaultPLineClosed = False
    DefaultArcStyle = asOpen
    MapScale = 1
    RescaleToMap = rsNever
    AutoSelect = True
    KeyCommands = True
    RecordUndo = True
    UndoCount = 24
    SaveWithPreview = True
    RulerMode = rmPage
    OnFigureMoved = PowerCad1FigureMoved
    OnBeforeDelete = PowerCad1BeforeDelete
    MouseCommands = True
    PopStyle = psStandart
    OnGUIEvent = PowerCad1GUIEvent
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 193
    Height = 561
    Align = alLeft
    TabOrder = 1
    object Bevel1: TBevel
      Left = 1
      Top = 328
      Width = 191
      Height = 7
      Shape = bsTopLine
      Style = bsRaised
    end
    object Label1: TLabel
      Left = 8
      Top = 448
      Width = 32
      Height = 16
      Caption = 'GAP'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 475
      Width = 32
      Height = 16
      Caption = 'Num'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 123
      Top = 152
      Width = 33
      Height = 13
      Caption = 'Angle'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object bOrthoLine: TButton
      Left = 8
      Top = 82
      Width = 105
      Height = 30
      Caption = 'OrthoLine'
      TabOrder = 0
      OnClick = bOrthoLineClick
    end
    object bSelected: TButton
      Left = 8
      Top = 42
      Width = 105
      Height = 30
      Caption = 'Selected'
      TabOrder = 1
      OnClick = bSelectedClick
    end
    object cbAngle: TComboBox
      Left = 120
      Top = 170
      Width = 65
      Height = 21
      ItemHeight = 13
      TabOrder = 2
      Text = '45'
      OnChange = cbAngleChange
      Items.Strings = (
        '15'
        '30'
        '45'
        '60'
        '90'
        '180')
    end
    object bDuplicate: TButton
      Left = 120
      Top = 42
      Width = 65
      Height = 71
      Caption = 'Duplicate'
      TabOrder = 3
      OnClick = bDuplicateClick
    end
    object bNormal: TButton
      Left = 8
      Top = 122
      Width = 105
      Height = 30
      Caption = 'FigureGroup'
      TabOrder = 4
      OnClick = bNormalClick
    end
    object bbComp: TBitBtn
      Left = 8
      Top = 200
      Width = 89
      Height = 113
      TabOrder = 5
      OnClick = bbCompClick
      Glyph.Data = {
[encoded data, 30660 characters]
        FFFFFFFFFFFFFF000000}
      Layout = blGlyphTop
      Style = bsNew
    end
    object bbServer: TBitBtn
      Left = 96
      Top = 200
      Width = 89
      Height = 113
      TabOrder = 6
      OnClick = bbServerClick
      Glyph.Data = {
[encoded data, 46501 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      Style = bsNew
    end
    object bSetScale: TButton
      Left = 88
      Top = 345
      Width = 97
      Height = 25
      Caption = 'MapScale'
      TabOrder = 7
      OnClick = bSetScaleClick
    end
    object bLineTest: TButton
      Left = 8
      Top = 8
      Width = 81
      Height = 25
      Caption = 'Line'
      TabOrder = 8
      OnClick = bLineTestClick
    end
    object bRectTest: TButton
      Left = 96
      Top = 8
      Width = 89
      Height = 25
      Caption = 'Rect'
      TabOrder = 9
      OnClick = bRectTestClick
    end
    object bDisconnect: TButton
      Left = 8
      Top = 384
      Width = 89
      Height = 49
      Caption = 'Disconnect!'
      TabOrder = 10
      OnClick = bDisconnectClick
    end
    object bDivideLine: TButton
      Left = 96
      Top = 384
      Width = 89
      Height = 49
      Caption = 'DivideLine!'
      TabOrder = 11
      OnClick = bDivideLineClick
    end
    object Memo2: TMemo
      Left = 51
      Top = 443
      Width = 134
      Height = 25
      TabOrder = 12
      OnChange = Memo2Change
    end
    object Memo3: TMemo
      Left = 51
      Top = 473
      Width = 134
      Height = 25
      TabOrder = 13
      OnChange = Memo2Change
    end
    object Button3: TButton
      Left = 8
      Top = 504
      Width = 75
      Height = 25
      Caption = 'Button3'
      TabOrder = 14
      Visible = False
      OnClick = Button3Click
    end
    object Button1: TButton
      Left = 8
      Top = 528
      Width = 75
      Height = 25
      Caption = 'Save'
      TabOrder = 15
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 82
      Top = 528
      Width = 75
      Height = 25
      Caption = 'Load'
      TabOrder = 16
      OnClick = Button2Click
    end
    object Button4: TButton
      Left = 82
      Top = 504
      Width = 75
      Height = 25
      Caption = 'Test'
      TabOrder = 17
      OnClick = Button4Click
    end
    object ComboBox1: TComboBox
      Left = 8
      Top = 560
      Width = 145
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 18
      Text = 'otClear'
      Items.Strings = (
        'otClear'
        'otWA'
        'otServer')
    end
    object Button5: TButton
      Left = 10
      Top = 584
      Width = 75
      Height = 25
      Caption = 'LoadBlock'
      TabOrder = 19
      OnClick = Button5Click
    end
  end
  object Memo1: TMemo
    Left = 184
    Top = 40
    Width = 185
    Height = 153
    Lines.Strings = (
      'Memo1')
    TabOrder = 2
    Visible = False
  end
end
