unit1.~dfm

GIS中关于节点编辑的例子

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 709
  Height = 478
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Map1: TMap
    Left = 8
    Top = 8
    Width = 593
    Height = 441
    ParentColor = False
    TabOrder = 0
    OnAddFeatureToolUsed = Map1AddFeatureToolUsed
    ControlData = {
      2CA107004A3D0000942D0000010000000F000080FFFEFF0D470065006F004400
      69006300740069006F006E0061007200790000FFFEFF3745006D007000740079
      002000470065006F007300650074004E0061006D00650020007B003900410039
      00410043003200460034002D0038003300370035002D0034003400640031002D
      0042004300450042002D00340037003600410045003900380036004600310039
      0030007D00FFFEFF001E00FFFEFF000600010A000000000000FFFEFF00500001
      0100000001F4010000050000800C0000000014000000000002000E00E8030005
      00000100000000FFFFFF000000000000000001370000000000FFFFFF00000000
      0000000352E30B918FCE119DE300AA004BB851018600009001DC7C010004CBCE
      CCE5000352E30B918FCE119DE300AA004BB851018600009001A42C020004CBCE
      CCE50000000000000001000100FFFFFF000200FFFFFF00000000000001000000
      010000FFFEFF3245006D0070007400790020005400690074006C00650020007B
      00300031004100390035003000340042002D0043004500310033002D00340034
      00310035002D0041003500410030002D00350031004400380043003200460031
      0035003200300034007D0000000000FFFFFF0001000000000000000000000000
      00000000000000000000000352E30B918FCE119DE300AA004BB8510186000090
      011009050004CBCECCE5000352E30B918FCE119DE300AA004BB8510186000090
      011009050004CBCECCE500000000000000000000000000000000000000000000
      0000000000000000000000000000002AA7400000000000907B40010000010100
      0100FFFEFF2346003A005C00005FD1538B4F0B7A5C004D006100700058002000
      2B002000440065006C007000680069005C000768E86C167F918F5C0041005300
      490041002E00540041004200FFFEFF0441007300690061000101000000000000
      0000000000000000000000000000000000006400000102000000000000000000
      0000000000000000000088C3400100000101000000000000FFFFFF0000000000
      00000000000000000000000000000000000000000352E30B918FCE119DE300AA
      004BB85101860000BC02C0D401000653797374656D000352E30B918FCE119DE3
      00AA004BB851010000009001C0D401000D4D532053616E732053657269660000
      0000000000010001000000000000000000000000000000000000000000001801
      000001000000E0E612001C000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000002000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000008076C0000000000080
      56C000000000008076400000000000805640000000009CCB1110180100000100
      0000E0E612001C00000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000200000010971C774AA541400000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000008076C000000000008056C00000
      0000008076400000000000805640000000009CCB1110F57177E8ECBDCA40F61C
      588E90415A4010971C774AA5414000000000000000000100000000000000}
  end
  object Button1: TButton
    Left = 616
    Top = 88
    Width = 81
    Height = 33
    Caption = 'add point'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 616
    Top = 136
    Width = 81
    Height = 33
    Caption = 'zoomin'
    TabOrder = 2
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 616
    Top = 184
    Width = 81
    Height = 33
    Caption = 'zoomout'
    TabOrder = 3
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 616
    Top = 232
    Width = 81
    Height = 33
    Caption = 'select'
    TabOrder = 4
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 616
    Top = 344
    Width = 81
    Height = 33
    Caption = 'Button5'
    TabOrder = 5
    OnClick = Button5Click
  end
  object Button6: TButton
    Left = 616
    Top = 288
    Width = 81
    Height = 33
    Caption = 'InsertNode'
    TabOrder = 6
    OnClick = Button6Click
  end
end