unitroomfeerequery.dfm

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

            Font.Charset = ANSI_CHARSET
            Font.Color = clBlack
            Font.Height = -14
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            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
            DataSource = DataSource2
            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 = 69
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'roomid'
                Title.Caption = #25151#38388#26631#21495
                Width = 67
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'discount'
                Title.Caption = #25240#25187
                Width = 46
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'totalfee'
                Title.Caption = #28040#36153#24635#37329#39069
                Width = 84
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'checkornot'
                Title.Caption = #26159#21542#24050#36824#24080
                Width = 85
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'intime'
                Title.Caption = #20837#20303#26102#38388
                Width = 137
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'roomtype'
                Title.Caption = #25151#38388#31867#22411
                Width = 74
                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
                Width = 141
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'employeeid'
                Title.Caption = #32467#24080#21592#24037
                Width = 87
                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
            TabOrder = 2
            object ed_debtusername: 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 ed_debtroomid: TEdit
              Left = 138
              Top = 55
              Width = 144
              Height = 22
              Enabled = False
              TabOrder = 1
            end
            object StaticText6: TStaticText
              Left = 29
              Top = 40
              Width = 4
              Height = 4
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlue
              Font.Height = -14
              Font.Name = #23435#20307
              Font.Style = []
              ParentFont = False
              TabOrder = 2
            end
            object dtp_debtintime: TDateTimePicker
              Left = 137
              Top = 88
              Width = 147
              Height = 22
              CalAlignment = dtaLeft
              Date = 37482.9469882292
              Time = 37482.9469882292
              DateFormat = dfShort
              DateMode = dmComboBox
              Enabled = False
              Kind = dtkDate
              ParseInput = False
              TabOrder = 3
            end
            object cb_debtusername: TCheckBox
              Left = 40
              Top = 24
              Width = 97
              Height = 17
              Caption = #25151#23458#22995#21517
              TabOrder = 4
              OnClick = cb_debtusernameClick
            end
            object cb_debtroomid: TCheckBox
              Left = 40
              Top = 57
              Width = 97
              Height = 17
              Caption = #25151#38388#26631#21495
              TabOrder = 5
              OnClick = cb_debtroomidClick
            end
            object cb_debtintime: TCheckBox
              Left = 40
              Top = 90
              Width = 97
              Height = 17
              Caption = #20837#20303#26102#38388
              TabOrder = 6
              OnClick = cb_debtintimeClick
            end
          end
          object StaticText1: 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_totalRedebt: TEdit
            Left = 362
            Top = 55
            Width = 144
            Height = 22
            Enabled = False
            TabOrder = 4
          end
        end
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = DMHotel.ADODataSet_roomfee_requery
    Left = 184
    Top = 88
  end
  object DataSource2: TDataSource
    DataSet = DMHotel.ADODataSet_roomredebt_requery
    Left = 312
    Top = 88
  end
end