unitdrawshape.~dfm

此代码是关于mapgis的在

object Frame_DrawShape: TFrame_DrawShape
  Left = 0
  Top = 0
  Width = 946
  Height = 249
  TabOrder = 0
  object GroupBox1: TGroupBox
    Left = 792
    Top = 8
    Width = 185
    Height = 145
    Caption = #26679#24335
    TabOrder = 0
    object BitBtn1: TBitBtn
      Left = 16
      Top = 16
      Width = 75
      Height = 25
      Caption = #26631#35760#26679#24335
      TabOrder = 0
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 96
      Top = 16
      Width = 75
      Height = 25
      Caption = #32447#26679#24335
      TabOrder = 1
      OnClick = BitBtn2Click
    end
    object BitBtn3: TBitBtn
      Left = 16
      Top = 48
      Width = 75
      Height = 25
      Caption = #22810#36793#24418#26679#24335
      TabOrder = 2
      OnClick = BitBtn3Click
    end
    object BitBtn4: TBitBtn
      Left = 96
      Top = 48
      Width = 75
      Height = 25
      Caption = #25991#23383#26679#24335
      TabOrder = 3
      OnClick = BitBtn4Click
    end
  end
  object GroupBox4: TGroupBox
    Left = 592
    Top = 8
    Width = 193
    Height = 145
    Caption = #20559#31227
    TabOrder = 1
    object Label1: TLabel
      Left = 17
      Top = 32
      Width = 48
      Height = 13
      Caption = #27178#20559#31227#65306
    end
    object Label2: TLabel
      Left = 17
      Top = 56
      Width = 48
      Height = 13
      Caption = #32437#20559#31227#65306
    end
    object XOffestEdit: TUpDownEditFloat
      Left = 64
      Top = 24
      Width = 112
      Height = 21
      TabOrder = 0
      Text = '0'
      OnKeyDown = XOffestEditKeyDown
      Digits = 2
      Precision = 9
      FloatFormat = ffGeneral
      Increment = 0.500000000000000000
    end
    object YOffestEdit: TUpDownEditFloat
      Left = 64
      Top = 48
      Width = 112
      Height = 21
      TabOrder = 1
      Text = '0'
      OnKeyDown = YOffestEditKeyDown
      Digits = 2
      Precision = 9
      FloatFormat = ffGeneral
      Increment = 0.500000000000000000
    end
    object ApplyOffestBtn: TButton
      Left = 104
      Top = 80
      Width = 75
      Height = 25
      Caption = #24212#29992
      TabOrder = 2
      OnClick = ApplyOffestBtnClick
    end
  end
  object GroupBox5: TGroupBox
    Left = 8
    Top = 8
    Width = 577
    Height = 145
    Caption = #24418#29366#25511#21046
    TabOrder = 2
    object ValueList: TYHBListBox
      Left = 8
      Top = 16
      Width = 185
      Height = 121
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 0
      OnClick = ValueListClick
      AutoItemHeight = True
      BottomSpace = 1
      FocusRectType = lbftLine
      LeftSpace = 1
      ImageStretch = True
      RightSpace = 2
      SelectFrameColor = clHighlight
      SelectTextColor = clHighlightText
      TopSpace = 1
    end
    object GroupBox3: TGroupBox
      Left = 200
      Top = 16
      Width = 185
      Height = 121
      Caption = #28857#20301#32622
      TabOrder = 1
      object Label4: TLabel
        Left = 17
        Top = 56
        Width = 48
        Height = 13
        Caption = #32437#22352#26631#65306
      end
      object Label3: TLabel
        Left = 17
        Top = 32
        Width = 48
        Height = 13
        Caption = #27178#22352#26631#65306
      end
      object CheckBox1: TCheckBox
        Left = 40
        Top = 80
        Width = 97
        Height = 17
        Caption = #30456#23545#19982#36873#25321#28857
        TabOrder = 0
      end
      object YEdit: TUpDownEditFloat
        Left = 64
        Top = 48
        Width = 112
        Height = 21
        TabOrder = 1
        Text = '0'
        OnKeyDown = YEditKeyDown
        Digits = 2
        Precision = 9
        FloatFormat = ffGeneral
        Increment = 0.500000000000000000
      end
      object XEdit: TUpDownEditFloat
        Left = 64
        Top = 24
        Width = 112
        Height = 21
        TabOrder = 2
        Text = '0'
        OnKeyDown = XEditKeyDown
        Digits = 2
        Precision = 9
        FloatFormat = ffGeneral
        Increment = 0.500000000000000000
      end
    end
    object GroupBox2: TGroupBox
      Left = 392
      Top = 16
      Width = 177
      Height = 121
      TabOrder = 2
      object ImportPointsBtn: TButton
        Left = 14
        Top = 80
        Width = 75
        Height = 25
        Caption = #23548#20837
        TabOrder = 0
      end
      object InsertPointBtn: TButton
        Left = 94
        Top = 16
        Width = 75
        Height = 25
        Caption = #25554#20837
        TabOrder = 1
        OnClick = InsertPointBtnClick
      end
      object DeletePointBtn: TButton
        Left = 94
        Top = 48
        Width = 75
        Height = 25
        Caption = #21024#38500
        TabOrder = 2
        OnClick = DeletePointBtnClick
      end
      object AddPointBtn: TButton
        Left = 14
        Top = 16
        Width = 75
        Height = 25
        Caption = #21152#20837
        TabOrder = 3
        OnClick = AddPointBtnClick
      end
      object CompleteBtn: TButton
        Left = 94
        Top = 80
        Width = 75
        Height = 25
        Caption = #26032#22270#24418
        TabOrder = 4
        OnClick = CompleteBtnClick
      end
      object EditPointBtn: TButton
        Left = 14
        Top = 48
        Width = 75
        Height = 25
        Caption = #20462#25913
        TabOrder = 5
        OnClick = EditPointBtnClick
      end
    end
  end
end