vw_aru_analysis.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 282 行

DFM
282
字号
inherited frmVW_Aru_Analysis: TfrmVW_Aru_Analysis
  Left = 40
  Top = 53
  Width = 720
  Height = 493
  Anchors = [akLeft, akTop, akBottom]
  Caption = '未过期账龄分析'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 423
    Width = 712
  end
  inherited CoolBar1: TCoolBar
    Width = 712
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 712
      end>
    inherited tbMainBar: TToolBar
      Width = 699
      inherited tbPrevious: TToolButton
        OnClick = tbPreviousClick
      end
    end
  end
  object PageControl1: TPageControl [2]
    Left = 0
    Top = 39
    Width = 712
    Height = 384
    ActivePage = TabSheet2
    Align = alClient
    Style = tsButtons
    TabOrder = 2
    object TabSheet1: TTabSheet
      Caption = '数值分析'
      object sgAru_Analysis: TSDGrid
        Left = 0
        Top = 0
        Width = 704
        Height = 354
        Hint = '双击查看明细'
        Align = alClient
        Color = clWhite
        ColCount = 1
        Ctl3D = False
        DefaultColWidth = 100
        DefaultRowHeight = 18
        FixedColor = 8564917
        FixedCols = 0
        RowCount = 4
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
        ParentCtl3D = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnDblClick = sgAru_AnalysisDblClick
        Columns = <
          item
            ColumnFont.Charset = GB2312_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -12
            ColumnFont.Name = '宋体'
            ColumnFont.Style = []
            TitleString = '客户'
            ColumnWidth = 0
          end>
      end
    end
    object TabSheet2: TTabSheet
      Caption = '图表分析'
      ImageIndex = 1
      object sChart: TChart
        Left = 0
        Top = 0
        Width = 704
        Height = 327
        AllowZoom = False
        BackWall.Brush.Color = clWhite
        BackWall.Brush.Style = bsClear
        Foot.Font.Charset = GB2312_CHARSET
        Foot.Font.Color = clRed
        Foot.Font.Height = -12
        Foot.Font.Name = '宋体'
        Foot.Font.Style = [fsItalic]
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -14
        Title.Font.Name = '宋体'
        Title.Font.Style = [fsBold]
        Title.Text.Strings = (
          '未过期帐龄分析图')
        BottomAxis.Title.Font.Charset = ANSI_CHARSET
        BottomAxis.Title.Font.Color = clBlack
        BottomAxis.Title.Font.Height = -12
        BottomAxis.Title.Font.Name = '宋体'
        BottomAxis.Title.Font.Style = []
        DepthAxis.Title.Font.Charset = ANSI_CHARSET
        DepthAxis.Title.Font.Color = clBlack
        DepthAxis.Title.Font.Height = -12
        DepthAxis.Title.Font.Name = '宋体'
        DepthAxis.Title.Font.Style = []
        LeftAxis.ExactDateTime = False
        LeftAxis.LabelsFont.Charset = GB2312_CHARSET
        LeftAxis.LabelsFont.Color = clBlack
        LeftAxis.LabelsFont.Height = -12
        LeftAxis.LabelsFont.Name = '宋体'
        LeftAxis.LabelsFont.Style = []
        LeftAxis.Title.Caption = '总金额'
        LeftAxis.Title.Font.Charset = GB2312_CHARSET
        LeftAxis.Title.Font.Color = clBlack
        LeftAxis.Title.Font.Height = -12
        LeftAxis.Title.Font.Name = '宋体'
        LeftAxis.Title.Font.Style = []
        Legend.Font.Charset = GB2312_CHARSET
        Legend.Font.Color = clBlack
        Legend.Font.Height = -12
        Legend.Font.Name = '宋体'
        Legend.Font.Style = []
        Legend.TextStyle = ltsRightValue
        RightAxis.LabelsFont.Charset = ANSI_CHARSET
        RightAxis.LabelsFont.Color = clBlack
        RightAxis.LabelsFont.Height = -12
        RightAxis.LabelsFont.Name = '宋体'
        RightAxis.LabelsFont.Style = []
        RightAxis.Title.Font.Charset = ANSI_CHARSET
        RightAxis.Title.Font.Color = clBlack
        RightAxis.Title.Font.Height = -12
        RightAxis.Title.Font.Name = '宋体'
        RightAxis.Title.Font.Style = []
        TopAxis.LabelsFont.Charset = ANSI_CHARSET
        TopAxis.LabelsFont.Color = clBlack
        TopAxis.LabelsFont.Height = -12
        TopAxis.LabelsFont.Name = '宋体'
        TopAxis.LabelsFont.Style = []
        Align = alClient
        BevelInner = bvLowered
        TabOrder = 0
      end
      object Panel1: TPanel
        Left = 0
        Top = 327
        Width = 704
        Height = 27
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 1
        object spCol: TSpeedButton
          Left = 4
          Top = 4
          Width = 49
          Height = 20
          Caption = '柱状图'
          OnClick = spColClick
        end
        object spPie: TSpeedButton
          Left = 53
          Top = 4
          Width = 49
          Height = 20
          Caption = '饼状图'
          OnClick = spPieClick
        end
        object spOut: TSpeedButton
          Left = 102
          Top = 4
          Width = 35
          Height = 20
          Caption = '放大'
          OnClick = spOutClick
        end
        object spIn: TSpeedButton
          Left = 137
          Top = 4
          Width = 35
          Height = 20
          Caption = '缩小'
          OnClick = spInClick
        end
        object spLe: TSpeedButton
          Left = 172
          Top = 4
          Width = 35
          Height = 20
          Caption = '左移'
          OnClick = spLeClick
        end
        object spRi: TSpeedButton
          Left = 207
          Top = 4
          Width = 35
          Height = 20
          Caption = '右移'
          OnClick = spRiClick
        end
        object spUp: TSpeedButton
          Left = 242
          Top = 4
          Width = 35
          Height = 20
          Caption = '上移'
          OnClick = spUpClick
        end
        object spDo: TSpeedButton
          Left = 277
          Top = 4
          Width = 35
          Height = 20
          Caption = '下移'
          OnClick = spDoClick
        end
        object spUd: TSpeedButton
          Left = 312
          Top = 4
          Width = 35
          Height = 20
          Caption = '恢复'
          Enabled = False
          OnClick = spUdClick
        end
        object chGr: TCheckBox
          Left = 348
          Top = 6
          Width = 58
          Height = 17
          Caption = '网格线'
          Checked = True
          State = cbChecked
          TabOrder = 0
          OnMouseUp = chGrMouseUp
        end
        object ch3D: TCheckBox
          Left = 407
          Top = 6
          Width = 52
          Height = 17
          Caption = '三 维'
          Checked = True
          State = cbChecked
          TabOrder = 1
          OnMouseUp = ch3DMouseUp
        end
        object sb3d: TScrollBar
          Left = 462
          Top = 6
          Width = 83
          Height = 16
          PageSize = 0
          TabOrder = 2
          OnChange = sb3dChange
        end
      end
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 482
    Top = 3
  end
  inherited ImageList1: TImageList
    Left = 569
    Top = 2
  end
  inherited QueryPrnDlg: TPrintDialog
    Left = 542
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 513
  end
  inherited pmDetail: TPopupMenu
    Left = 631
    Top = 8
  end
  inherited puQueryGrid: TPopupMenu
    Left = 600
  end
end

⌨️ 快捷键说明

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