unitfrm3dview.dfm

来自「关联规则算法的实现和表示Delphi源码」· DFM 代码 · 共 73 行

object Frm3DView: TFrm3DView
  Left = 246
  Top = 84
  BorderStyle = bsDialog
  Caption = '3DView'
  ClientHeight = 518
  ClientWidth = 717
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 705
    Height = 505
    Caption = 'Panel1'
    TabOrder = 0
    object Chart1: TChart
      Left = 8
      Top = 16
      Width = 681
      Height = 465
      BackWall.Brush.Color = clWhite
      BackWall.Brush.Style = bsClear
      Title.Text.Strings = (
        'TChart')
      Title.Visible = False
      Legend.Visible = False
      View3D = False
      View3DWalls = False
      BevelOuter = bvLowered
      TabOrder = 0
      object Series1: TLineSeries
        Marks.ArrowLength = 8
        Marks.Visible = False
        SeriesColor = clRed
        Pointer.InflateMargins = True
        Pointer.Style = psRectangle
        Pointer.Visible = False
        XValues.DateTime = False
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
      object Series2: TBarSeries
        Marks.ArrowLength = 20
        Marks.Visible = False
        SeriesColor = clRed
        BarStyle = bsRectGradient
        XValues.DateTime = False
        XValues.Name = 'X'
        XValues.Multiplier = 1.000000000000000000
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Bar'
        YValues.Multiplier = 1.000000000000000000
        YValues.Order = loNone
      end
    end
  end
end