unitmain.dfm

在delphi下基于MapX5.0的GIS程序

object FrmMain: TFrmMain
  Left = 0
  Top = -1
  Width = 808
  Height = 580
  Caption = #21513#26519#22823#23398#22320#29702#20449#24687#31995#32479
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDesktopCenter
  WindowState = wsMaximized
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object SBar: TStatusBar
    Left = 0
    Top = 514
    Width = 800
    Height = 20
    Color = clScrollBar
    Panels = <
      item
        Alignment = taRightJustify
        Bevel = pbNone
        Text = #24403#21069#25805#20316#65306
        Width = 70
      end
      item
        Width = 140
      end
      item
        Alignment = taRightJustify
        Bevel = pbNone
        Text = #30331#20837#29992#25143#65306
        Width = 70
      end
      item
        Alignment = taCenter
        Width = 75
      end
      item
        Alignment = taRightJustify
        Bevel = pbNone
        Text = #30331#20837#26102#38388#65306
        Width = 70
      end
      item
        Alignment = taCenter
        Width = 70
      end
      item
        Alignment = taRightJustify
        Bevel = pbRaised
        Text = #26085#26399#65306
        Width = 50
      end
      item
        Alignment = taCenter
        Width = 140
      end
      item
        Alignment = taRightJustify
        Bevel = pbRaised
        Text = #26102#38388#65306
        Width = 50
      end
      item
        Alignment = taCenter
        Width = 50
      end>
    SimplePanel = False
  end
  object PanelBack: TPanel
    Left = 0
    Top = 53
    Width = 800
    Height = 461
    Align = alClient
    BevelOuter = bvLowered
    Caption = 'PanelBack'
    TabOrder = 1
    object PanelClient: TPanel
      Left = 1
      Top = 1
      Width = 798
      Height = 459
      Align = alClient
      Caption = 'PanelClient'
      TabOrder = 0
      object Map1: TMap
        Left = 1
        Top = 1
        Width = 796
        Height = 457
        ParentColor = False
        Align = alClient
        PopupMenu = PMenuRight
        TabOrder = 0
        OnMouseUp = Map1MouseUp
        OnMouseMove = Map1MouseMove
        OnKeyUp = Map1KeyUp
        OnKeyDown = Map1KeyDown
        OnDblClick = Map1DblClick
        OnClick = Map1Click
        OnSelectionChanged = Map1SelectionChanged
        OnToolUsed = Map1ToolUsed
        OnMapViewChanged = Map1MapViewChanged
        OnPolyToolUsed = Map1PolyToolUsed
        ControlData = {
          2CA10700455200003B2F0000010000000F000080FFFEFF0D470065006F004400
          69006300740069006F006E0061007200790000FFFEFF3745006D007000740079
          002000470065006F007300650074004E0061006D00650020007B003900410039
          00410043003200460034002D0038003300370035002D0034003400640031002D
          0042004300450042002D00340037003600410045003900380036004600310039
          0030007D00FFFEFF001E00FFFEFF000600010A000000000000FFFEFF00500001
          0100000001F4010000050000800C0000000014000000000002000E00E8030005
          00000100000000FFFFFF000000000000000001370000000000FFFFFF00000000
          0000000352E30B918FCE119DE300AA004BB851010000009001DC7C0100054172
          69616C000352E30B918FCE119DE300AA004BB851010200009001A42C02000B4D
          61702053796D626F6C730000000000000001000100FFFFFF000200FFFFFF0000
          0000000001000000010000FFFEFF3245006D0070007400790020005400690074
          006C00650020007B00300031004100390035003000340042002D004300450031
          0033002D0034003400310035002D0041003500410030002D0035003100440038
          00430032004600310035003200300034007D0000000000FFFFFF000100000000
          000000000000000000000000000000000000000352E30B918FCE119DE300AA00
          4BB851010000009001348C030005417269616C000352E30B918FCE119DE300AA
          004BB851010000009001348C030005417269616C000000000000000000000000
          00000000000000000000000000000000000000000000000000B8AE4000000000
          00006E400100000100001801000001000000F8E412001C000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000020000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000008076C000000000008056C0000000000080764000000000008056400000
          00007CBBCD051801000001000000F8E412001C00000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000200
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000080
          76C000000000008056C000000000008076400000000000805640000000007CBB
          CD05000000000000000000000000000000000000000000000000000000000000
          00000000000000000000}
      end
    end
  end
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 800
    Height = 53
    AutoSize = True
    Bands = <
      item
        Control = ToolBarMapViewTool
        ImageIndex = -1
        MinHeight = 22
        Width = 796
      end
      item
        Control = ToolBarDrawMapTool
        ImageIndex = -1
        Visible = False
        Width = 796
      end>
    DockSite = True
    DragKind = dkDock
    object ToolBarMapViewTool: TToolBar
      Left = 9
      Top = 0
      Width = 783
      Height = 22
      AutoSize = True
      ButtonWidth = 25
      Caption = 'ToolBarMapViewTool'
      DockSite = True
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Images = ImageList1
      TabOrder = 0
      object TBtnmiPanTool: TToolButton
        Tag = 1001
        Left = 0
        Top = 0
        Caption = #28459#28216
        Down = True
        ImageIndex = 0
        OnClick = NmiPanToolClick
      end
      object TBtnCUSTOM_ZOOMIN_TOOL: TToolButton
        Tag = 16
        Left = 25
        Top = 0
        Caption = #25918#22823
        ImageIndex = 1
        OnClick = NCUSTOM_ZOOMIN_TOOLClick
      end
      object TBtnCUSTOM_ZOOMOUT_TOOL: TToolButton
        Tag = 17
        Left = 50
        Top = 0
        Caption = #32553#23567
        ImageIndex = 2
        OnClick = NCUSTOM_ZOOMOUT_TOOLClick
      end
      object TBtnmiCenterTool: TToolButton
        Tag = 1002
        Left = 75
        Top = 0
        Caption = #23616#20013
        ImageIndex = 3
        OnClick = NmiCenterToolClick
      end
      object ToolButton1: TToolButton
        Left = 100
        Top = 0
        Width = 8
        Caption = 'ToolButton1'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object TBtnEagleEye: TToolButton
        Left = 108
        Top = 0
        Caption = #40560#30524
        ImageIndex = 4
        OnClick = NEagleEyeClick
      end
      object TBtnNavigation: TToolButton
        Left = 133
        Top = 0
        Caption = #23548#33322
        ImageIndex = 5
        OnClick = NNavigationClick
      end
      object TBtnViewBeforeMap: TToolButton
        Left = 158
        Top = 0
        Caption = #21069#22270
        ImageIndex = 26
        OnClick = NViewBeforeMapClick
      end
      object TBtnAllMap: TToolButton
        Left = 183
        Top = 0
        Caption = 'TBtnAllMap'
        ImageIndex = 6
        OnClick = NAllMapClick
      end
      object TBtnIniMap: TToolButton
        Left = 208
        Top = 0
        Caption = #21021#22987#22270
        ImageIndex = 26
        OnClick = NIniMapClick
      end
    end
    object ToolBarDrawMapTool: TToolBar
      Left = 9
      Top = 24
      Width = 783
      Height = 25