home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / TEECHART / Delphi1_And_Delphi2 / EXAMPLES / EXTENDED / UCUSDRAW.DFM / UCUSDRAW.txt
Encoding:
Text File  |  1998-10-24  |  1.8 KB  |  77 lines
  1. object CustomDrawForm: TCustomDrawForm
  2.   Left = 200
  3.   Top = 96
  4.   ActiveControl = Chart1
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsDialog
  7.   Caption = 'TeeChart-Pro -- Drawing Custom lines'
  8.   ClientHeight = 299
  9.   ClientWidth = 414
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   PixelsPerInch = 96
  15.   Position = poScreenCenter
  16.   Scaled = False
  17.   OnCreate = FormCreate
  18.   TextHeight = 13
  19.   object Chart1: TChart
  20.     Left = 8
  21.     Top = 8
  22.     Width = 400
  23.     Height = 250
  24.     BackWall.Brush.Color = clWhite
  25.     BackWall.Brush.Style = bsClear
  26.     Title.Text.Strings = (
  27.       'TChart')
  28.     BottomAxis.EndPosition = 100.000000000000000000
  29.     LeftAxis.EndPosition = 100.000000000000000000
  30.     RightAxis.EndPosition = 100.000000000000000000
  31.     TopAxis.EndPosition = 100.000000000000000000
  32.     View3D = False
  33.     TabOrder = 0
  34.     object Series1: TBarSeries
  35.       Marks.ArrowLength = 20
  36.       Marks.Visible = True
  37.       SeriesColor = clRed
  38.       AfterDrawValues = Series1AfterDrawValues
  39.       XValues.DateTime = False
  40.       XValues.Name = 'X'
  41.       XValues.Multiplier = 1.000000000000000000
  42.       XValues.Order = loAscending
  43.       YValues.DateTime = False
  44.       YValues.Name = 'Bar'
  45.       YValues.Multiplier = 1.000000000000000000
  46.       YValues.Order = loNone
  47.     end
  48.   end
  49.   object CheckBox1: TCheckBox
  50.     Left = 16
  51.     Top = 272
  52.     Width = 161
  53.     Height = 17
  54.     Caption = 'Draw custom lines'
  55.     TabOrder = 1
  56.     OnClick = CheckBox1Click
  57.   end
  58.   object Button1: TButton
  59.     Left = 328
  60.     Top = 264
  61.     Width = 75
  62.     Height = 25
  63.     Caption = '&Close'
  64.     TabOrder = 2
  65.     OnClick = Button1Click
  66.   end
  67.   object CheckBox2: TCheckBox
  68.     Left = 208
  69.     Top = 272
  70.     Width = 97
  71.     Height = 17
  72.     Caption = '&View 3D'
  73.     TabOrder = 3
  74.     OnClick = CheckBox2Click
  75.   end
  76. end
  77.