unitmanagerroomquery.dfm

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

DFM
974
字号
          TabOrder = 2
          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 = 0
          end
          object StaticText3: TStaticText
            Left = 53
            Top = 60
            Width = 60
            Height = 18
            Caption = #36215#22987#26102#38388
            TabOrder = 1
          end
          object StaticText7: TStaticText
            Left = 54
            Top = 97
            Width = 60
            Height = 18
            Caption = #32456#27490#26102#38388
            TabOrder = 2
          end
          object dtp_redebttimeEnd: TDateTimePicker
            Left = 118
            Top = 91
            Width = 147
            Height = 22
            CalAlignment = dtaLeft
            Date = 37482.9469882292
            Time = 37482.9469882292
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 3
          end
          object dtp_redebttimeBegin: TDateTimePicker
            Left = 118
            Top = 56
            Width = 147
            Height = 22
            CalAlignment = dtaLeft
            Date = 37482.9469882292
            Time = 37482.9469882292
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 4
          end
          object ed_redebtusername: TEdit
            Left = 118
            Top = 20
            Width = 146
            Height = 22
            Enabled = False
            TabOrder = 5
          end
          object cb_redebtusername: TCheckBox
            Left = 22
            Top = 24
            Width = 81
            Height = 17
            Caption = #25151#23458#22995#21517
            TabOrder = 6
            OnClick = cb_redebtusernameClick
          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
          ReadOnly = True
          TabOrder = 4
        end
      end
      object DBGrid3: TDBGrid
        Left = 0
        Top = 2
        Width = 529
        Height = 285
        DataSource = DataSource2
        ReadOnly = True
        TabOrder = 2
        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 = 63
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'roomid'
            Title.Caption = #25151#38388#26631#21495
            Width = 66
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'checkornot'
            Title.Caption = #26159#21542#24050#32467#24080
            Width = 88
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'checktime'
            Title.Caption = #32467#24080#26102#38388
            Width = 142
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'discount'
            Title.Caption = #25240#25187
            Width = 35
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'totalfee'
            Title.Caption = #28040#36153#24635#37329#39069
            Width = 80
            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
            Width = 65
            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 = #20445#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 = 'employeeid'
            Title.Caption = #32467#24080#21592#24037
            Width = 77
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'remark'
            Title.Caption = #22791#27880#20449#24687
            Visible = True
          end>
      end
    end
    object TabSheet3: TTabSheet
      Caption = #25151#23458#25346#24080#27424#24080#26597#35810
      ImageIndex = 2
      OnShow = TabSheet3Show
      object DBGrid4: TDBGrid
        Left = 0
        Top = 2
        Width = 529
        Height = 285
        DataSource = DataSource3
        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 = 67
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'checkornot'
            Title.Caption = #26159#21542#24050#32467#24080
            Width = 82
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'checktime'
            Title.Caption = #32467#24080#26102#38388
            Width = 141
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'discount'
            Title.Caption = #25240#25187
            Width = 48
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'totalfee'
            Title.Caption = #28040#36153#24635#37329#39069
            Width = 94
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'roomtype'
            Title.Caption = #25151#38388#31867#22411
            Width = 72
            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 = #20445#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 = 'intime'
            Title.Caption = #20837#20303#26102#38388
            Width = 140
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'employeeid'
            Title.Caption = #32467#24080#21592#24037
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'remark'
            Title.Caption = #22791#27880#20449#24687
            Visible = True
          end>
      end
      object GroupBox3: TGroupBox
        Left = 16
        Top = 294
        Width = 281
        Height = 121
        Caption = #26597#35810#26465#20214
        TabOrder = 1
        object StaticText10: TStaticText
          Left = 37
          Top = 60
          Width = 60
          Height = 18
          Caption = #36215#22987#26102#38388
          TabOrder = 0
        end
        object StaticText11: TStaticText
          Left = 38
          Top = 95
          Width = 60
          Height = 18
          Caption = #32456#27490#26102#38388
          TabOrder = 1
        end
        object dtp_debttimeEnd: TDateTimePicker
          Left = 112
          Top = 90
          Width = 147
          Height = 22
          CalAlignment = dtaLeft
          Date = 37482.9469882292
          Time = 37482.9469882292
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 2
        end
        object dtp_debttimeBegin: TDateTimePicker
          Left = 113
          Top = 55
          Width = 145
          Height = 22
          CalAlignment = dtaLeft
          Date = 37482.9469882292
          Time = 37482.9469882292
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 3
        end
        object ed_debtusername: TEdit
          Left = 113
          Top = 20
          Width = 144
          Height = 22
          Enabled = False
          TabOrder = 4
        end
        object cb_debtusername: TCheckBox
          Left = 24
          Top = 24
          Width = 81
          Height = 17
          Caption = #25151#23458#22995#21517
          TabOrder = 5
          OnClick = cb_debtusernameClick
        end
      end
      object ed_totaldebt: TEdit
        Left = 336
        Top = 344
        Width = 121
        Height = 22
        Enabled = False
        ReadOnly = True
        TabOrder = 2
      end
      object StaticText12: TStaticText
        Left = 352
        Top = 320
        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 Button1: TButton
        Left = 360
        Top = 376
        Width = 75
        Height = 33
        Caption = #26597#35810
        TabOrder = 4
        OnClick = Button1Click
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = DMHotel.ADODataSet_roomfee_requery
    Left = 64
    Top = 104
  end
  object DataSource2: TDataSource
    DataSet = DMHotel.ADODataSet_roomredebt_requery
    Left = 128
    Top = 104
  end
  object DataSource3: TDataSource
    DataSet = DMHotel.ADODataSet_roomdebt_requery
    Left = 272
    Top = 160
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?