search.~dfm

关于DEPHI7.0的朋友信息管理系统源代码

object FormSearch: TFormSearch
  Left = 259
  Top = 282
  BorderStyle = bsDialog
  Caption = #8220#26379#21451#8221#26597#35810#31995#32479
  ClientHeight = 184
  ClientWidth = 343
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -10
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 10
  object Label1: TLabel
    Left = 142
    Top = 6
    Width = 35
    Height = 10
    Caption = #22995'   '#21517
  end
  object Label2: TLabel
    Left = 142
    Top = 31
    Width = 40
    Height = 10
    Caption = #20844#21496#21333#20301
  end
  object Label3: TLabel
    Left = 142
    Top = 55
    Width = 40
    Height = 10
    Caption = #27605#19994#38498#26657
  end
  object Label4: TLabel
    Left = 142
    Top = 80
    Width = 40
    Height = 10
    Caption = #22478#24066#22320#21306
  end
  object Label5: TLabel
    Left = 142
    Top = 105
    Width = 40
    Height = 10
    Caption = #21150#20844#30005#35805
  end
  object Label6: TLabel
    Left = 142
    Top = 129
    Width = 40
    Height = 10
    Caption = #30005#23376#37038#20214
  end
  object Bevel2: TBevel
    Left = 132
    Top = 6
    Width = 2
    Height = 149
  end
  object Label7: TLabel
    Left = 6
    Top = 135
    Width = 40
    Height = 10
    Caption = #26597#35810#20869#23481
  end
  object DBEdit2: TDBEdit
    Left = 185
    Top = 31
    Width = 148
    Height = 21
    DataField = 'Corp'
    DataSource = DataModule1.DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentFont = False
    ReadOnly = True
    TabOrder = 10
  end
  object DBEdit3: TDBEdit
    Left = 185
    Top = 55
    Width = 148
    Height = 21
    DataField = 'GraduateSchool'
    DataSource = DataModule1.DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentFont = False
    ReadOnly = True
    TabOrder = 2
  end
  object DBEdit4: TDBEdit
    Left = 185
    Top = 80
    Width = 80
    Height = 21
    DataField = 'District'
    DataSource = DataModule1.DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentFont = False
    ReadOnly = True
    TabOrder = 6
  end
  object DBEdit5: TDBEdit
    Left = 185
    Top = 105
    Width = 80
    Height = 21
    DataField = 'OfficePhone'
    DataSource = DataModule1.DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentFont = False
    ReadOnly = True
    TabOrder = 7
  end
  object DBEdit6: TDBEdit
    Left = 185
    Top = 129
    Width = 148
    Height = 21
    DataField = 'EMail'
    DataSource = DataModule1.DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentFont = False
    ReadOnly = True
    TabOrder = 8
  end
  object BTNMore: TButton
    Left = 142
    Top = 160
    Width = 57
    Height = 19
    Caption = #26356#22810#20449#24687'(&M)'
    TabOrder = 4
    OnClick = BTNMoreClick
  end
  object BTNSearch: TButton
    Left = 49
    Top = 160
    Width = 76
    Height = 19
    Caption = #26597#35810'(&S)'
    Default = True
    TabOrder = 3
    OnClick = BTNSearchClick
  end
  object BTNClose: TButton
    Left = 215
    Top = 160
    Width = 58
    Height = 19
    Caption = #20851#38381'(&X)'
    TabOrder = 5
    OnClick = BTNCloseClick
  end
  object Edit1: TEdit
    Left = 49
    Top = 129
    Width = 75
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 0
    OnChange = Edit1Change
  end
  object DBEdit1: TDBEdit
    Left = 185
    Top = 6
    Width = 93
    Height = 21
    DataField = 'ChineseName'
    DataSource = DataModule1.DataSource1
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ReadOnly = True
    TabOrder = 9
  end
  object RadioGroup1: TRadioGroup
    Left = 12
    Top = 6
    Width = 112
    Height = 118
    Caption = #26597#35810#23383#27573
    ItemIndex = 0
    Items.Strings = (
      #22995#21517
      #20844#21496#21333#20301
      #27605#19994#38498#26657
      #21150#20844#30005#35805
      'EMail')
    TabOrder = 1
    OnClick = RadioGroup1Click
  end
end