newuser.dfm

一个由Tlistview写的通讯录

object NewUserf: TNewUserf
  Left = 310
  Top = -9
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #32852#31995#20154#20449#24687
  ClientHeight = 350
  ClientWidth = 510
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 23
    Top = 12
    Width = 20
    Height = 27
    Picture.Data = {
      07544269746D61704E060000424D4E0600000000000036000000280000001400
      00001A000000010018000000000018060000C40E0000C40E0000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000C8D0D4C8D0D4C8D0D48000
      00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF
      0000FF0000FF0000FF0000FF0000000000C8D0D4C8D0D4C8D0D4800000FF0000
      FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
      00FF0000FF0000FF0000000000C8D0D4C8D0D4C8D0D4C8D0D4800000FF0000FF
      0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000
      FF0000000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4800000FF0000FF00
      00FF0000FF0000000000000000000000000000000000000000000000000000C8
      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4800000000000000000
      000000FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0000000C8D0D4C8D0D4C8D0
      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000000000FFFFFFC0
      C0C0FFFFFFC0C0C0FFFFFFC0C0C0C0C0C0000000C8D0D4C8D0D4C8D0D4C8D0D4
      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000000000C0C0C0FFFFFFC0C0
      C0000000000000000000000000000000000000C8D0D4C8D0D4C8D0D4C8D0D4C8
      D0D4C8D0D4C8D0D4C8D0D4000000000000000000FFFFFFC0C0C0000000C0C0C0
      FFFFFFC0C0C0FFFFFFC0C0C0FFFFFF000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0
      D4C8D0D4000000000000000000000000C0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FF
      FFFFC0C0C0FFFFFFC0C0C0FFFFFF000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
      000000000000000000000000000000C0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFF
      FFC0C0C0FFFFFFC0C0C0000000C8D0D4C8D0D4C8D0D4C8D0D400000000000000
      0000000000000000000000FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFF
      C0C0C0FFFFFF000000C8D0D4C8D0D4C8D0D40000000000000000000000000000
      00000000000000C0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0
      C0C0000000C8D0D4C0C0C0C8D0D4000000000000000000000000000000000000
      000000000000C0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFF0000
      00000000000000000000000000000000000000000000000000000000FFFFFFC0
      C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0
      FFFFFF000000000000000000000000000000000000000000C0C0C0FFFFFFC0C0
      C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0C0C0FFFFFF000000C0
      C0C0000000000000000000000000000000000000FFFFFFC0C0C0FFFFFFC0C0C0
      FFFFFFC0C0C0FFFFFFC0C0C0800000800000FFFFFF000000C0C0C0C8D0D40000
      00000000000000000000000000000000000000FFFFFFC0C0C0FFFFFFC0C0C0FF
      FFFFC0C0C0FFFFFF800000800000000000000000C8D0D4C8D0D4000000000000
      000000000000000000000000000000000000FFFFFFC0C0C0FFFFFFC0C0C0FFFF
      FFC0C0C0FFFFFFC0C0C0000000C8D0D4C8D0D4C8D0D400000000000000000000
      0000000000000000000000000000000000FFFFFFC0C0C0FFFFFFC0C0C0FFFFFF
      C0C0C0FFFFFF000000000000C8D0D4C8D0D4C8D0D40000000000000000000000
      00000000000000000000000000000000FFFFFFC0C0C0FFFFFFC0C0C0FFFFFFC0
      C0C0000000000000000000C8D0D4C8D0D4C8D0D4000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000C8D0D4C8D0D4C8D0D400000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000C8D0D4C8D0D4C8D0D4C8D0D40000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000000000C8D0D4C8
      D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000000000000000000000000000
      000000000000000000000000000000000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0
      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D400000000000000000000000000000000
      0000000000000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4}
  end
  object Label1: TLabel
    Left = 72
    Top = 20
    Width = 169
    Height = 13
    Caption = #22312#27492#36755#20837#35813#32852#31995#20154#30340#35814#32454#20449#24687
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 10
    Top = 48
    Width = 480
    Height = 2
  end
  object Label2: TLabel
    Left = 30
    Top = 67
    Width = 54
    Height = 13
    Caption = #22995#21517'(&N):'
    FocusControl = NameEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 30
    Top = 102
    Width = 54
    Height = 13
    Caption = #25163#26426'(&M):'
    FocusControl = MoveTelEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 30
    Top = 137
    Width = 54
    Height = 13
    Hint = #21150#20844#30005#35805
    Caption = #21150#20844'(&O):'
    FocusControl = OfficeEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label5: TLabel
    Left = 30
    Top = 172
    Width = 54
    Height = 13
    Caption = #20844#21496'(&C):'
    FocusControl = CompanyEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 261
    Top = 66
    Width = 54
    Height = 13
    Caption = #29983#26085'(&B):'
    FocusControl = BirthdayEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 261
    Top = 101
    Width = 54
    Height = 13
    Caption = #23429#30005'(&H):'
    FocusControl = HomeTelEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 261
    Top = 137
    Width = 54
    Height = 13
    Caption = #20256#30495'(&F):'
    FocusControl = FaxEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label15: TLabel
    Left = 261
    Top = 172
    Width = 54
    Height = 13
    Caption = #37038#32534'(&P):'
    FocusControl = PostCodeEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object NameEdit: TEdit
    Left = 85
    Top = 64
    Width = 152
    Height = 21
    BevelOuter = bvRaised
    Ctl3D = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 20
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object MoveTelEdit: TEdit
    Left = 85
    Top = 99
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 15
    ParentFont = False
    TabOrder = 2
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object OfficeEdit: TEdit
    Left = 85
    Top = 134
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 19
    ParentFont = False
    TabOrder = 4
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object CompanyEdit: TEdit
    Left = 85
    Top = 169
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 50
    ParentFont = False
    TabOrder = 6
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object BirthdayEdit: TEdit
    Left = 316
    Top = 64
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 10
    ParentFont = False
    TabOrder = 1
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object HomeTelEdit: TEdit
    Left = 316
    Top = 99
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 15
    ParentFont = False
    TabOrder = 3
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object FaxEdit: TEdit
    Left = 316
    Top = 134
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 15
    ParentFont = False
    TabOrder = 5
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object PostCodeEdit: TEdit
    Left = 316
    Top = 169
    Width = 152
    Height = 21
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 6
    ParentFont = False
    TabOrder = 7
    OnChange = NameEditChange
    OnKeyPress = NameEditKeyPress
  end
  object Panel1: TPanel
    Left = 0
    Top = 204
    Width = 510
    Height = 146
    Align = alBottom
    BevelOuter = bvNone
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 8
    object Label6: TLabel
      Left = 4
      Top = 72
      Width = 80
      Height = 13
      Caption = #36890#35759#22320#22336'(&A):'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 30
      Top = 3
      Width = 54
      Height = 13
      Caption = #32593#39029'(&W):'
      FocusControl = WebEdit
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 4
      Top = 38
      Width = 80
      Height = 13
      Caption = #30005#23376#37038#20214'(&E):'
      FocusControl = EmailEdit
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object WebEdit: TEdit
      Left = 85
      Top = 0
      Width = 406
      Height = 21
      Ctl3D = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      MaxLength = 100
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      Text = 'http://'
      OnChange = NameEditChange
      OnKeyPress = NameEditKeyPress
    end
    object EmailEdit: TEdit
      Left = 85
      Top = 35
      Width = 406
      Height = 21
      Ctl3D = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      MaxLength = 50
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      OnChange = NameEditChange
      OnKeyPress = NameEditKeyPress
    end
    object Button1: TButton
      Left = 319
      Top = 106
      Width = 75
      Height = 25
      Caption = '&O.'#30830#23450
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 410
      Top = 106
      Width = 75
      Height = 25
      Caption = '&C.'#21462#28040
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = Button2Click
    end
    object AddressEdit: TComboBox
      Left = 85
      Top = 69
      Width = 406
      Height = 21
      BevelOuter = bvRaised
      Ctl3D = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      MaxLength = 100
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 2
      OnChange = NameEditChange
      OnKeyPress = NameEditKeyPress
      Items.Strings = (
        #27993#27743#30465#20020#28023#24066#36196#22478#36335'55'#21495#20020#28023#21307#33647#26377#38480#20844#21496
        #27993#27743#30465#20020#28023#24066#22478#20851)
    end
  end
end