home *** CD-ROM | disk | FTP | other *** search
/ PC Expert 29 / Pce29cd.iso / RUNIMAGE / DELPHI40 / DEMOS / TEECHART / UOVERBAR.DFM / UOVERBAR.txt
Text File  |  1998-06-16  |  4KB  |  187 lines
  1. object OverBarForm: TOverBarForm
  2.   Left = 78
  3.   Top = 93
  4.   Width = 598
  5.   Height = 397
  6.   Caption = 'TeeChart Overlayed Bars Example'
  7.   Font.Color = clBlack
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Position = poDefault
  13.   WindowState = wsMaximized
  14.   OnCreate = FormCreate
  15.   TextHeight = 13
  16.   object Chart1: TChart
  17.     Left = 149
  18.     Top = 0
  19.     Width = 441
  20.     Height = 370
  21.     BottomWall.Color = clWhite
  22.     Foot.Font.Color = clRed
  23.     Foot.Font.Height = -12
  24.     Foot.Font.Name = 'Arial'
  25.     Foot.Font.Style = [fsItalic]
  26.     Foot.Frame.Color = clScrollBar
  27.     LeftWall.Color = 8454143
  28.     MarginTop = 2
  29.     Title.Brush.Color = 8421440
  30.     Title.Font.Color = clAqua
  31.     Title.Font.Height = -19
  32.     Title.Font.Name = 'Arial'
  33.     Title.Font.Style = [fsBold, fsItalic]
  34.     Title.Frame.Color = clBlue
  35.     Title.Frame.Width = 4
  36.     Title.Text.Strings = (
  37.       'Overlayed Bar Series Example')
  38.     BottomAxis.Grid.Color = clScrollBar
  39.     LeftAxis.Grid.Color = clScrollBar
  40.     Legend.Alignment = laLeft
  41.     RightAxis.Grid.Color = clScrollBar
  42.     TopAxis.Grid.Color = clScrollBar
  43.     View3D = False
  44.     Align = alClient
  45.     TabOrder = 0
  46.     object BarSeries3: TBarSeries
  47.       Cursor = crUpArrow
  48.       Marks.ArrowLength = 20
  49.       Marks.Visible = False
  50.       OnClick = BarSeries3Click
  51.       BarWidthPercent = 80
  52.       MultiBar = mbNone
  53.       SeriesColor = clBlue
  54.       XValues.DateTime = False
  55.       XValues.Name = 'X'
  56.       XValues.Multiplier = 1.000000000000000000
  57.       XValues.Order = loAscending
  58.       YValues.DateTime = False
  59.       YValues.Name = 'Y'
  60.       YValues.Multiplier = 1.000000000000000000
  61.       YValues.Order = loNone
  62.       Left = 24
  63.       Top = 36
  64.     end
  65.     object BarSeries2: TBarSeries
  66.       Cursor = crUpArrow
  67.       Marks.ArrowLength = 20
  68.       Marks.Visible = False
  69.       OnClick = BarSeries2Click
  70.       BarWidthPercent = 60
  71.       MultiBar = mbNone
  72.       SeriesColor = clRed
  73.       XValues.DateTime = False
  74.       XValues.Name = 'X'
  75.       XValues.Multiplier = 1.000000000000000000
  76.       XValues.Order = loAscending
  77.       YValues.DateTime = False
  78.       YValues.Name = 'Y'
  79.       YValues.Multiplier = 1.000000000000000000
  80.       YValues.Order = loNone
  81.       Left = 199
  82.       Top = 122
  83.     end
  84.     object BarSeries1: TBarSeries
  85.       Cursor = crUpArrow
  86.       Marks.ArrowLength = 20
  87.       Marks.Visible = False
  88.       OnClick = BarSeries1Click
  89.       BarWidthPercent = 40
  90.       MultiBar = mbNone
  91.       SeriesColor = clLime
  92.       XValues.DateTime = False
  93.       XValues.Name = 'X'
  94.       XValues.Multiplier = 1.000000000000000000
  95.       XValues.Order = loAscending
  96.       YValues.DateTime = False
  97.       YValues.Name = 'Y'
  98.       YValues.Multiplier = 1.000000000000000000
  99.       YValues.Order = loNone
  100.       Left = 127
  101.       Top = 46
  102.     end
  103.   end
  104.   object Panel1: TPanel
  105.     Left = 0
  106.     Top = 0
  107.     Width = 149
  108.     Height = 370
  109.     Align = alLeft
  110.     TabOrder = 1
  111.     object Label1: TLabel
  112.       Left = 15
  113.       Top = 22
  114.       Width = 50
  115.       Height = 13
  116.       Caption = 'Overlay %:'
  117.     end
  118.     object Label2: TLabel
  119.       Left = 23
  120.       Top = 46
  121.       Width = 42
  122.       Height = 13
  123.       Caption = 'Offset %:'
  124.     end
  125.     object Memo1: TMemo
  126.       Left = 16
  127.       Top = 136
  128.       Width = 121
  129.       Height = 161
  130.       Lines.Strings = (
  131.         'This demo uses the'
  132.         'OffsetPercent and'
  133.         'BarWidthPercent'
  134.         'properties of '
  135.         'TBarSeries to create'
  136.         'overlayed bars.'
  137.         ''
  138.         'Bars can be displayed'
  139.         'using pattern brushes.'
  140.         '')
  141.       TabOrder = 0
  142.     end
  143.     object BitBtn3: TBitBtn
  144.       Left = 28
  145.       Top = 316
  146.       Width = 89
  147.       Height = 33
  148.       Caption = 'Close'
  149.       TabOrder = 1
  150.       Kind = bkClose
  151.     end
  152.     object SpinEdit1: TSpinEdit
  153.       Left = 75
  154.       Top = 18
  155.       Width = 50
  156.       Height = 22
  157.       Increment = 5
  158.       MaxValue = 100
  159.       MinValue = 1
  160.       TabOrder = 2
  161.       Value = 60
  162.       OnChange = SpinEdit1Change
  163.     end
  164.     object SpinEdit2: TSpinEdit
  165.       Left = 75
  166.       Top = 46
  167.       Width = 50
  168.       Height = 22
  169.       Increment = 5
  170.       MaxValue = 100
  171.       MinValue = -100
  172.       TabOrder = 3
  173.       Value = 0
  174.       OnChange = SpinEdit2Change
  175.     end
  176.     object CBPatterns: TCheckBox
  177.       Left = 19
  178.       Top = 82
  179.       Width = 90
  180.       Height = 17
  181.       Caption = 'Use Patterns'
  182.       TabOrder = 4
  183.       OnClick = CBPatternsClick
  184.     end
  185.   end
  186. end
  187.