unit4.~dfm

delphi开发的小软件

object SearchForm: TSearchForm
  Left = 177
  Top = 21
  Width = 716
  Height = 714
  Caption = #20154#21592#20449#24687#32500#25252
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 24
    Top = 24
    Width = 121
    Height = 16
    AutoSize = False
    Caption = #35831#36873#32773#26597#35810#26041#24335#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 296
    Top = 24
    Width = 105
    Height = 16
    AutoSize = False
    Caption = #35831#36755#20837#20851#38190#23383#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 72
    Top = 328
    Width = 48
    Height = 16
    Caption = #32534'    '#21495#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 304
    Top = 328
    Width = 48
    Height = 16
    Caption = #22995'    '#21517#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 72
    Top = 368
    Width = 48
    Height = 16
    Caption = #24615'    '#21035#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 304
    Top = 368
    Width = 48
    Height = 16
    Caption = #24180'    '#40836#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 72
    Top = 408
    Width = 89
    Height = 16
    AutoSize = False
    Caption = #23478'  '#24237'  '#20303'  '#22336#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 256
    Top = 448
    Width = 113
    Height = 16
    AutoSize = False
    Caption = #22870'  '#21169'  '#21450'  '#22788'  '#32602#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object ComboBox1: TComboBox
    Left = 152
    Top = 24
    Width = 121
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 0
    OnSelect = ComboBox1Select
    Items.Strings = (
      #25353#20154#21592#32534#21495#26597#35810
      #25353#20154#21592#22995#21517#26597#35810)
  end
  object Edit1: TEdit
    Left = 408
    Top = 24
    Width = 113
    Height = 21
    MaxLength = 8
    TabOrder = 1
    OnEnter = Edit1Enter
    OnKeyPress = Edit1KeyPress
  end
  object Button1: TButton
    Left = 544
    Top = 24
    Width = 65
    Height = 25
    Caption = #26597'   '#35810
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = Button1Click
  end
  object DBGrid1: TDBGrid
    Left = 16
    Top = 64
    Width = 673
    Height = 233
    DataSource = DataModule1.DataSource1
    Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
    OnEnter = DBGrid1Enter
    Columns = <
      item
        Expanded = False
        FieldName = 'Number'
        Title.Caption = #32534#21495
        Width = 74
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Name'
        Title.Caption = #22995#21517
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Sex'
        Title.Caption = #24615#21035
        Width = 36
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Age'
        Title.Caption = #24180#40836
        Width = 33
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Address'
        Title.Caption = #23478#24237#20303#22336
        Width = 153
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Comment'
        Title.Caption = #22870#21169#21450#22788#32602
        Width = 288
        Visible = True
      end>
  end
  object Button2: TButton
    Left = 280
    Top = 608
    Width = 89
    Height = 33
    Caption = #21024' '#38500' '#35760' '#24405
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = Button2Click
  end
  object Edit2: TEdit
    Left = 144
    Top = 328
    Width = 113
    Height = 21
    MaxLength = 8
    TabOrder = 5
    OnExit = Edit2Exit
    OnKeyPress = Edit2KeyPress
  end
  object Edit3: TEdit
    Left = 360
    Top = 328
    Width = 113
    Height = 21
    MaxLength = 8
    TabOrder = 6
    OnExit = Edit3Exit
    OnKeyPress = Edit3KeyPress
  end
  object Edit5: TEdit
    Left = 360
    Top = 368
    Width = 113
    Height = 21
    MaxLength = 2
    TabOrder = 7
    OnExit = Edit5Exit
    OnKeyPress = Edit5KeyPress
  end
  object Edit6: TEdit
    Left = 168
    Top = 408
    Width = 305
    Height = 21
    TabOrder = 8
    OnExit = Edit6Exit
  end
  object RichEdit1: TRichEdit
    Left = 168
    Top = 472
    Width = 305
    Height = 73
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Lines.Strings = (
      '')
    ParentFont = False
    TabOrder = 9
    OnExit = RichEdit1Exit
  end
  object GroupBox1: TGroupBox
    Left = 504
    Top = 320
    Width = 129
    Height = 137
    Caption = ' '#29031' '#29255' '
    TabOrder = 10
    object Image1: TImage
      Left = 8
      Top = 16
      Width = 113
      Height = 113
    end
  end
  object Button3: TButton
    Left = 536
    Top = 464
    Width = 65
    Height = 25
    Caption = #27983'   '#35272
    TabOrder = 11
  end
  object Button4: TButton
    Left = 144
    Top = 608
    Width = 89
    Height = 33
    Caption = #20462' '#25913' '#35760' '#24405
    TabOrder = 12
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 416
    Top = 608
    Width = 89
    Height = 33
    Caption = #36864'   '#20986
    TabOrder = 13
    OnClick = Button5Click
  end
  object Button6: TButton
    Left = 616
    Top = 24
    Width = 65
    Height = 25
    Caption = #26597#35810#20840#37096
    TabOrder = 14
    OnClick = Button6Click
  end
  object ComboBox2: TComboBox
    Left = 144
    Top = 368
    Width = 113
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 15
    OnExit = ComboBox2Exit
    Items.Strings = (
      #30007
      #22899)
  end
end