mainunit.dfm

生成PDF文档的控件

object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 425
  ClientWidth = 840
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 688
    Top = 41
    Width = 152
    Height = 384
    Align = alRight
    TabOrder = 0
    ExplicitLeft = 357
    ExplicitHeight = 293
    object Label1: TLabel
      Left = 7
      Top = 5
      Width = 33
      Height = 13
      Caption = '&Series:'
      FocusControl = ComboBox1
    end
    object ComboBox1: TComboBox
      Left = 9
      Top = 23
      Width = 136
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
    end
    object CheckBox2: TCheckBox
      Left = 11
      Top = 56
      Width = 50
      Height = 17
      Caption = '3D'
      Checked = True
      State = cbChecked
      TabOrder = 1
      OnClick = CheckBox2Click
    end
    object Button1: TButton
      Left = 4
      Top = 80
      Width = 145
      Height = 113
      Caption = 'Generate PDF File'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = Button1Click
    end
  end
  object DemoChart: TChart
    Left = 0
    Top = 41
    Width = 688
    Height = 384
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    BackWall.Color = 8454016
    BottomWall.Color = 16512
    Foot.Font.Height = -12
    Foot.Frame.Color = clScrollBar
    Gradient.Direction = gdRightLeft
    Gradient.StartColor = 16744576
    LeftWall.Color = clBlue
    Legend.Font.Height = -12
    Title.Frame.Color = clScrollBar
    Title.Text.Strings = (
      'TChart Component')
    BottomAxis.DateTimeFormat = 'M/d/yy'
    BottomAxis.Title.Caption = 'Sales Date'
    Chart3DPercent = 60
    LeftAxis.MinorTickCount = 1
    LeftAxis.MinorTickLength = 5
    LeftAxis.MinorTicks.Color = clBlue
    LeftAxis.TickLength = 8
    LeftAxis.Ticks.Color = clYellow
    LeftAxis.Title.Caption = 'Quantity'
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvNone
    BorderWidth = 14
    TabOrder = 1
    ExplicitWidth = 357
    ExplicitHeight = 293
    object BarSeries1: TBarSeries
      Marks.Callout.Brush.Color = clBlack
      Marks.Visible = False
      Gradient.Direction = gdTopBottom
      MultiBar = mbNone
      XValues.DateTime = True
      XValues.Name = 'X'
      XValues.Order = loAscending
      YValues.Name = 'Y'
      YValues.Order = loNone
      Left = 108
      Top = 4
    end
    object BarSeries2: TBarSeries
      Marks.Callout.Brush.Color = clBlack
      Marks.Visible = False
      Gradient.Direction = gdTopBottom
      MultiBar = mbNone
      XValues.DateTime = True
      XValues.Name = 'X'
      XValues.Order = loAscending
      YValues.Name = 'Y'
      YValues.Order = loNone
      Left = 141
      Top = 4
    end
    object BarSeries3: TBarSeries
      Marks.Callout.Brush.Color = clBlack
      Marks.Visible = False
      SeriesColor = clAqua
      Gradient.Direction = gdTopBottom
      MultiBar = mbNone
      XValues.DateTime = True
      XValues.Name = 'X'
      XValues.Order = loAscending
      YValues.Name = 'Y'
      YValues.Order = loNone
      Left = 172
      Top = 4
    end
  end
  object RadioGroup1: TRadioGroup
    Left = 0
    Top = 0
    Width = 840
    Height = 41
    Align = alTop
    Caption = 'Bar &Position:'
    Columns = 4
    ItemIndex = 0
    Items.Strings = (
      'Behind'
      'Side to Side'
      'Stacked'
      'Stacked 100%')
    TabOrder = 2
    OnClick = RadioGroup1Click
    ExplicitWidth = 509
  end
  object VPDF: TVPDF
    AutoLaunch = True
    Author = 'VisPDF Lib User'
    Keywords = 'pdf delphi component'
    Title = 'Delphi PDF library VisPDF Lib'
    ShowInfo = True
    FileName = 'ChartPDFDemo.pdf'
    Version = pdf13
    ActivateProtection = False
    CryptKeyLength = k40
    ProtectOptions = []
    PageLayout = plSinglePage
    StandardFontEmulation = True
    FontEmbedding = True
    ViewerPreferences = []
    JpegQuality = 100
    Compression = cmFlateDecode
    KeepImageAspectRatio = False
    Resolution = 0
    ParaAutoAddPage = True
    ImageCompressionType = icFlate
    Left = 472
    Top = 248
  end
end