unit9.dfm

用Delphi做一个公寓管理系统

object Form_info_q1: TForm_info_q1
  Left = 228
  Top = 111
  Width = 696
  Height = 480
  Caption = #26597#25214#23398#29983#8212#8212#25353#22995#21517
  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 Label5: TLabel
    Left = 214
    Top = 210
    Width = 33
    Height = 13
    Caption = #24615#21035'   '
  end
  object Label6: TLabel
    Left = 214
    Top = 264
    Width = 48
    Height = 13
    Caption = #23517#23460#21495'    '
  end
  object Label7: TLabel
    Left = 214
    Top = 304
    Width = 48
    Height = 13
    Caption = #24202#20301#21495'    '
  end
  object Label4: TLabel
    Left = 214
    Top = 168
    Width = 36
    Height = 13
    Caption = #22995#21517'    '
  end
  object Label2: TLabel
    Left = 214
    Top = 88
    Width = 36
    Height = 13
    Caption = #31995#21035'    '
  end
  object Label1: TLabel
    Left = 210
    Top = 48
    Width = 33
    Height = 13
    Caption = #23398#21495'   '
  end
  object Image1: TImage
    Left = 504
    Top = 16
    Width = 137
    Height = 161
  end
  object Label3: TLabel
    Left = 215
    Top = 128
    Width = 66
    Height = 13
    Caption = #20837#23398#26102#38388'      '
  end
  object Label9: TLabel
    Left = 442
    Top = 197
    Width = 39
    Height = 13
    Caption = #22791#27880'     '
  end
  object Label10: TLabel
    Left = 440
    Top = 16
    Width = 33
    Height = 13
    Caption = #29031#29255'   '
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 185
    Height = 442
    Align = alLeft
    Caption = #25353#22995#21517#26597#25214
    TabOrder = 0
    object Label8: TLabel
      Left = 8
      Top = 72
      Width = 132
      Height = 13
      Caption = #35831#36755#20837#35201#26597#25214#30340#22995#21517' '#65306'   '
    end
    object Edit5: TEdit
      Left = 24
      Top = 112
      Width = 129
      Height = 21
      TabOrder = 0
    end
    object Button1: TButton
      Left = 88
      Top = 176
      Width = 75
      Height = 25
      Caption = #24320#22987#26597#25214
      Default = True
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object DBEdit1: TDBEdit
    Left = 299
    Top = 40
    Width = 121
    Height = 21
    DataField = 'sno'
    DataSource = DataSource1
    TabOrder = 1
  end
  object DBEdit2: TDBEdit
    Left = 299
    Top = 82
    Width = 121
    Height = 21
    DataField = 'sdept'
    DataSource = DataSource1
    TabOrder = 2
  end
  object DBEdit3: TDBEdit
    Left = 299
    Top = 125
    Width = 121
    Height = 21
    DataField = 'time_s'
    DataSource = DataSource1
    TabOrder = 3
  end
  object DBEdit4: TDBEdit
    Left = 299
    Top = 168
    Width = 121
    Height = 21
    DataField = 'sname'
    DataSource = DataSource1
    TabOrder = 4
  end
  object DBEdit5: TDBEdit
    Left = 299
    Top = 210
    Width = 121
    Height = 21
    DataField = 'ssex'
    DataSource = DataSource1
    TabOrder = 5
  end
  object DBEdit6: TDBEdit
    Left = 299
    Top = 253
    Width = 121
    Height = 21
    DataField = 'Num_room'
    DataSource = DataSource1
    TabOrder = 6
  end
  object DBEdit7: TDBEdit
    Left = 299
    Top = 296
    Width = 121
    Height = 21
    DataField = 'Num_bed'
    DataSource = DataSource1
    TabOrder = 7
  end
  object DBMemo1: TDBMemo
    Left = 483
    Top = 220
    Width = 185
    Height = 153
    DataField = 'remark'
    DataSource = DataSource1
    TabOrder = 8
  end
  object Button_next: TButton
    Left = 376
    Top = 400
    Width = 75
    Height = 25
    Caption = #19979#19968#20010
    Enabled = False
    TabOrder = 9
    OnClick = Button_nextClick
  end
  object Button_Prior: TButton
    Left = 256
    Top = 400
    Width = 75
    Height = 25
    Caption = #19978#19968#20010
    Enabled = False
    TabOrder = 10
    OnClick = Button_PriorClick
  end
  object Button2: TButton
    Left = 496
    Top = 400
    Width = 75
    Height = 25
    Caption = #30830'   '#23450
    TabOrder = 11
    OnClick = Button2Click
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 144
    Top = 296
  end
  object Query1: TQuery
    DatabaseName = 'main'
    SQL.Strings = (
      'select * from student')
    Left = 64
    Top = 296
  end
end