drawing_window.dfm

object Form2: TForm2
  Left = 0
  Top = 0
  Cursor = crCross
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSizeToolWin
  Caption = 'Drawing'
  ClientHeight = 563
  ClientWidth = 856
  Color = clBtnFace
  Constraints.MaxHeight = 800
  Constraints.MaxWidth = 1200
  Constraints.MinHeight = 240
  Constraints.MinWidth = 320
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnMouseWheel = FormMouseWheel
  OnPaint = FormPaint
  OnResize = FormResize
  DesignSize = (
    856
    563)
  PixelsPerInch = 96
  TextHeight = 13
  object DrawingBox: TPaintBox
    Left = 0
    Top = 0
    Width = 857
    Height = 565
    Hint = 'Milling View - Drag with left-click or modify with right-click'
    Anchors = [akLeft, akTop, akRight, akBottom]
    Color = clCream
    DragCursor = crSizeAll
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    OnMouseDown = DrawingBoxMouseDown
    OnMouseMove = DrawingBoxMouseMove
    OnMouseUp = DrawingBoxMouseUp
    ExplicitWidth = 865
    ExplicitHeight = 625
  end
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 132
    Height = 177
    Align = alCustom
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 160
      Width = 78
      Height = 13
      Caption = 'Grid/Ruler in mm'
    end
    object BtnZoomReset: TButton
      Left = 16
      Top = 129
      Width = 97
      Height = 24
      HelpType = htKeyword
      HelpKeyword = 'Reset zoom and pan'
      Caption = 'Zoom Reset'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      TabStop = False
      OnClick = BtnZoomResetClick
    end
    object TrackBarZoom: TTrackBar
      Left = 0
      Top = 88
      Width = 129
      Height = 20
      Hint = 'View zoom - disabled when camera ON'
      Max = 50
      Min = 1
      PageSize = 1
      Position = 4
      TabOrder = 1
      TabStop = False
      TickStyle = tsNone
      OnChange = TrackBarZoomChange
    end
    object CheckBoxDimensions: TCheckBox
      Left = 8
      Top = 8
      Width = 121
      Height = 17
      Caption = 'Show Dimensions'
      TabOrder = 2
      OnClick = CheckBoxDimensionsClick
    end
    object CheckBoxDirections: TCheckBox
      Left = 8
      Top = 32
      Width = 105
      Height = 17
      Caption = 'Show Directions'
      TabOrder = 3
      OnClick = CheckBoxDirectionsClick
    end
    object StaticText2: TStaticText
      Left = 8
      Top = 108
      Width = 10
      Height = 17
      Caption = '1'
      TabOrder = 4
    end
    object StaticText3: TStaticText
      Left = 112
      Top = 108
      Width = 16
      Height = 17
      Caption = '50'
      TabOrder = 5
    end
    object CheckBoxToolpath: TCheckBox
      Left = 8
      Top = 56
      Width = 121
      Height = 17
      Caption = 'Show Tool Path'
      Checked = True
      State = cbChecked
      TabOrder = 6
      OnClick = CheckBoxDirectionsClick
    end
  end
  object PopupMenuObject: TPopupMenu
    Left = 1120
    Top = 8
    object pu_ObjectEnabled: TMenuItem
      Caption = 'Object Enabled'
      Checked = True
      OnClick = pu_ObjectenabledClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object pu_online: TMenuItem
      AutoCheck = True
      Caption = 'Contour'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object pu_inside: TMenuItem
      Tag = 1
      AutoCheck = True
      Caption = 'Inside'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object pu_outside: TMenuItem
      Tag = 2
      AutoCheck = True
      Caption = 'Outside'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object pu_pocket: TMenuItem
      Tag = 3
      AutoCheck = True
      Caption = 'Pocket'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object Drill1: TMenuItem
      Caption = 'Drill'
      GroupIndex = 2
      OnClick = pu_radioClick
    end
    object N2: TMenuItem
      Caption = '-'
      GroupIndex = 2
    end
    object pu_isatCenter1: TMenuItem
      Caption = 'Tool is above Object Center'
      GroupIndex = 2
      RadioItem = True
      OnClick = pu_toolIsAtCenterClick
    end
    object pu_camIsAtCenter: TMenuItem
      Caption = 'Cam is above Object Center'
      GroupIndex = 2
      RadioItem = True
      OnClick = pu_camIsAtCenterClick
    end
    object N3: TMenuItem
      Caption = '-'
      GroupIndex = 2
    end
    object pu_moveCenter1: TMenuItem
      Caption = 'Move Tool to Object Center'
      GroupIndex = 2
      OnClick = pu_moveToolToCenterClick
    end
    object pu_moveCamToCenter: TMenuItem
      Caption = 'Move Cam to Object Center'
      GroupIndex = 2
      OnClick = pu_moveCamToCenterClick
    end
  end
  object PopupMenuPart: TPopupMenu
    AutoPopup = False
    Left = 168
    Top = 16
    object pu_isAtZero2: TMenuItem
      Caption = 'Tool is above Part Zero'
      GroupIndex = 3
      RadioItem = True
      OnClick = pu_toolisAtPartZeroClick
    end
    object pu_camIsAtZero2: TMenuItem
      Caption = 'Cam is above Part Zero'
      GroupIndex = 3
      RadioItem = True
      OnClick = pu_camIsAtPartZeroClick
    end
    object N5: TMenuItem
      Caption = '-'
      GroupIndex = 3
    end
    object pu_moveZero2: TMenuItem
      Caption = 'Move Tool to Part Zero'
      GroupIndex = 3
      RadioItem = True
      OnClick = pu_moveToolToPartZeroClick
    end
    object pu_moveCamToZero2: TMenuItem
      Caption = 'Move Cam to Part Zero'
      GroupIndex = 3
      RadioItem = True
      OnClick = pu_moveCamToPartZeroClick
    end
  end
  object PopupMenuPoint: TPopupMenu
    AutoPopup = False
    Left = 1120
    Top = 8
    object pu_PointEnabled: TMenuItem
      Caption = 'Path Enabled'
      Checked = True
      OnClick = pu_PathEnabledClick
    end
    object MenuItem2: TMenuItem
      Caption = '-'
    end
    object MenuItem3: TMenuItem
      AutoCheck = True
      Caption = 'Contour'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object MenuItem4: TMenuItem
      Tag = 1
      AutoCheck = True
      Caption = 'Inside'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object MenuItem5: TMenuItem
      Tag = 2
      AutoCheck = True
      Caption = 'Outside'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object MenuItem6: TMenuItem
      Tag = 3
      AutoCheck = True
      Caption = 'Pocket'
      GroupIndex = 1
      OnClick = pu_radioClick
    end
    object MenuItem7: TMenuItem
      Caption = 'Drill'
      GroupIndex = 2
      OnClick = pu_radioClick
    end
    object MenuItem8: TMenuItem
      Caption = '-'
      GroupIndex = 2
    end
    object MenuItem10: TMenuItem
      Caption = 'Tool is above Point'
      GroupIndex = 2
      RadioItem = True
      OnClick = pu_toolisatpointClick
    end
    object MenuItem18: TMenuItem
      Caption = 'Cam is above Point'
      GroupIndex = 2
      RadioItem = True
      OnClick = pu_camIsAtPointClick
    end
    object MenuItem12: TMenuItem
      Caption = '-'
      GroupIndex = 2
    end
    object pu_MoveToPoint: TMenuItem
      Caption = 'Move Tool to Point'
      GroupIndex = 2
      OnClick = pu_moveToolToPointClick
    end
    object pu_MoveCamToPoint: TMenuItem
      Caption = 'Move Cam to Point'
      GroupIndex = 2
      OnClick = pu_moveCamToPointClick
    end
  end
end