c_kfzt.dfm

经典的酒店管理系统

      object TabSheet2: TTabSheet
        Caption = #20986#31199#29575#34920
        ImageIndex = 1
        object Chart1: TChart
          Left = 0
          Top = 0
          Width = 708
          Height = 340
          AllowPanning = pmNone
          AllowZoom = False
          BackWall.Brush.Color = clWhite
          BackWall.Brush.Style = bsClear
          BackWall.Pen.Visible = False
          Gradient.Direction = gdBottomTop
          Gradient.EndColor = 16744576
          Gradient.Visible = True
          Title.Color = clYellow
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlue
          Title.Font.Height = -21
          Title.Font.Name = #23435#20307
          Title.Font.Style = [fsBold]
          Title.Frame.Visible = True
          Title.Text.Strings = (
            #20986#31199#29575#34920)
          AxisVisible = False
          ClipPoints = False
          Frame.Visible = False
          LeftAxis.LabelsFont.Charset = GB2312_CHARSET
          LeftAxis.LabelsFont.Color = clBlack
          LeftAxis.LabelsFont.Height = -12
          LeftAxis.LabelsFont.Name = #23435#20307
          LeftAxis.LabelsFont.Style = []
          Legend.Font.Charset = GB2312_CHARSET
          Legend.Font.Color = clBlack
          Legend.Font.Height = -12
          Legend.Font.Name = #23435#20307
          Legend.Font.Style = []
          View3DOptions.Elevation = 315
          View3DOptions.Orthogonal = False
          View3DOptions.Perspective = 0
          View3DOptions.Rotation = 360
          View3DWalls = False
          Align = alClient
          BevelOuter = bvNone
          BorderStyle = bsSingle
          Color = clSilver
          TabOrder = 0
          object Series1: TPieSeries
            Marks.ArrowLength = 8
            Marks.Font.Charset = GB2312_CHARSET
            Marks.Font.Color = clBlack
            Marks.Font.Height = -12
            Marks.Font.Name = #23435#20307
            Marks.Font.Style = []
            Marks.Style = smsLabelPercent
            Marks.Visible = True
            SeriesColor = clRed
            OtherSlice.Text = 'Other'
            PieValues.DateTime = False
            PieValues.Name = 'Pie'
            PieValues.Multiplier = 1
            PieValues.Order = loNone
          end
        end
      end
      object TabSheet3: TTabSheet
        Caption = #23458#25151#20449#24687
        ImageIndex = 2
        object DBGrid1: TDBGrid
          Left = 0
          Top = 0
          Width = 608
          Height = 348
          Align = alClient
          Color = clMoneyGreen
          DataSource = dsKfzt
          FixedColor = 12615680
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_KFBH'
              Title.Alignment = taCenter
              Title.Caption = #25151#38388#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_SJFJ'
              Title.Alignment = taCenter
              Title.Caption = #25151#20215
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_KRXM'
              Title.Alignment = taCenter
              Title.Caption = #22995#21517
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_DDRQ'
              Title.Alignment = taCenter
              Title.Caption = #21040#24215#26085#26399
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_DDSJ'
              Title.Alignment = taCenter
              Title.Caption = #21040#24215#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_BJS'
              Title.Alignment = taCenter
              Title.Caption = #21322#20215#25968
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_QJS'
              Title.Alignment = taCenter
              Title.Caption = #20840#20215#25968
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_JJFJ'
              Title.Alignment = taCenter
              Title.Caption = #38388#25509#25151#20215
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_KFZT'
              Title.Alignment = taCenter
              Title.Caption = #23458#25151#29366#24577
              Visible = True
            end>
        end
        object Panel5: TPanel
          Left = 608
          Top = 0
          Width = 100
          Height = 348
          Align = alRight
          BevelOuter = bvLowered
          Color = 12615808
          TabOrder = 1
          object BitBtn10: TBitBtn
            Left = 12
            Top = 16
            Width = 75
            Height = 25
            Caption = #25151#20215#21464#26356
            TabOrder = 0
            OnClick = BitBtn10Click
          end
          object BitBtn11: TBitBtn
            Left = 12
            Top = 48
            Width = 75
            Height = 25
            Caption = #21322#20840#20215
            TabOrder = 1
            OnClick = BitBtn11Click
          end
        end
      end
      object TabSheet5: TTabSheet
        Caption = #22242#38431#31649#29702
        ImageIndex = 4
        object DBGrid2: TDBGrid
          Left = 0
          Top = 0
          Width = 608
          Height = 348
          Align = alClient
          Color = clMoneyGreen
          DataSource = dsQryTd
          FixedColor = 12615680
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_KRXM'
              Title.Alignment = taCenter
              Title.Caption = #22242#38431#21517#31216
              Width = 150
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_DDRQ'
              Title.Alignment = taCenter
              Title.Caption = #21040#24215#26085#26399
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_DDSJ'
              Title.Alignment = taCenter
              Title.Caption = #21040#24215#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_NZTS'
              Title.Alignment = taCenter
              Title.Caption = #25311#20303#22825#25968
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_JDR'
              Title.Alignment = taCenter
              Title.Caption = #25509#24453#20154
              Visible = True
            end
            item
              Alignment = taRightJustify
              Expanded = False
              FieldName = 'D_JDDW'
              Title.Alignment = taCenter
              Title.Caption = #25509#24453#21333#20301
              Width = 175
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'D_LXDH'
              Title.Caption = #32852#31995#30005#35805
              Visible = True
            end>
        end
        object Panel4: TPanel
          Left = 608
          Top = 0
          Width = 100
          Height = 348
          Align = alRight
          BevelOuter = bvLowered
          Color = 12615808
          TabOrder = 1
          object BitBtn1: TBitBtn
            Left = 12
            Top = 41
            Width = 75
            Height = 25
            Caption = #34917#30331#25151#38388
            TabOrder = 0
            OnClick = BitBtn1Click
          end
          object BitBtn2: TBitBtn
            Left = 12
            Top = 74
            Width = 75
            Height = 25
            Caption = #22242#38431#36864#25151
            TabOrder = 1
            OnClick = BitBtn2Click
          end
          object BitBtn3: TBitBtn
            Left = 12
            Top = 107
            Width = 75
            Height = 25
            Caption = #22242#38431#32467#24080
            TabOrder = 2
            OnClick = BitBtn3Click
          end
          object BitBtn4: TBitBtn
            Left = 12
            Top = 140
            Width = 75
            Height = 25
            Caption = #34917#20132#25276#37329
            TabOrder = 3
            OnClick = BitBtn4Click
          end
          object BitBtn5: TBitBtn
            Left = 12
            Top = 173
            Width = 75
            Height = 25
            Caption = #21464#26356#25276#37329
            TabOrder = 4
            OnClick = BitBtn5Click
          end
          object BitBtn7: TBitBtn
            Left = 12
            Top = 208
            Width = 75
            Height = 25
            Caption = #39044#20808#32467#24080
            TabOrder = 5
            OnClick = BitBtn7Click
          end
          object BitBtn8: TBitBtn
            Left = 12
            Top = 341
            Width = 75
            Height = 25