unitcustomermanagerquery.dfm

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

            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 = 4
          end
          object ed_totalredebt: TEdit
            Left = 362
            Top = 60
            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 = 5
          end
        end
      end
      object TabSheet2: TTabSheet
        Caption = #38750#25151#23458#28040#36153#27424#24080#26597#35810
        ImageIndex = 1
        OnShow = TabSheet2Show
        object Panel3: TPanel
          Left = -8
          Top = 0
          Width = 537
          Height = 289
          Caption = 'Panel3'
          TabOrder = 0
          object DBGrid2: TDBGrid
            Left = 14
            Top = 7
            Width = 520
            Height = 283
            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 = 'customername'
                Title.Caption = #39038#23458#22995#21517
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'checkornot'
                Title.Caption = #26159#21542#32467#24080
                Width = 68
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'totalfee'
                Title.Caption = #28040#36153#24635#37329#39069
                Width = 83
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'indebttime'
                Title.Caption = #20837#24080#26102#38388
                Width = 146
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'discount'
                Title.Caption = #25240#25187
                Width = 43
                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 = 'suproom'
                Title.Caption = #21253#38388#28040#36153
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'supsecond'
                Title.Caption = #25955#24231#28040#36153
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'hairdressing'
                Title.Caption = #32654#23481#20013#24515
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'employeeid'
                Title.Caption = #25346#24080#21592#24037
                Width = 78
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'remark'
                Title.Caption = #22791#27880#20449#24687
                Visible = True
              end>
          end
        end
        object GroupBox2: TGroupBox
          Left = 12
          Top = 290
          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 = 1
          object ed_debtusername: TEdit
            Left = 138
            Top = 18
            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_debttimeEnd: TDateTimePicker
            Left = 139
            Top = 93
            Width = 145
            Height = 22
            CalAlignment = dtaLeft
            Date = 37482.9903231597
            Time = 37482.9903231597
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 1
          end
          object DTP_debttimebegin: TDateTimePicker
            Left = 138
            Top = 54
            Width = 145
            Height = 22
            CalAlignment = dtaLeft
            Date = 37482.9902122338
            Time = 37482.9902122338
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 2
          end
          object StaticText9: TStaticText
            Left = 55
            Top = 58
            Width = 60
            Height = 18
            Caption = #36215#22987#26102#38388
            TabOrder = 3
          end
          object StaticText10: TStaticText
            Left = 56
            Top = 95
            Width = 60
            Height = 18
            Caption = #32456#27490#26102#38388
            TabOrder = 4
          end
          object cb_debtcheck: TCheckBox
            Left = 39
            Top = 20
            Width = 97
            Height = 17
            Caption = #39038#23458#22995#21517
            TabOrder = 5
            OnClick = cb_debtcheckClick
          end
        end
        object Button1: TButton
          Left = 390
          Top = 384
          Width = 81
          Height = 33
          Caption = ' '#26597' '#35810
          TabOrder = 2
          OnClick = Button1Click
        end
        object ed_totaldebt: TEdit
          Left = 362
          Top = 356
          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 = 3
        end
        object StaticText5: TStaticText
          Left = 391
          Top = 328
          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 = 4
        end
        object StaticText2: TStaticText
          Left = 351
          Top = 304
          Width = 158
          Height = 18
          Caption = #27880#65306#26597#35810#30340#26159#38750#25151#23458#27424#24080
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 5
        end
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = DMHotel.ADODataSet_customerRedebt_requery
    Left = 152
    Top = 72
  end
  object DataSource2: TDataSource
    DataSet = DMHotel.ADODataSet_customerdebt_requery
    Left = 296
    Top = 96
  end
end