CentrED/Client/UfrmRegionControl.lfm

object frmRegionControl: TfrmRegionControl
  Left = 247
  Height = 413
  Top = 139
  Width = 620
  ActiveControl = Panel1
  Caption = 'Region Control'
  ClientHeight = 413
  ClientWidth = 620
  Font.Height = -11
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  Position = poOwnerFormCenter
  ShowInTaskBar = stAlways
  LCLVersion = '0.9.27'
  object Panel1: TPanel
    Left = 0
    Height = 380
    Top = 0
    Width = 160
    Align = alLeft
    ClientHeight = 380
    ClientWidth = 160
    TabOrder = 0
    object Label1: TLabel
      Left = 5
      Height = 14
      Top = 176
      Width = 150
      Align = alTop
      BorderSpacing.Left = 4
      BorderSpacing.Right = 4
      Caption = 'Area:'
      ParentColor = False
    end
    object pnlAreaControls: TPanel
      Left = 5
      Height = 82
      Top = 293
      Width = 150
      Align = alBottom
      BorderSpacing.Around = 4
      BevelOuter = bvNone
      ClientHeight = 82
      ClientWidth = 150
      TabOrder = 0
      object lblX: TLabel
        Left = 4
        Height = 13
        Top = 32
        Width = 8
        Caption = 'X'
        Enabled = False
        ParentColor = False
      end
      object lblY: TLabel
        Left = 4
        Height = 13
        Top = 60
        Width = 8
        Caption = 'Y'
        Enabled = False
        ParentColor = False
      end
      object btnAddArea: TSpeedButton
        Left = 30
        Height = 22
        Hint = 'Add area'
        Top = 0
        Width = 23
        Color = clBtnFace
        Enabled = False
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000064000000640000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000003A8C44FF368940FF32873CFF2F84
          37FF000000000000000000000000000000000000000000000000000000000000
          00000000000000000000459653FF419950FF7DC28FFF96D0A6FF96CFA6FF78BE
          89FF368D42FF2C8134FF00000000000000000000000000000000000000000000
          0000000000004D9C5DFF64B478FFA8DBB5FF87CC98FF66BC7DFF64BA7CFF86CB
          98FFA5D9B4FF58AA6BFF2C8134FF000000000000000000000000000000000000
          000056A366FF6AB97DFFA8DBB2FF60BC77FF5CBA73FF59B870FF59B56FFF58B5
          6FFF5BB774FFA5D9B3FF5AAA6CFF2C8234FF0000000000000000000000000000
          000053AB68FFAADDB4FF64C179FF5FBE71FF60BC77FFFFFFFFFFFFFFFFFF59B8
          70FF58B56EFF5CB774FFA6DAB4FF388F43FF00000000000000000000000061AC
          75FF8ACC98FF89D396FF6BC67AFF63C170FF55AB65FFFFFFFFFFFFFFFFFF59B8
          70FF59B870FF5BB972FF85CC97FF7BBE8DFF308539FF000000000000000065AF
          7AFFA9DDB3FF7DCF8AFF75CC81FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFF59B870FF67BE7DFF9CD4ABFF34883DFF000000000000000069B2
          7EFFB6E2BEFF8BD597FF7AC986FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFF59B870FF69C17EFF9DD4AAFF388B42FF00000000000000006DB5
          83FFACDDB6FFA6DFAFFF81CB8CFF7CC986FF6EBD79FFFFFFFFFFFFFFFFFF5BAC
          6AFF60BC77FF5CBA73FF8BD199FF80C592FF3C8E47FF00000000000000000000
          000085C797FFD2EED7FF95D9A0FF8AD394FF7FC889FFFFFFFFFFFFFFFFFF79CD
          85FF6BC37CFF6FC77EFFACDFB5FF459E57FF0000000000000000000000000000
          000070B887FFAADAB7FFD8F1DCFF92D89DFF88CD93FF84CC8EFF8BD496FF8AD4
          95FF83D28EFFAFE0B7FF6BB97DFF489856FF0000000000000000000000000000
          00000000000070B887FFAFDCBBFFDCF2E0FFB6E4BDFF9BDBA5FF96D9A0FFA5DF
          AFFFC0E8C5FF79C28AFF509E5FFF000000000000000000000000000000000000
          0000000000000000000071B887FF94CEA4FFC3E6CBFFCFEBD4FFC9E9CEFFAFDD
          B8FF6DB97FFF58A569FF00000000000000000000000000000000000000000000
          0000000000000000000000000000000000006EB684FF6AB380FF67B17CFF63AE
          77FF000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000
        }
        NumGlyphs = 0
        OnClick = btnAddAreaClick
        ShowHint = True
        ParentShowHint = False
      end
      object btnDeleteArea: TSpeedButton
        Left = 59
        Height = 22
        Hint = 'Delete area'
        Top = 0
        Width = 23
        Color = clBtnFace
        Enabled = False
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000064000000640000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000003853BEFF3551BDFF304BBCFF2E4E
          B8FF000000000000000000000000000000000000000000000000000000000000
          000000000000000000004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
          E4FF334DC1FF2B4AB7FF00000000000000000000000000000000000000000000
          0000000000004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
          EEFF9EA0F4FF515DD7FF2B4AB7FF000000000000000000000000000000000000
          00005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
          E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FF0000000000000000000000000000
          00004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
          E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF0000000000000000000000005C62
          D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
          E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF00000000000000005F63
          DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF00000000000000006469
          DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF0000000000000000676A
          DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
          ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF00000000000000000000
          00007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
          F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF0000000000000000000000000000
          00006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
          F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF0000000000000000000000000000
          0000000000006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
          FBFFBAC7FCFF707BE9FF4C5BCCFF000000000000000000000000000000000000
          000000000000000000006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
          F4FF6670E2FF535ED1FF00000000000000000000000000000000000000000000
          000000000000000000000000000000000000686ADDFF6364DCFF6164DAFF5D63
          D9FF000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000
        }
        NumGlyphs = 0
        OnClick = btnDeleteAreaClick
        ShowHint = True
        ParentShowHint = False
      end
      object btnClearArea: TSpeedButton
        Left = 87
        Height = 22
        Hint = 'Delete all areas'
        Top = 0
        Width = 23
        Color = clBtnFace
        Enabled = False
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000064000000640000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          000000000000000000000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
          EFFF0000EDFF0000EDFF00000000000000000000000000000000000000000000
          0000000000000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
          F7FF3242F7FF141BF1FF0000EDFF000000000000000000000000000000000000
          00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
          F5FF161BF5FF3343F7FF141BF1FF0000EDFF0000000000000000000000000000
          F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
          F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF00000000000000000000
          FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
          FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF00000000000000000000
          FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
          FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00000000000000000000
          FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
          FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF00000000000000000000
          FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
          FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF00000000000000000000
          FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
          FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FF00000000000000000000
          FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
          FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000000000000000
          FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
          FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
          00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
          FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
          0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
          FEFF5461FEFF2227FCFF0000FBFF000000000000000000000000000000000000
          000000000000000000000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
          FDFF0000FDFF0000FDFF00000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000
        }
        NumGlyphs = 0
        OnClick = btnClearAreaClick
        ShowHint = True
        ParentShowHint = False
      end
      object seX1: TSpinEdit
        Left = 20
        Height = 23
        Top = 29
        Width = 50
        Enabled = False
        OnChange = seX1Change
        TabOrder = 0
      end
      object seX2: TSpinEdit
        Left = 84
        Height = 23
        Top = 29
        Width = 50
        Enabled = False
        OnChange = seX1Change
        TabOrder = 1
      end
      object seY1: TSpinEdit
        Left = 20
        Height = 23
        Top = 56
        Width = 50
        Enabled = False
        OnChange = seX1Change
        TabOrder = 2
      end
      object seY2: TSpinEdit
        Left = 84
        Height = 23
        Top = 56
        Width = 50
        Enabled = False
        OnChange = seX1Change
        TabOrder = 3
      end
    end
    object vstArea: TVirtualStringTree
      Left = 5
      Height = 99
      Top = 190
      Width = 150
      Align = alClient
      BorderSpacing.Left = 4
      BorderSpacing.Right = 4
      BorderSpacing.Bottom = 4
      BorderStyle = bsSingle
      DefaultText = 'Node'
      Header.AutoSizeIndex = 0
      Header.Columns = <>
      Header.MainColumn = -1
      Header.Options = [hoColumnResize, hoDrag]
      TabOrder = 1
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
      TreeOptions.SelectionOptions = [toFullRowSelect]
      OnChange = vstAreaChange
      OnGetText = vstAreaGetText
    end
    object spRegionsArea: TSplitter
      Cursor = crVSplit
      Left = 1
      Height = 5
      Top = 171
      Width = 158
      Align = alTop
      AutoSnap = False
      ResizeAnchor = akTop
    end
    object Panel4: TPanel
      Left = 1
      Height = 170
      Top = 1
      Width = 158
      Align = alTop
      Anchors = [akLeft, akRight]
      BevelOuter = bvNone
      ClientHeight = 170
      ClientWidth = 158
      TabOrder = 3
      object vstRegions: TVirtualStringTree
        Left = 0
        Height = 144
        Top = 0
        Width = 158
        Align = alClient
        DefaultText = 'Node'
        Header.AutoSizeIndex = 0
        Header.Columns = <        
          item
            Position = 0
            Text = 'Regions'
            Width = 158
          end>
        Header.Options = [hoAutoResize, hoVisible]
        Header.ParentFont = True
        Header.Style = hsFlatButtons
        PopupMenu = pmRegions
        TabOrder = 0
        TreeOptions.MiscOptions = [toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
        TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
        TreeOptions.SelectionOptions = [toFullRowSelect]
        OnChange = vstRegionsChange
        OnFreeNode = vstRegionsFreeNode
        OnGetText = vstRegionsGetText
      end
      object Panel5: TPanel
        Left = 0
        Height = 26
        Top = 144
        Width = 158
        Align = alBottom
        BevelOuter = bvNone
        ClientHeight = 26
        ClientWidth = 158
        TabOrder = 1
        object btnAddRegion: TSpeedButton
          Left = 54
          Height = 22
          Hint = 'Add region'
          Top = 3
          Width = 23
          Color = clBtnFace
          Glyph.Data = {
            36040000424D3604000000000000360000002800000010000000100000000100
            2000000000000004000064000000640000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000003A8C44FF368940FF32873CFF2F84
            37FF000000000000000000000000000000000000000000000000000000000000
            00000000000000000000459653FF419950FF7DC28FFF96D0A6FF96CFA6FF78BE
            89FF368D42FF2C8134FF00000000000000000000000000000000000000000000
            0000000000004D9C5DFF64B478FFA8DBB5FF87CC98FF66BC7DFF64BA7CFF86CB
            98FFA5D9B4FF58AA6BFF2C8134FF000000000000000000000000000000000000
            000056A366FF6AB97DFFA8DBB2FF60BC77FF5CBA73FF59B870FF59B56FFF58B5
            6FFF5BB774FFA5D9B3FF5AAA6CFF2C8234FF0000000000000000000000000000
            000053AB68FFAADDB4FF64C179FF5FBE71FF60BC77FFFFFFFFFFFFFFFFFF59B8
            70FF58B56EFF5CB774FFA6DAB4FF388F43FF00000000000000000000000061AC
            75FF8ACC98FF89D396FF6BC67AFF63C170FF55AB65FFFFFFFFFFFFFFFFFF59B8
            70FF59B870FF5BB972FF85CC97FF7BBE8DFF308539FF000000000000000065AF
            7AFFA9DDB3FF7DCF8AFF75CC81FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFF59B870FF67BE7DFF9CD4ABFF34883DFF000000000000000069B2
            7EFFB6E2BEFF8BD597FF7AC986FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFF59B870FF69C17EFF9DD4AAFF388B42FF00000000000000006DB5
            83FFACDDB6FFA6DFAFFF81CB8CFF7CC986FF6EBD79FFFFFFFFFFFFFFFFFF5BAC
            6AFF60BC77FF5CBA73FF8BD199FF80C592FF3C8E47FF00000000000000000000
            000085C797FFD2EED7FF95D9A0FF8AD394FF7FC889FFFFFFFFFFFFFFFFFF79CD
            85FF6BC37CFF6FC77EFFACDFB5FF459E57FF0000000000000000000000000000
            000070B887FFAADAB7FFD8F1DCFF92D89DFF88CD93FF84CC8EFF8BD496FF8AD4
            95FF83D28EFFAFE0B7FF6BB97DFF489856FF0000000000000000000000000000
            00000000000070B887FFAFDCBBFFDCF2E0FFB6E4BDFF9BDBA5FF96D9A0FFA5DF
            AFFFC0E8C5FF79C28AFF509E5FFF000000000000000000000000000000000000
            0000000000000000000071B887FF94CEA4FFC3E6CBFFCFEBD4FFC9E9CEFFAFDD
            B8FF6DB97FFF58A569FF00000000000000000000000000000000000000000000
            0000000000000000000000000000000000006EB684FF6AB380FF67B17CFF63AE
            77FF000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000
          }
          NumGlyphs = 0
          OnClick = mnuAddRegionClick
          ShowHint = True
          ParentShowHint = False
        end
        object btnDeleteRegion: TSpeedButton
          Left = 82
          Height = 22
          Hint = 'Delete region'
          Top = 3
          Width = 23
          Color = clBtnFace
          Enabled = False
          Glyph.Data = {
            36040000424D3604000000000000360000002800000010000000100000000100
            2000000000000004000064000000640000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000003853BEFF3551BDFF304BBCFF2E4E
            B8FF000000000000000000000000000000000000000000000000000000000000
            000000000000000000004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
            E4FF334DC1FF2B4AB7FF00000000000000000000000000000000000000000000
            0000000000004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
            EEFF9EA0F4FF515DD7FF2B4AB7FF000000000000000000000000000000000000
            00005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
            E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FF0000000000000000000000000000
            00004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
            E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF0000000000000000000000005C62
            D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
            E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF00000000000000005F63
            DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF00000000000000006469
            DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF0000000000000000676A
            DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
            ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF00000000000000000000
            00007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
            F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF0000000000000000000000000000
            00006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
            F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF0000000000000000000000000000
            0000000000006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
            FBFFBAC7FCFF707BE9FF4C5BCCFF000000000000000000000000000000000000
            000000000000000000006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
            F4FF6670E2FF535ED1FF00000000000000000000000000000000000000000000
            000000000000000000000000000000000000686ADDFF6364DCFF6164DAFF5D63
            D9FF000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000
          }
          NumGlyphs = 0
          OnClick = mnuDeleteRegionClick
          ShowHint = True
          ParentShowHint = False
        end
      end
    end
  end
  object Panel2: TPanel
    Left = 160
    Height = 380
    Top = 0
    Width = 460
    Align = alClient
    Caption = 'Panel2'
    ClientHeight = 380
    ClientWidth = 460
    TabOrder = 1
    object sbArea: TScrollBox
      Left = 1
      Height = 378
      Top = 1
      Width = 458
      Align = alClient
      ClientHeight = 378
      ClientWidth = 458
      TabOrder = 0
      object pbArea: TPaintBox
        Left = 0
        Height = 105
        Top = 0
        Width = 105
        OnMouseDown = pbAreaMouseDown
        OnMouseMove = pbAreaMouseMove
        OnPaint = pbAreaPaint
      end
    end
  end
  object Panel3: TPanel
    Left = 4
    Height = 25
    Top = 384
    Width = 612
    Align = alBottom
    BorderSpacing.Around = 4
    BevelOuter = bvNone
    ClientHeight = 25
    ClientWidth = 612
    TabOrder = 2
    object btnClose: TButton
      Left = 548
      Height = 25
      Top = 0
      Width = 64
      Align = alRight
      Anchors = [akTop, akRight]
      BorderSpacing.Left = 4
      Caption = 'Close'
      OnClick = btnCloseClick
      TabOrder = 0
    end
    object btnSave: TButton
      Left = 480
      Height = 25
      Top = 0
      Width = 64
      Align = alRight
      Anchors = [akTop, akRight]
      BorderSpacing.Right = 4
      Caption = 'Save'
      Enabled = False
      OnClick = btnSaveClick
      TabOrder = 1
    end
  end
  object pmRegions: TPopupMenu
    left = 48
    top = 43
    object mnuAddRegion: TMenuItem
      Caption = 'Add'
      OnClick = mnuAddRegionClick
    end
    object mnuDeleteRegion: TMenuItem
      Caption = 'Delete'
      Enabled = False
      OnClick = mnuDeleteRegionClick
    end
  end
end