frmregister.dfm

毕业论文源码 毕业论文源码 毕业论文源码

object RegisterRoom: TRegisterRoom
  Left = 215
  Top = 177
  Width = 696
  Height = 480
  Caption = #20303#23487#30331#35760
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  PixelsPerInch = 96
  TextHeight = 13
  object TabControl1: TTabControl
    Left = 0
    Top = 24
    Width = 1025
    Height = 697
    TabOrder = 0
    Tabs.Strings = (
      #25955#23458#30331#35760
      #22242#38431#30331#35760)
    TabIndex = 0
    object StatusBar1: TStatusBar
      Left = 4
      Top = 674
      Width = 1017
      Height = 19
      Panels = <>
      SimplePanel = False
    end
    object ToolBar2: TToolBar
      Left = 4
      Top = 24
      Width = 1017
      Height = 29
      ButtonHeight = 21
      ButtonWidth = 55
      Caption = 'ToolBar2'
      Color = clBtnShadow
      ParentColor = False
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = True
      TabOrder = 1
      object btnRegister: TToolButton
        Left = 0
        Top = 2
        Caption = #20303#23487#30331#35760
        ImageIndex = 0
        OnClick = btnRegisterClick
      end
      object ToolButton2: TToolButton
        Left = 55
        Top = 2
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 2
        Style = tbsSeparator
      end
      object btnModify: TToolButton
        Left = 63
        Top = 2
        Caption = #20462#25913
        ImageIndex = 2
      end
      object ToolButton4: TToolButton
        Left = 118
        Top = 2
        Width = 8
        Caption = 'ToolButton4'
        ImageIndex = 3
        Style = tbsSeparator
      end
      object btnChangeRoom: TToolButton
        Left = 126
        Top = 2
        Caption = #26356#25442#25151#38388
        ImageIndex = 3
      end
      object ToolButton5: TToolButton
        Left = 181
        Top = 2
        Width = 8
        Caption = 'ToolButton5'
        ImageIndex = 4
        Style = tbsSeparator
      end
      object btnClose: TToolButton
        Left = 189
        Top = 2
        Caption = #20851#38381#31383#21475
        ImageIndex = 4
      end
    end
    object DBGrid1: TDBGrid
      Left = 8
      Top = 56
      Width = 1017
      Height = 617
      DataSource = DataSource1
      TabOrder = 2
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 1025
    Height = 25
    Caption = 'ToolBar1'
    Color = clGradientActiveCaption
    ParentColor = False
    TabOrder = 1
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 304
    Top = 8
  end
  object Table1: TTable
    Active = True
    AutoRefresh = True
    DatabaseName = 'rooms'
    TableName = 'RoomInfo.DB'
    Left = 344
    Top = 8
  end
  object Query1: TQuery
    DatabaseName = 'rooms'
    SQL.Strings = (
      'select * from RoomInfo')
    Left = 384
    Top = 8
  end
end