unitmanagerroomquery.dfm

来自「自己做过的工程」· DFM 代码 · 共 974 行 · 第 1/2 页

object formmanagerroomquery: Tformmanagerroomquery
  Left = 295
  Top = 200
  BorderStyle = bsDialog
  Caption = #25151#23458#24080#21153#26597#35810
  ClientHeight = 457
  ClientWidth = 536
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object formmanagerroomquery: TPageControl
    Left = -2
    Top = 2
    Width = 538
    Height = 451
    ActivePage = TabSheet1
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #25151#23458#29616#37329#32467#24080#26597#35810
      OnShow = TabSheet1Show
      object Panel2: TPanel
        Left = 0
        Top = -2
        Width = 529
        Height = 291
        Caption = 'Panel2'
        TabOrder = 0
        object DBGrid1: TDBGrid
          Left = 0
          Top = 2
          Width = 529
          Height = 285
          DataSource = DataSource1
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -14
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'username'
              Title.Caption = #25151#23458#22995#21517
              Width = 85
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomid'
              Title.Caption = #25151#38388#26631#21495
              Width = 69
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'checktime'
              Title.Caption = #32467#24080#26102#38388
              Width = 151
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'discount'
              Title.Caption = #25240#25187
              Width = 50
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'totalfee'
              Title.Caption = #28040#36153#24635#37329#39069
              Width = 79
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomtype'
              Title.Caption = #25151#38388#31867#22411
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomfee'
              Title.Caption = #20303#23487#36153#29992
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomthings'
              Title.Caption = #25151#20869#28040#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'supsecond'
              Title.Caption = #25955#24231#28040#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'suproom'
              Title.Caption = #21253#38388#28040#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'kalaok'
              Title.Caption = #21345#25289'OK '
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'commercecenter'
              Title.Caption = #21830#21153#20013#24515
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'ballroom'
              Title.Caption = #27468#33310#21381#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'hairdressing'
              Title.Caption = #32654#23481#20013#24515
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'intime'
              Title.Caption = #20837#20303#26102#38388
              Width = 153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'employeeid'
              Title.Caption = #32467#24080#21592#24037
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'remark'
              Title.Caption = #22791#27880#20449#24687
              Width = 243
              Visible = True
            end>
        end
      end
      object Panel4: TPanel
        Left = 0
        Top = 289
        Width = 529
        Height = 134
        Caption = 'Panel4'
        TabOrder = 1
        object GroupBox1: TGroupBox
          Left = 16
          Top = 3
          Width = 314
          Height = 126
          Caption = #26597#35810#26465#20214
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object ed_feeusername: TEdit
            Left = 138
            Top = 20
            Width = 144
            Height = 22
            Enabled = False
            Font.Charset = ANSI_CHARSET
            Font.Color = clBlack
            Font.Height = -14
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 0
          end
          object dtp_feetimeEnd: TDateTimePicker
            Left = 137
            Top = 95
            Width = 147
            Height = 22
            CalAlignment = dtaLeft
            Date = 37481
            Time = 37481
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 1
          end
          object cb_feeusername: TCheckBox
            Left = 39
            Top = 24
            Width = 97
            Height = 17
            Caption = #25151#23458#22995#21517
            TabOrder = 2
            OnClick = cb_feeusernameClick
          end
          object StaticText8: TStaticText
            Left = 53
            Top = 60
            Width = 60
            Height = 18
            Caption = #36215#22987#26102#38388
            TabOrder = 3
          end
          object StaticText9: TStaticText
            Left = 54
            Top = 97
            Width = 60
            Height = 18
            Caption = #32456#27490#26102#38388
            TabOrder = 4
          end
          object dtp_feetimeBegin: TDateTimePicker
            Left = 136
            Top = 56
            Width = 147
            Height = 22
            CalAlignment = dtaLeft
            Date = 37481
            Time = 37481
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 5
          end
        end
        object StaticText4: TStaticText
          Left = 360
          Top = 8
          Width = 144
          Height = 18
          Caption = #27880#65306#26597#35810#29616#37329#25903#20184#24773#20917
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object but_roomfeerequery: TButton
          Left = 392
          Top = 88
          Width = 81
          Height = 33
          Caption = ' '#26597' '#35810
          TabOrder = 2
          OnClick = but_roomfeerequeryClick
        end
        object StaticText2: TStaticText
          Left = 392
          Top = 32
          Width = 74
          Height = 18
          Caption = #28040#36153#24635#37329#39069
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 3
        end
        object ed_totalfee: TEdit
          Left = 362
          Top = 55
          Width = 144
          Height = 22
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 4
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #25151#23458#25346#24080#32467#24080#26597#35810
      ImageIndex = 1
      OnShow = TabSheet2Show
      object Panel3: TPanel
        Left = 0
        Top = -3
        Width = 529
        Height = 292
        Caption = 'Panel2'
        TabOrder = 0
        object DBGrid2: TDBGrid
          Left = 0
          Top = 4
          Width = 529
          Height = 284
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -14
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'username'
              Title.Caption = #25151#23458#22995#21517
              Width = 81
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomid'
              Title.Caption = #25151#38388#26631#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'discount'
              Title.Caption = #25240#25187
              Width = 36
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'totalfee'
              Title.Caption = #28040#36153#24635#37329#39069
              Width = 81
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'checkornot'
              Title.Caption = #26159#21542#24050#36824#24080
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'intime'
              Title.Caption = #20837#20303#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomtype'
              Title.Caption = #25151#38388#31867#22411
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomfee'
              Title.Caption = #20303#23487#36153#29992
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'roomthings'
              Title.Caption = #25151#20869#28040#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'supsecond'
              Title.Caption = #25955#24231#28040#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'suproom'
              Title.Caption = #21253#38388#28040#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'kalaok'
              Title.Caption = #21345#25289'OK'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'ballroom'
              Title.Caption = #27468#33310#21381#36153
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'commercecenter'
              Title.Caption = #21830#21153#20013#24515
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'hairdressing'
              Title.Caption = #32654#23481#20013#24515
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'checktime'
              Title.Caption = #32467#24080#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'employeeid'
              Title.Caption = #32467#24080#21592#24037
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'remark'
              Title.Caption = #22791#27880#20449#24687
              Width = 310
              Visible = True
            end>
        end
      end
      object Panel5: TPanel
        Left = 0
        Top = 289
        Width = 529
        Height = 135
        Caption = 'Panel4'
        TabOrder = 1
        object but_roomdebtrequery: TButton
          Left = 392
          Top = 88
          Width = 81
          Height = 33
          Caption = ' '#26597' '#35810
          TabOrder = 0
          OnClick = but_roomdebtrequeryClick
        end
        object StaticText5: TStaticText
          Left = 360
          Top = 8
          Width = 144
          Height = 18
          Caption = #27880#65306#26597#35810#25346#24080#25903#20184#24773#20917
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object GroupBox2: TGroupBox
          Left = 16
          Top = 3
          Width = 314
          Height = 126
          Caption = #26597#35810#26465#20214
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False