dqjj.dfm

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

      TabOrder = 0
    end
    object gxmc: TComboBox
      Left = 916
      Top = 12
      Width = 84
      Height = 21
      ImeMode = imDisable
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      TabOrder = 3
      OnKeyPress = gxmcKeyPress
      OnSelect = gxmcSelect
    end
    object Gnsczz: TEdit
      Left = 109
      Top = 38
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 4
      Text = '0'
      OnKeyPress = GnsczzKeyPress
    end
    object DYCYGNSCZZ: TEdit
      Left = 309
      Top = 38
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 5
      Text = '0'
      OnEnter = DYCYGNSCZZEnter
      OnKeyPress = DYCYGNSCZZKeyPress
    end
    object DSCYGNSCZZ: TEdit
      Left = 709
      Top = 38
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      MaxLength = 255
      ParentFont = False
      TabOrder = 7
      Text = '0'
      OnKeyPress = DSCYGNSCZZKeyPress
    end
    object dqmc: TComboBox
      Left = 709
      Top = 12
      Width = 84
      Height = 21
      ImeMode = imDisable
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      OnDropDown = dqmcDropDown
      OnKeyPress = dqmcKeyPress
      OnSelect = dqmcSelect
      Items.Strings = (
        ''
        #30707#23478#24196#24066#9
        #20445#23450#24066#9
        #21776#23665#24066#9
        #37039#37112#24066#9
        #24352#23478#21475#24066#9
        #25215#24503#24066#9
        #37026#21488#24066#9
        #31206#30343#23707#24066#9
        #24266#22346#24066#9
        #27815#24030#24066#9
        #34913#27700#24066#9)
    end
    object DECYGNSCZZ: TEdit
      Left = 509
      Top = 38
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      MaxLength = 255
      ParentFont = False
      TabOrder = 6
      Text = '0'
      OnKeyPress = DECYGNSCZZKeyPress
    end
    object ZGZGPJGZ: TEdit
      Left = 309
      Top = 146
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 24
      Text = '0'
      OnKeyPress = ZGZGPJGZKeyPress
    end
    object ZGZGGZZE: TEdit
      Left = 109
      Top = 146
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 23
      Text = '0'
      OnKeyPress = ZGZGGZZEKeyPress
    end
    object WSTZQY: TEdit
      Left = 309
      Top = 200
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 34
      Text = '0'
      OnKeyPress = WSTZQYKeyPress
    end
    object QSHGDZCTZE: TEdit
      Left = 509
      Top = 146
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 25
      Text = '0'
      OnKeyPress = QSHGDZCTZEKeyPress
    end
    object QBGYQYZCZ: TEdit
      Left = 309
      Top = 173
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 29
      Text = '0'
      OnKeyPress = QBGYQYZCZKeyPress
    end
    object nzqy: TEdit
      Left = 708
      Top = 172
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 32
      Text = '0'
      OnKeyPress = nzqyKeyPress
    end
    object jbjs: TEdit
      Left = 916
      Top = 146
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      MaxLength = 255
      ParentFont = False
      TabOrder = 27
      Text = '0'
      OnKeyPress = jbjsKeyPress
    end
    object GYZCZ: TEdit
      Left = 509
      Top = 173
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 30
      Text = '0'
      OnKeyPress = GYZCZKeyPress
    end
    object GYQYZJZ: TEdit
      Left = 109
      Top = 200
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 33
      Text = '0'
      OnKeyPress = GYQYZJZKeyPress
    end
    object GYQYZCZJ: TEdit
      Left = 709
      Top = 200
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 35
      Text = '0'
      OnKeyPress = GYQYZCZJKeyPress
    end
    object GYQYFZZJ: TEdit
      Left = 509
      Top = 200
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 36
      Text = '0'
      OnKeyPress = GYQYFZZJKeyPress
    end
    object GYQYCPXSSR: TEdit
      Left = 109
      Top = 227
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 88
      Text = '0'
      OnKeyPress = GYQYCPXSSRKeyPress
    end
    object GYDW: TEdit
      Left = 709
      Top = 146
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      MaxLength = 255
      ParentFont = False
      TabOrder = 26
      Text = '0'
      OnKeyPress = GYDWKeyPress
    end
    object gxgz: TEdit
      Left = 109
      Top = 173
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 28
      Text = '0'
      OnKeyPress = gxgzKeyPress
    end
    object GATTZQY: TEdit
      Left = 917
      Top = 173
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      MaxLength = 255
      ParentFont = False
      TabOrder = 31
      Text = '0'
      OnKeyPress = GATTZQYKeyPress
    end
    object ZZY: TEdit
      Left = 309
      Top = 388
      Width = 84
      Height = 21
      Color = clWhite
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 68
      Text = '0'
      OnKeyPress = ZZYKeyPress
    end
    object ZRCL: TEdit
      Left = 916
      Top = 333
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 61
      Text = '0'
      OnKeyPress = ZRCLKeyPress
    end
    object ZBZMJ: TEdit
      Left = 109
      Top = 307
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 52
      Text = '0'
      OnKeyPress = ZBZMJKeyPress
    end
    object YXGGMJ: TEdit
      Left = 916
      Top = 280
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 51
      Text = '0'
      OnKeyPress = YXGGMJKeyPress
    end
    object YRCL: TEdit
      Left = 309
      Top = 361
      Width = 84
      Height = 21
      Color = clWhite
      ImeMode = imDisable
      ImeName = #32043#20809#21326#23431#25340#38899'V5'
      MaxLength = 255
      TabOrder = 63
      Text = '0'
      OnKeyPress = YRCLKeyPress
    end
    object YLZWCL: TEdit
      Left = 709
      Top = 334
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 60
      Text = '0'
      OnKeyPress = YLZWCLKeyPress
    end
    object YDYWZL: TEdit
      Left = 109
      Top = 253
      Width = 84
      Height = 20
      Color = clWhite
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImeMode = imDisable
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 42