home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / TEECHART / Delphi1_And_Delphi2 / EXAMPLES / EXTENDED / UCAND3D.DFM / UCAND3D.txt
Encoding:
Text File  |  1998-10-24  |  3.2 KB  |  139 lines
  1. object Candle3DForm: TCandle3DForm
  2.   Left = 102
  3.   Top = 97
  4.   Width = 568
  5.   Height = 455
  6.   ActiveControl = Button1
  7.   Caption = 'TeeChart Pro -- Candle Charts in 3D mode'
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   Position = poScreenCenter
  14.   Scaled = False
  15.   OnCreate = FormCreate
  16.   TextHeight = 13
  17.   object Panel1: TPanel
  18.     Left = 0
  19.     Top = 0
  20.     Width = 560
  21.     Height = 89
  22.     Align = alTop
  23.     TabOrder = 0
  24.     object Label1: TLabel
  25.       Left = 304
  26.       Top = 60
  27.       Width = 32
  28.       Height = 13
  29.       Caption = '&Depth:'
  30.       FocusControl = ScrollBar1
  31.     end
  32.     object Memo1: TMemo
  33.       Left = 8
  34.       Top = 8
  35.       Width = 265
  36.       Height = 73
  37.       Lines.Strings = (
  38.         'Candle Charts can now be displayed in 3D mode with'
  39.         '"solid" candle bodys.'
  40.         'The Chart3DPercent property controls the depth '
  41.         'dimension.')
  42.       TabOrder = 0
  43.     end
  44.     object Button1: TButton
  45.       Left = 455
  46.       Top = 12
  47.       Width = 75
  48.       Height = 25
  49.       Caption = 'Close'
  50.       Default = True
  51.       TabOrder = 1
  52.       OnClick = Button1Click
  53.     end
  54.     object ScrollBar1: TScrollBar
  55.       Left = 344
  56.       Top = 58
  57.       Width = 121
  58.       Height = 16
  59.       Min = 1
  60.       Position = 15
  61.       TabOrder = 2
  62.       OnChange = ScrollBar1Change
  63.     end
  64.     object CheckBox1: TCheckBox
  65.       Left = 304
  66.       Top = 8
  67.       Width = 97
  68.       Height = 17
  69.       Caption = 'Draw 3D'
  70.       State = cbChecked
  71.       TabOrder = 3
  72.       OnClick = CheckBox1Click
  73.     end
  74.     object CheckBox2: TCheckBox
  75.       Left = 304
  76.       Top = 32
  77.       Width = 97
  78.       Height = 17
  79.       Caption = 'Dark sides'
  80.       State = cbChecked
  81.       TabOrder = 4
  82.       OnClick = CheckBox2Click
  83.     end
  84.   end
  85.   object Chart1: TChart
  86.     Left = 0
  87.     Top = 122
  88.     Width = 560
  89.     Height = 306
  90.     BackWall.Brush.Color = clWhite
  91.     BackWall.Brush.Style = bsClear
  92.     Title.Text.Strings = (
  93.       'TChart')
  94.     Title.Visible = False
  95.     BottomAxis.EndPosition = 100.000000000000000000
  96.     LeftAxis.EndPosition = 100.000000000000000000
  97.     Legend.Visible = False
  98.     RightAxis.EndPosition = 100.000000000000000000
  99.     TopAxis.EndPosition = 100.000000000000000000
  100.     Align = alClient
  101.     TabOrder = 1
  102.     object Series1: TCandleSeries
  103.       Marks.ArrowLength = 8
  104.       Marks.Visible = False
  105.       SeriesColor = clRed
  106.       CloseValues.DateTime = False
  107.       CloseValues.Name = 'Close'
  108.       CloseValues.Multiplier = 1.000000000000000000
  109.       CloseValues.Order = loNone
  110.       DateValues.DateTime = True
  111.       DateValues.Name = 'Date'
  112.       DateValues.Multiplier = 1.000000000000000000
  113.       DateValues.Order = loAscending
  114.       HighValues.DateTime = False
  115.       HighValues.Name = 'High'
  116.       HighValues.Multiplier = 1.000000000000000000
  117.       HighValues.Order = loNone
  118.       LowValues.DateTime = False
  119.       LowValues.Name = 'Low'
  120.       LowValues.Multiplier = 1.000000000000000000
  121.       LowValues.Order = loNone
  122.       OpenValues.DateTime = False
  123.       OpenValues.Name = 'Open'
  124.       OpenValues.Multiplier = 1.000000000000000000
  125.       OpenValues.Order = loNone
  126.       Draw3D = True
  127.     end
  128.   end
  129.   object TeeCommander1: TTeeCommander
  130.     Left = 0
  131.     Top = 89
  132.     Width = 560
  133.     Height = 33
  134.     Panel = Chart1
  135.     Align = alTop
  136.     TabOrder = 2
  137.   end
  138. end
  139.