finduser.dfm

一个由Tlistview写的通讯录

object Findf: TFindf
  Left = 192
  Top = 107
  Width = 450
  Height = 290
  BorderIcons = [biSystemMenu]
  Caption = #26597#25214#29992#25143
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object TabbedNotebook1: TTabbedNotebook
    Left = 16
    Top = 16
    Width = 409
    Height = 225
    PageIndex = 1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    TabFont.Charset = GB2312_CHARSET
    TabFont.Color = clBtnText
    TabFont.Height = -13
    TabFont.Name = #23435#20307
    TabFont.Style = []
    TabOrder = 0
    OnChange = TabbedNotebook1Change
    object TTabPage
      Left = 4
      Top = 24
      Caption = #29992#25143#20449#24687
      object Label2: TLabel
        Left = 33
        Top = 16
        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 Label14: TLabel
        Left = 7
        Top = 114
        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 Label6: TLabel
        Left = 33
        Top = 82
        Width = 54
        Height = 13
        Caption = #22320#22336'(&A):'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 33
        Top = 47
        Width = 54
        Height = 13
        Caption = #30005#35805'(&P):'
        FocusControl = MoveTelEdit
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object NameEdit: TEdit
        Left = 88
        Top = 12
        Width = 182
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        MaxLength = 20
        ParentFont = False
        TabOrder = 0
      end
      object EmailEdit: TEdit
        Left = 88
        Top = 111
        Width = 182
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        MaxLength = 50
        ParentFont = False
        TabOrder = 3
      end
      object MoveTelEdit: TEdit
        Left = 88
        Top = 45
        Width = 182
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        MaxLength = 15
        ParentFont = False
        TabOrder = 1
      end
      object Edit1: TEdit
        Left = 88
        Top = 78
        Width = 182
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        MaxLength = 50
        ParentFont = False
        TabOrder = 2
      end
      object Button1: TButton
        Left = 303
        Top = 36
        Width = 82
        Height = 25
        Caption = #24320#22987#26597#25214'(&S)'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 4
      end
      object Button2: TButton
        Left = 310
        Top = 164
        Width = 75
        Height = 25
        Caption = '&C.'#20851#38381
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 303
        Top = 84
        Width = 82
        Height = 25
        Caption = #20840#37096#28165#38500'(&L)'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 6
        OnClick = Button3Click
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = #35774#32622#23383#20307
      object Label1: TLabel
        Left = 39
        Top = 16
        Width = 60
        Height = 13
        Caption = #23383#20307'(&F)'#65306
        FocusControl = FontNameEdit
      end
      object Label4: TLabel
        Left = 238
        Top = 16
        Width = 60
        Height = 13
        Caption = #22823#23567'(&S)'#65306
        FocusControl = FontSizeEdit
      end
      object FontNameEdit: TEdit
        Left = 38
        Top = 32
        Width = 154
        Height = 21
        TabOrder = 0
        Text = #23435#20307
        OnChange = FontNameEditChange
      end
      object FontSizeEdit: TEdit
        Left = 238
        Top = 32
        Width = 121
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
      end
      object ListBox1: TListBox
        Left = 38
        Top = 54
        Width = 154
        Height = 97
        ItemHeight = 13
        TabOrder = 2
        OnClick = ListBox1Click
      end
      object ListBox2: TListBox
        Left = 238
        Top = 54
        Width = 121
        Height = 97
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ItemHeight = 16
        Items.Strings = (
          '8'
          '10'
          '12'
          '14'
          '18'
          '24'
          '32')
        ParentFont = False
        TabOrder = 3
        OnClick = ListBox1Click
      end
      object Button4: TButton
        Left = 216
        Top = 166
        Width = 75
        Height = 25
        Caption = '&O.'#30830#23450
        TabOrder = 4
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 304
        Top = 166
        Width = 75
        Height = 25
        Caption = '&C.'#21462#28040
        ModalResult = 2
        TabOrder = 5
      end
    end
  end
end