unit2.dfm

查询邮编、区号、身份证、手机归属地的小软件

      2049302049302049302049302049302049302049302049302049302049302049
      3020493020493020493020493020493020493020493020493020634736DAB89A
      DAB89ADAB89ADAB89ADAB89ADAB89A5252525252525252525252525252525252
      52525252525252DAB89ADAB89ADAB89ADAB89ADAB89ADAB89A52525252525252
      5252525252DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A
      DAB89A525252525252525252525252DAB89A525252525252525252525252DAB8
      9ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A52525252525252525252525252
      5252525252525252525252525252DAB89ADAB89A525252000000000000808080
      4930204930204930204930204930204930204930204930204930204930204930
      2049302049302049302049302049302049302049302049302049302049302049
      3020634736DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A
      DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB8
      9ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADA
      B89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A
      DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB8
      9ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A52525200
      0000000000808080493020493020493020493020493020493020493020493020
      4930204930204930204930204930204930204930204930204930204930204930
      20493020493020493020634736DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADA
      B89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A
      DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB8
      9ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADA
      B89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89A
      DAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB89ADAB8
      9ADAB89A52525200000000000072727280808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080808080808080808080808080808080808080808080
      8080808080808080808080807272720000008000FF0000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000008000FF}
    OnClick = Image1Click
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 297
    Height = 289
    ActivePage = TabSheet1
    Align = alLeft
    Style = tsFlatButtons
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #37038#32534#21306#21495
      object Label1: TLabel
        Left = 0
        Top = 212
        Width = 65
        Height = 13
        Caption = #26597#35810#26041#24335#65306
      end
      object Label2: TLabel
        Left = 2
        Top = 238
        Width = 65
        Height = 13
        Caption = #26597#35810#20869#23481#65306
      end
      object Edit1: TEdit
        Left = 70
        Top = 235
        Width = 105
        Height = 19
        TabOrder = 0
      end
      object ComboBox1: TComboBox
        Left = 70
        Top = 208
        Width = 105
        Height = 21
        BevelKind = bkTile
        Style = csDropDownList
        Ctl3D = False
        ItemHeight = 13
        ItemIndex = 0
        ParentCtl3D = False
        TabOrder = 1
        Text = #20840#37096#23383#27573
        Items.Strings = (
          #20840#37096#23383#27573
          #21306'    '#21495
          #37038'    '#32534
          #21439' '#24066' '#21517
          #30465'    '#21517)
      end
      object Button1: TButton
        Left = 181
        Top = 205
        Width = 100
        Height = 49
        Caption = #26597'    '#35810
        TabOrder = 2
        OnClick = Button1Click
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 1
        Width = 281
        Height = 200
        Color = 15794175
        Ctl3D = False
        DataSource = DataSource1
        FixedColor = clSkyBlue
        Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 3
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = #21306#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = #30465#21517
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21439#24066#21517
            Visible = True
          end
          item
            Expanded = False
            FieldName = #37038#32534
            Visible = True
          end>
      end
    end
    object TabSheet2: TTabSheet
      Caption = #36523' '#20221' '#35777
      ImageIndex = 1
      object Label3: TLabel
        Left = -1
        Top = 10
        Width = 78
        Height = 13
        Caption = #36523#20221#35777#21495#30721#65306
      end
      object Edit2: TEdit
        Left = 76
        Top = 7
        Width = 137
        Height = 19
        MaxLength = 18
        TabOrder = 0
        OnKeyPress = Edit2KeyPress
      end
      object Memo1: TMemo
        Left = 0
        Top = 40
        Width = 281
        Height = 217
        Lines.Strings = (
          '')
        TabOrder = 1
      end
      object Button2: TButton
        Left = 223
        Top = 2
        Width = 50
        Height = 25
        Caption = #26597#35810
        TabOrder = 2
        OnClick = Button2Click
      end
    end
    object TabSheet3: TTabSheet
      Caption = #25163'  '#26426
      ImageIndex = 2
      object Label4: TLabel
        Left = -1
        Top = 10
        Width = 65
        Height = 13
        Caption = #25163#26426#21495#30721#65306
      end
      object Memo2: TMemo
        Left = 0
        Top = 40
        Width = 281
        Height = 217
        Lines.Strings = (
          '')
        TabOrder = 0
      end
      object Edit3: TEdit
        Left = 76
        Top = 7
        Width = 137
        Height = 19
        MaxLength = 11
        TabOrder = 1
        OnKeyPress = Edit2KeyPress
      end
      object Button3: TButton
        Left = 223
        Top = 2
        Width = 50
        Height = 25
        Caption = #26597#35810
        TabOrder = 2
        OnClick = Button3Click
      end
    end
  end
  object ADOQuery1: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM DATA')
    Left = 320
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 352
    Top = 8
  end
  object ADOQuery2: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM DATA')
    Left = 320
    Top = 40
  end
end