lyxxlr.~dfm

地理资源的录入程序运用了api的一些知识

    end
    object Label9: TLabel
      Left = 748
      Top = 46
      Width = 26
      Height = 13
      Caption = #32423#21035
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label13: TLabel
      Left = 70
      Top = 99
      Width = 39
      Height = 13
      Caption = #30693#21517#24230
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label16: TLabel
      Left = 748
      Top = 102
      Width = 26
      Height = 13
      Caption = #26102#38388
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label17: TLabel
      Left = 456
      Top = 101
      Width = 26
      Height = 13
      Caption = #22320#28857
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label15: TLabel
      Left = 283
      Top = 99
      Width = 39
      Height = 13
      Caption = #21442#19982#32773
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label19: TLabel
      Left = 267
      Top = 151
      Width = 52
      Height = 13
      Caption = #20154#25991#20869#28085
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label1: TLabel
      Left = 605
      Top = 277
      Width = 33
      Height = 13
      Caption = #22270#31034'1'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label24: TLabel
      Left = 800
      Top = 277
      Width = 33
      Height = 13
      Caption = #22270#31034'2'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object ZYPTBH: TEdit
      Left = 115
      Top = 17
      Width = 148
      Height = 21
      Color = clWhite
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      MaxLength = 18
      TabOrder = 0
    end
    object qw: TEdit
      Left = 328
      Top = 70
      Width = 657
      Height = 21
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      TabOrder = 9
      OnKeyPress = qwKeyPress
    end
    object GM: TEdit
      Left = 488
      Top = 43
      Width = 221
      Height = 21
      Color = clWhite
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      MaxLength = 255
      TabOrder = 6
      OnKeyPress = GMKeyPress
    end
    object zl: TComboBox
      Left = 328
      Top = 17
      Width = 105
      Height = 21
      Color = clWhite
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 13
      TabOrder = 1
      OnDropDown = zlDropDown
      OnKeyPress = zlKeyPress
      OnSelect = zlSelect
    end
    object jjnd: TEdit
      Left = 115
      Top = 69
      Width = 148
      Height = 21
      TabOrder = 8
      OnKeyPress = jjndKeyPress
    end
    object SYQ: TEdit
      Left = 115
      Top = 122
      Width = 148
      Height = 21
      Color = clWhite
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      MaxLength = 255
      TabOrder = 14
      OnKeyPress = SYQKeyPress
    end
    object bhzk: TEdit
      Left = 328
      Top = 122
      Width = 657
      Height = 21
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      TabOrder = 15
    end
    object qtd: TMemo
      Left = 32
      Top = 298
      Width = 275
      Height = 163
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      ScrollBars = ssVertical
      TabOrder = 19
    end
    object mxjz: TMemo
      Left = 32
      Top = 166
      Width = 240
      Height = 100
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      Lines.Strings = (
        '')
      ScrollBars = ssVertical
      TabOrder = 16
    end
    object kxjz: TMemo
      Left = 768
      Top = 166
      Width = 240
      Height = 100
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      ScrollBars = ssVertical
      TabOrder = 17
    end
    object jj: TMemo
      Left = 320
      Top = 298
      Width = 275
      Height = 163
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ScrollBars = ssVertical
      TabOrder = 20
    end
    object jdzhqk: TMemo
      Left = 522
      Top = 166
      Width = 240
      Height = 100
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      ScrollBars = ssVertical
      TabOrder = 18
    end
    object BitBtn1: TBitBtn
      Left = 592
      Top = 475
      Width = 65
      Height = 32
      Caption = #22686#21152
      TabOrder = 23
      OnClick = BitBtn1Click
      Glyph.Data = {
        36100000424D3610000000000000360000002800000020000000200000000100