unitmainform.dfm

此代码是关于mapgis的在

          Text = #32437#22352#26631#65306
          Width = 70
        end
        item
          Alignment = taCenter
          Width = 75
        end
        item
          Width = 50
        end>
    end
    object Panel3: TPanel
      Left = 0
      Top = 0
      Width = 784
      Height = 156
      Align = alClient
      TabOrder = 1
      object pcControl: TPageControl
        Left = 1
        Top = 1
        Width = 782
        Height = 154
        ActivePage = tsData
        Align = alClient
        TabOrder = 0
        object tsData: TTabSheet
          Caption = #23646#24615#25968#25454
          object ScrollBox1: TScrollBox
            Left = 0
            Top = 0
            Width = 774
            Height = 126
            Align = alClient
            TabOrder = 0
          end
        end
        object tsMessage: TTabSheet
          Caption = #28040#24687#31383#21475
          ImageIndex = 4
          object RichEdit_UserMsg: TRichEdit
            Left = 0
            Top = 0
            Width = 774
            Height = 126
            Align = alClient
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            ScrollBars = ssBoth
            TabOrder = 0
          end
        end
        object tsSearch: TTabSheet
          Caption = #26597#35810#31383#21475
          ImageIndex = 1
          object ScrollBox2: TScrollBox
            Left = 0
            Top = 0
            Width = 774
            Height = 126
            Align = alClient
            TabOrder = 0
            inline Frame_Search1: TFrame_Search
              Left = 0
              Top = 0
              Width = 754
              Height = 240
              Align = alTop
              TabOrder = 0
            end
          end
        end
        object tsDraw: TTabSheet
          Caption = #21046#22270#31383#21475
          ImageIndex = 2
          object ScrollBox3: TScrollBox
            Left = 0
            Top = 0
            Width = 774
            Height = 126
            Align = alClient
            TabOrder = 0
            inline Frame_DrawShape1: TFrame_DrawShape
              Left = 0
              Top = 0
              Width = 754
              Height = 249
              Align = alTop
              TabOrder = 0
            end
          end
        end
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.TAB|*.TAB'
    Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
    Left = 80
    Top = 288
  end
  object MainMenu1: TMainMenu
    AutoHotkeys = maManual
    AutoMerge = True
    Images = ImageList1
    Left = 24
    Top = 288
    object N55: TMenuItem
      Caption = #25991#20214'(&F)'
      object NExport: TMenuItem
        Caption = #36755#20986
        object NExportAsImage: TMenuItem
          Caption = #22270#20687'...'
          OnClick = NExportAsImageClick
        end
      end
      object N15: TMenuItem
        Caption = '-'
      end
      object NClose: TMenuItem
        Caption = #36864#20986#31995#32479
        OnClick = NCloseClick
      end
    end
    object NCustomTools: TMenuItem
      Caption = #24037#20855'(&T)'
      object NZoomIn: TMenuItem
        AutoCheck = True
        Caption = #25918#22823
        ImageIndex = 1
        RadioItem = True
        OnClick = NZoomInClick
      end
      object NZoomOut: TMenuItem
        AutoCheck = True
        Caption = #32553#23567
        ImageIndex = 2
        RadioItem = True
        OnClick = NZoomOutClick
      end
      object NPan: TMenuItem
        AutoCheck = True
        Caption = #31227#21160
        ImageIndex = 0
        RadioItem = True
        OnClick = NPanClick
      end
      object NCenter: TMenuItem
        AutoCheck = True
        Caption = #23616#20013
        ImageIndex = 3
        RadioItem = True
        OnClick = NCenterClick
      end
      object NGlobalMap: TMenuItem
        Caption = #20840#22270
        GroupIndex = 1
        ImageIndex = 6
        OnClick = NGlobalMapClick
      end
      object N1: TMenuItem
        Caption = '-'
        GroupIndex = 1
      end
      object NNavigation: TMenuItem
        AutoCheck = True
        Caption = #23548#33322
        GroupIndex = 1
        ImageIndex = 5
        OnClick = NNavigationClick
      end
      object NShowEagleEye: TMenuItem
        AutoCheck = True
        Caption = #40560#30524
        GroupIndex = 1
        OnClick = NShowEagleEyeClick
      end
      object N37: TMenuItem
        Caption = '-'
        GroupIndex = 1
      end
      object NClickSelect: TMenuItem
        AutoCheck = True
        Caption = #28857#20987#36873#25321
        GroupIndex = 1
        ImageIndex = 17
        RadioItem = True
        OnClick = NClickSelectClick
      end
      object NRectSelect: TMenuItem
        AutoCheck = True
        Caption = #30697#24418#36873#25321
        GroupIndex = 1
        ImageIndex = 19
        RadioItem = True
        OnClick = NRectSelectClick
      end
      object NPolySelect: TMenuItem
        AutoCheck = True
        Caption = #21306#22495#36873#25321
        GroupIndex = 1
        ImageIndex = 20
        RadioItem = True
        OnClick = NPolySelectClick
      end
      object NRadiusSelect: TMenuItem
        AutoCheck = True
        Caption = #21322#24452#36873#25321
        GroupIndex = 1
        ImageIndex = 18
        RadioItem = True
        OnClick = NRadiusSelectClick
      end
      object N20: TMenuItem
        Caption = '-'
        GroupIndex = 1
      end
      object NSelectAll: TMenuItem
        Caption = #20840#36873
        GroupIndex = 1
        OnClick = NSelectAllClick
      end
      object NInvertSelect: TMenuItem
        Caption = #21453#36873
        GroupIndex = 1
        OnClick = NInvertSelectClick
      end
      object NCoordSelect: TMenuItem
        Caption = #26465#20214#36873#25321
        GroupIndex = 1
      end
      object NClearSelect: TMenuItem
        Caption = #19981#36873
        GroupIndex = 1
        OnClick = NClearSelectClick
      end
      object N2: TMenuItem
        Caption = '-'
        GroupIndex = 1
      end
      object NDistance: TMenuItem
        AutoCheck = True
        Caption = #36317#31163#27979#37327
        GroupIndex = 1
        ImageIndex = 46
        RadioItem = True
        OnClick = NDistanceClick
      end
      object NArea: TMenuItem
        AutoCheck = True
        Caption = #38754#31215#27979#37327
        GroupIndex = 1
        RadioItem = True
      end
    end
    object NLayerConfig: TMenuItem
      Caption = #22270#23618'(&L)'
      object NNewLayer: TMenuItem
        Caption = #26032#24314#22270#23618
        ImageIndex = 37
        OnClick = NNewLayerClick
      end
      object NLoadLayer: TMenuItem
        Caption = #21152#36733#22270#23618'...'
        ImageIndex = 50
        OnClick = NLoadLayerClick
      end
      object N41: TMenuItem
        Caption = '-'
      end
      object NCopyLayer: TMenuItem
        Caption = #22797#21046#22270#23618
        OnClick = NCopyLayerClick
      end
      object NMergeLayer: TMenuItem
        Caption = #21512#24182#22270#23618
      end
      object NRemoveLayer: TMenuItem
        Caption = #31227#20986#22270#23618
        OnClick = NRemoveLayerClick
      end
      object NClearLayers: TMenuItem
        Caption = #28165#38500#22270#23618
        OnClick = NClearLayersClick
      end
      object N12: TMenuItem
        Caption = '-'
      end
      object NAddToProject: TMenuItem
        Caption = #21152#20837#21040#24037#31243
        OnClick = NAddToProjectClick
      end
      object N11: TMenuItem
        Caption = '-'
      end
      object NLayerOptions: TMenuItem
        Caption = #22270#23618#25511#21046'...'
        ImageIndex = 45
        OnClick = NLayerOptionsClick
      end
    end
    object NCustomDraw: TMenuItem
      Caption = #22270#24418'(&D)'
      object NSymbol: TMenuItem
        Caption = #31526#21495
        ImageIndex = 7
        OnClick = NSymbolClick
      end
      object NLine: TMenuItem
        Caption = #30452#32447
        ImageIndex = 9
        OnClick = NLineClick
      end
      object NPLine: TMenuItem
        Caption = #25240#32447
        ImageIndex = 10
        OnClick = NPLineClick
      end
      object NRect: TMenuItem
        Caption = #30697#24418
        ImageIndex = 11
        OnClick = NRectClick
      end
      object NCircle: TMenuItem
        Caption = #22278#24418
        ImageIndex = 60
        OnClick = NCircleClick
      end
      object NPoly: TMenuItem
        Caption = #21306#22495
        ImageIndex = 13
        OnClick = NPolyClick
      end
      object NEllipse: TMenuItem
        Caption = #26925#22278
        ImageIndex = 12
        OnClick = NEllipseClick
      end
      object NArc: TMenuItem
        Caption = #22278#24359
        ImageIndex = 61
        OnClick = NArcClick
      end
      object N9: TMenuItem
        Caption = '-'