roomc.~dfm

使用delphi自带的控件

object FrmMain: TFrmMain
  Left = 299
  Top = 94
  Width = 653
  Height = 417
  Caption = 'FrmMain'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020040000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000077777770000000000
    0000000000077777777777777000000000000000007777777777777777700000
    0000000077777777777777777777000000000007777777777700777777770000
    000000777777777770DD07777777000000000077777777770DDDD07777770000
    0000077777777770DDDDDD07777700000000077777777770DDDDDD0777770000
    0000077777777770000000077777000000000777777777777777777777770000
    0000077777777777777777777777000000000077777777777777777777770000
    000007FF000077777777777777770000000007F0000007777777777777770000
    00000FF000000077777770777777000000007FF0000000777777700077700000
    00007FFFFF000077777770000700000000077FFFFFFF00777777707000000008
    88077F000000007777777070000708888807FF00000000777777707700770888
    8077FF000000007777777707777088880770FFF0000007777777777000078888
    0870FFFF000007777777777777778888087700FFFF0077777777777777778880
    8887770000777777777777777777888080887777777777708777770877778880
    8088770877777708877777088777888088087008877077088807708887778880
    888000888007770888700088877088800888800008877708888880000007FFFF
    E01FFFFE0007FFFC0001FFF00000FFE00000FFC00000FF800000FF800000FF00
    0000FF000000FF000000FF000000FF000000FF800000FF000000FF000000FF00
    0000FE000000FE000000E0000000800000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  Menu = mmuMain
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object sbrMain: TStatusBar
    Left = 0
    Top = 344
    Width = 645
    Height = 19
    Panels = <
      item
        Text = #21457#36215#19968#20010#32593#32476#20250#35758
        Width = 300
      end
      item
        Text = '5'#20010#20250#35758
        Width = 100
      end
      item
        Text = #23458#25143#31471
        Width = 200
      end>
    OnResize = sbrMainResize
  end
  object tbrMain: TToolBar
    Left = 0
    Top = 0
    Width = 645
    Height = 38
    ButtonHeight = 38
    ButtonWidth = 39
    Caption = 'tbrMain'
    Images = ImageList2
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object tbnLogOn: TToolButton
      Left = 0
      Top = 2
      Action = acnLogOn
    end
    object tbnLogOff: TToolButton
      Left = 39
      Top = 2
      Action = acnLogOff
    end
    object ToolButton7: TToolButton
      Left = 78
      Top = 2
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object tbnAddCorrMan: TToolButton
      Left = 86
      Top = 2
      Action = acnAddCorrMan
    end
    object tbnDelCorrMan: TToolButton
      Left = 125
      Top = 2
      Action = acnDelCorrMan
    end
    object ToolButton10: TToolButton
      Left = 164
      Top = 2
      Width = 8
      Caption = 'ToolButton10'
      ImageIndex = 8
      Style = tbsSeparator
    end
    object tbnOpenRoom: TToolButton
      Left = 172
      Top = 2
      Action = acnOpenRoom
    end
    object tbnAttendRoom: TToolButton
      Left = 211
      Top = 2
      Action = acnAttendRoom
    end
  end
  object pclMain: TPageControl
    Left = 0
    Top = 38
    Width = 645
    Height = 306
    ActivePage = tstCorrMan
    Align = alClient
    TabOrder = 2
    OnChange = pclMainChange
    object tstRoom: TTabSheet
      Caption = #21487#20197#21442#21152#30340#20250#35758
      object pnlRoom: TPanel
        Left = 0
        Top = 0
        Width = 637
        Height = 278
        Align = alClient
        BevelOuter = bvNone
        Caption = #30446#21069#27809#26377#21487#21442#21152#30340#32593#32476#20250#35758
        TabOrder = 0
        object lvwRoom: TListView
          Left = 0
          Top = 0
          Width = 637
          Height = 278
          Hint = #25105#21487#20197#21442#21152#30340#20250#35758
          Align = alClient
          Columns = <
            item
              Caption = #20027#39064
              Width = 250
            end
            item
              Caption = #29366#24577
              Width = 70
            end
            item
              Caption = #21457#36215#20154
              Width = 100
            end
            item
              Caption = #37325#35201#31561#32423
              Width = 80
            end
            item
              Caption = #39044#35745#20154#25968
              Width = 80
            end
            item
              Caption = #24320#22987#26102#38388
              Width = 120
            end
            item
              Caption = #22791#27880
              Width = 350
            end>
          ParentShowHint = False
          PopupMenu = pmuRoom
          ShowHint = True
          SmallImages = ImageList1
          TabOrder = 0
          ViewStyle = vsReport
          OnInfoTip = lvwRoomInfoTip
          OnSelectItem = lvwRoomSelectItem
        end
      end
    end
    object tstCorrMan: TTabSheet
      Caption = #25105#30340#32852#31995#20154
      ImageIndex = 1
      object pnlCorrMan: TPanel
        Left = 0
        Top = 0
        Width = 637
        Height = 278
        Align = alClient
        BevelOuter = bvNone
        Caption = #30446#21069#27809#26377#30456#20851#30340#32852#31995#20154
        TabOrder = 0
        object lvwCorrMan: TListView
          Left = 0
          Top = 0
          Width = 637
          Height = 278
          Hint = #25105#30340#32852#31995#20154
          Align = alClient
          Columns = <
            item
              Caption = #31216#21628
              Width = 160
            end
            item
              Caption = #30005#23376#37038#20214
              Width = 300
            end
            item
              Caption = #21457#35328#25968
              Width = 80