unit12.dfm

学生宿舍管理系统,用于宿舍的信息管理,简单容易用.

    object TabSheet2: TTabSheet
      Caption = #22995#21517#26597#35810
      ImageIndex = 1
      object GroupBox6: TGroupBox
        Left = 16
        Top = 16
        Width = 569
        Height = 361
        TabOrder = 0
        object Label7: TLabel
          Left = 24
          Top = 104
          Width = 153
          Height = 13
          AutoSize = False
          Caption = #26597#35810#21040#30340#23398#29983#22995#21517
        end
        object Label8: TLabel
          Left = 256
          Top = 104
          Width = 233
          Height = 13
          AutoSize = False
          Caption = '('#21452#20987#34920#20013#30340#23398#21495#21363#21487#24471#21040#35813#23398#29983#30340#24773#20917')'
        end
        object Label9: TLabel
          Left = 16
          Top = 216
          Width = 121
          Height = 13
          AutoSize = False
          Caption = #23398#29983#23398#26399#27880#20876#24773#20917
        end
        object GroupBox7: TGroupBox
          Left = 16
          Top = 16
          Width = 529
          Height = 57
          TabOrder = 0
          object Label5: TLabel
            Left = 24
            Top = 16
            Width = 89
            Height = 17
            AutoSize = False
            Caption = #35831#36755#20837#22995#21517':'
          end
          object Label6: TLabel
            Left = 416
            Top = 24
            Width = 105
            Height = 13
            AutoSize = False
            Caption = '('#25903#25345#27169#31946#26597#35810')'
          end
          object Edit2: TEdit
            Left = 128
            Top = 16
            Width = 121
            Height = 21
            TabOrder = 0
            OnKeyPress = Edit2KeyPress
          end
          object BitBtn2: TBitBtn
            Left = 312
            Top = 16
            Width = 75
            Height = 25
            Caption = #26597#35810
            TabOrder = 1
            OnClick = BitBtn2Click
            Kind = bkHelp
          end
        end
        object GroupBox8: TGroupBox
          Left = 8
          Top = 88
          Width = 553
          Height = 9
          TabOrder = 1
        end
        object DBGrid3: TDBGrid
          Left = 16
          Top = 120
          Width = 537
          Height = 73
          DataSource = DataSource3
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          ReadOnly = True
          TabOrder = 2
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnDblClick = DBGrid3DblClick
          Columns = <
            item
              Expanded = False
              FieldName = #23398#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22995#21517
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24615#21035
              Width = 30
              Visible = True
            end
            item
              Expanded = False
              FieldName = #25919#27835#38754#35980
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = #31995#21035
              Width = 80
              Visible = True
            end
            item
              Expanded = False
              FieldName = #29677#32423
              Width = 100
              Visible = True
            end
            item
              Expanded = False
              FieldName = #30005#35805
              Width = 80
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22791#27880
              Width = 200
              Visible = True
            end>
        end
        object GroupBox9: TGroupBox
          Left = 8
          Top = 200
          Width = 553
          Height = 9
          TabOrder = 3
        end
        object DBGrid4: TDBGrid
          Left = 8
          Top = 240
          Width = 537
          Height = 97
          DataSource = DataSource4
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          ReadOnly = True
          TabOrder = 4
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = #23398#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22995#21517
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23517#23460#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23395#24230
              Visible = True
            end
            item
              Expanded = False
              FieldName = #20132#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24773#20917
              Visible = True
            end
            item
              Expanded = False
              FieldName = #27880#20876#26085#26399
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22791#27880
              Visible = True
            end>
        end
      end
    end
  end
  object ADOQuery1: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 688
    Top = 96
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 688
    Top = 128
  end
  object ADOQuery2: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 688
    Top = 160
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 688
    Top = 192
  end
  object ADOQuery3: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 696
    Top = 272
  end
  object ADOQuery4: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 696
    Top = 368
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 696
    Top = 312
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 688
    Top = 408
  end
end