unit1.dfm

来自「TeeChart图表工具快速入门.rar」· DFM 代码 · 共 69 行

DFM
69
字号
object Form1: TForm1
  Left = 257
  Top = 108
  Width = 367
  Height = 243
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Chart1: TChart
    Left = 32
    Top = 16
    Width = 297
    Height = 169
    Title.Text.Strings = (
      'TChart')
    CustomAxes = <
      item
        Horizontal = False
        OtherSide = False
      end>
    TabOrder = 0
    PrintMargins = (
      15
      22
      15
      22)
    object Series1: TBarSeries
      ColorEachPoint = True
      Marks.Callout.Brush.Color = clBlack
      Marks.Callout.Length = 0
      Marks.Frame.Visible = False
      Marks.Transparent = True
      Marks.Visible = False
      Gradient.Direction = gdTopBottom
      XValues.Name = 'X'
      XValues.Order = loAscending
      YValues.Name = 'Bar'
      YValues.Order = loNone
    end
    object Series2: TBubbleSeries
      Marks.Callout.Brush.Color = clBlack
      Marks.Frame.Visible = False
      Marks.Transparent = True
      Marks.Visible = False
      PercentFormat = '##0,## %'
      ClickableLine = False
      Pointer.HorizSize = 16
      Pointer.InflateMargins = False
      Pointer.Style = psCircle
      Pointer.VertSize = 16
      Pointer.Visible = True
      XValues.Name = 'X'
      XValues.Order = loAscending
      YValues.Name = 'Y'
      YValues.Order = loNone
      RadiusValues.Name = 'Radius'
      RadiusValues.Order = loNone
    end
  end
end

⌨️ 快捷键说明

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