unit17.dfm

用Delphi做一个公寓管理系统

object Form_userconfig: TForm_userconfig
  Left = 214
  Top = 116
  AutoScroll = False
  Caption = #29992#25143#35774#32622
  ClientHeight = 442
  ClientWidth = 685
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 29
    Top = 48
    Width = 60
    Height = 13
    Caption = #29992#25143#21517' '#65306'   '
  end
  object Label2: TLabel
    Left = 29
    Top = 85
    Width = 60
    Height = 13
    Caption = '  '#23494'    '#30721#65306'  '
  end
  object Label3: TLabel
    Left = 29
    Top = 122
    Width = 60
    Height = 13
    Caption = #30830#35748#23494#30721#65306
  end
  object Label4: TLabel
    Left = 29
    Top = 160
    Width = 51
    Height = 13
    Caption = '  '#26435'   '#38480#65306
  end
  object Label5: TLabel
    Left = 31
    Top = 200
    Width = 48
    Height = 13
    Caption = '  '#22791'  '#27880#65306
  end
  object DBGrid1: TDBGrid
    Left = 308
    Top = 0
    Width = 377
    Height = 442
    Align = alRight
    Ctl3D = False
    DataSource = DataSource1
    ParentCtl3D = False
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Edit1: TEdit
    Left = 125
    Top = 40
    Width = 121
    Height = 21
    TabOrder = 1
  end
  object Edit2: TEdit
    Left = 125
    Top = 80
    Width = 121
    Height = 21
    PasswordChar = '*'
    TabOrder = 2
  end
  object Edit3: TEdit
    Left = 125
    Top = 120
    Width = 121
    Height = 21
    PasswordChar = '*'
    TabOrder = 3
  end
  object ComboBox1: TComboBox
    Left = 125
    Top = 160
    Width = 145
    Height = 21
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 4
    Text = #25805#20316#21592
    Items.Strings = (
      #25805#20316#21592
      #31649#29702#21592)
  end
  object Memo1: TMemo
    Left = 125
    Top = 200
    Width = 161
    Height = 89
    Lines.Strings = (
      '')
    TabOrder = 5
  end
  object RadioButton1: TRadioButton
    Left = 32
    Top = 312
    Width = 113
    Height = 17
    Caption = #26032#22686#19968#20010#29992#25143
    Checked = True
    TabOrder = 6
    TabStop = True
  end
  object RadioButton2: TRadioButton
    Left = 32
    Top = 352
    Width = 113
    Height = 17
    Caption = #21024#38500#19968#20010#29992#25143
    TabOrder = 7
  end
  object Button1: TButton
    Left = 91
    Top = 402
    Width = 58
    Height = 25
    Caption = #30830' '#23450
    TabOrder = 8
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 195
    Top = 402
    Width = 58
    Height = 25
    Caption = #21462' '#28040
    TabOrder = 9
    OnClick = Button2Click
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 400
    Top = 304
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'main'
    Filter = 'pawor<>'#39#36229#32423#29992#25143#39
    Filtered = True
    SQL.Strings = (
      'select * from userinfo')
    Left = 360
    Top = 152
  end
end