unit1.~dfm

生成等高线

object Form1: TForm1
  Left = 222
  Top = 49
  Width = 696
  Height = 648
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object picture1: TImage
    Left = 8
    Top = 16
    Width = 337
    Height = 337
  end
  object Label3: TLabel
    Left = 144
    Top = 368
    Width = 52
    Height = 26
    Caption = 'Line value step'
    WordWrap = True
  end
  object ContourOCX1: TContourOCX
    Left = 224
    Top = 320
    Width = 105
    Height = 41
    TabOrder = 0
    Visible = False
    ControlData = {00000100DA0A00003D04000000000000}
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 408
    Width = 337
    Height = 89
    Caption = 'Regularly distributed points'
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 22
      Height = 13
      Caption = 'Row'
    end
    object Label2: TLabel
      Left = 88
      Top = 24
      Width = 15
      Height = 13
      Caption = 'Col'
    end
    object RowEdit: TEdit
      Left = 40
      Top = 24
      Width = 33
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 0
      Text = '8'
    end
    object ColEdit: TEdit
      Left = 112
      Top = 24
      Width = 33
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 1
      Text = '9'
    end
    object RadioGroup1: TRadioGroup
      Left = 208
      Top = 8
      Width = 121
      Height = 41
      Caption = 'calculateion option'
      Columns = 3
      ItemIndex = 0
      Items.Strings = (
        '1'
        '2'
        '3')
      TabOrder = 2
      OnClick = RadioGroup1Click
    end
    object Button1: TButton
      Left = 272
      Top = 56
      Width = 57
      Height = 25
      Caption = 'DRAW'
      TabOrder = 3
      OnClick = Button1Click
    end
  end
  object CustomedLineValue: TRadioGroup
    Left = 8
    Top = 360
    Width = 121
    Height = 41
    Caption = 'Line Values'
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      'Even'
      'Uneven')
    TabOrder = 2
  end
  object Button2: TButton
    Left = 264
    Top = 368
    Width = 73
    Height = 33
    Caption = 'Add Labels'
    TabOrder = 3
    OnClick = Button2Click
  end
  object GroupBox2: TGroupBox
    Left = 360
    Top = 376
    Width = 113
    Height = 73
    Caption = 'Screen X'
    TabOrder = 4
    object Label4: TLabel
      Left = 16
      Top = 24
      Width = 27
      Height = 13
      Caption = 'Slope'
    end
    object Label5: TLabel
      Left = 16
      Top = 48
      Width = 42
      Height = 13
      Caption = 'Intercept'
    end
    object XSlopeEdit: TEdit
      Left = 72
      Top = 16
      Width = 33
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 0
      Text = '1'
    end
    object XInterceptEdit: TEdit
      Left = 72
      Top = 40
      Width = 33
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 1
      Text = '0'
    end
  end
  object GroupBox3: TGroupBox
    Left = 360
    Top = 464
    Width = 113
    Height = 73
    Caption = 'Screen Y'
    TabOrder = 5
    object Label6: TLabel
      Left = 16
      Top = 24
      Width = 27
      Height = 13
      Caption = 'Slope'
    end
    object Label7: TLabel
      Left = 16
      Top = 48
      Width = 42
      Height = 13
      Caption = 'Intercept'
    end
    object YSlopeEdit: TEdit
      Left = 72
      Top = 16
      Width = 33
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 0
      Text = '1'
    end
    object YInterceptEdit: TEdit
      Left = 72
      Top = 40
      Width = 33
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 1
      Text = '0'
    end
  end
  object Polygon: TGroupBox
    Left = 480
    Top = 376
    Width = 185
    Height = 193
    Caption = 'Polygon'
    TabOrder = 6
    object Label8: TLabel
      Left = 56
      Top = 32
      Width = 26
      Height = 39
      Caption = 'Flash Filling Color'
      WordWrap = True
    end
    object lab3: TLabel
      Left = 56
      Top = 80
      Width = 31
      Height = 39
      Caption = 'Flash Border Color'
      WordWrap = True
    end
    object ListBox1: TListBox
      Left = 8
      Top = 24
      Width = 41
      Height = 105
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      ItemHeight = 13
      TabOrder = 0
      OnClick = ListBox1Click
    end
    object FlashFillColorEdit: TEdit
      Left = 104
      Top = 40
      Width = 73
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 1
      Text = '7777777'
    end
    object FlashBorderColorEdit: TEdit
      Left = 104
      Top = 88
      Width = 73
      Height = 21
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      TabOrder = 2
      Text = '666666'
    end
    object Memo1: TMemo
      Left = 8
      Top = 136
      Width = 169
      Height = 49
      ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
      Lines.Strings = (
        'Memo1')
      TabOrder = 3
    end
  end
  object Button3: TButton
    Left = 360
    Top = 544
    Width = 113
    Height = 25
    Caption = 'Update Coordinates'
    TabOrder = 7
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 360
    Top = 576
    Width = 137
    Height = 33
    Caption = 'Draw Polygons'
    TabOrder = 8
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 504
    Top = 576
    Width = 73
    Height = 33
    Caption = 'Refresh '
    TabOrder = 9
    OnClick = Button5Click
  end
  object Picture2: TPanel
    Left = 352
    Top = 16
    Width = 329
    Height = 345
    Caption = 'Picture2'
    TabOrder = 10
  end
  object InterposeCheck: TCheckBox
    Left = 16
    Top = 467
    Width = 97
    Height = 17
    Caption = 'Interpose Values'
    TabOrder = 11
    OnClick = InterposeCheckClick
  end
  object RestrictCheck: TCheckBox
    Left = 120
    Top = 464
    Width = 153
    Height = 25
    Caption = 'Restrict Interposed Values'
    TabOrder = 12
    WordWrap = True
  end
  object StepEdit: TEdit
    Left = 208
    Top = 368
    Width = 33
    Height = 21
    ImeName = #26085#35821#36755#20837#31995#32479' (MS-IME2002)'
    TabOrder = 13
    Text = '1'
  end
  object GroupBox4: TGroupBox
    Left = 8
    Top = 504
    Width = 337
    Height = 97
    Caption = 'Discrete points'
    TabOrder = 14
    object Label9: TLabel
      Left = 12
      Top = 27
      Width = 33
      Height = 13
      AutoSize = False
      Caption = 'Count'
    end
    object Label10: TLabel
      Left = 12
      Top = 51
      Width = 45
      Height = 13
      AutoSize = False
      Caption = 'Smooth'
    end
    object CountEdit: TEdit
      Left = 48
      Top = 24
      Width = 41
      Height = 21
      TabOrder = 0
      Text = '99'
    end
    object SmoothEdit: TEdit
      Left = 64
      Top = 48
      Width = 25
      Height = 21
      TabOrder = 1
      Text = '2'
    end
    object MethodRadio: TRadioGroup
      Left = 104
      Top = 8
      Width = 225
      Height = 41
      Caption = 'Method'
      Columns = 3
      ItemIndex = 0
      Items.Strings = (
        'IIDW'
        'CFWAI'
        'Driging(OK)')
      TabOrder = 2
    end
    object DrawValueCheck: TCheckBox
      Left = 8
      Top = 78
      Width = 121
      Height = 17
      Caption = 'Draw Point Values'
      TabOrder = 3
    end
    object Button6: TButton
      Left = 277
      Top = 60
      Width = 51
      Height = 25
      Caption = 'DRAW'
      TabOrder = 4
      OnClick = Button6Click
    end
    object SourceRadio: TRadioGroup
      Left = 120
      Top = 48
      Width = 145
      Height = 41
      Caption = 'Source'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Random'
        'File')
      TabOrder = 5
    end
  end
  object Button7: TButton
    Left = 592
    Top = 576
    Width = 89
    Height = 33
    Caption = 'To SHP File'
    TabOrder = 15
    OnClick = Button7Click
  end
  object SaveDialog1: TSaveDialog
    Left = 560
    Top = 496
  end
end