home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / TEECHART / Delphi1_And_Delphi2 / EXAMPLES / EXTENDED / USINGREC.DFM / USINGREC.txt
Encoding:
Text File  |  1998-10-24  |  2.6 KB  |  109 lines
  1. object FormDBSingleRecord: TFormDBSingleRecord
  2.   Left = 206
  3.   Top = 163
  4.   Width = 544
  5.   Height = 438
  6.   Caption = 'Single-Record charting of "Animals.dbf" table'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Position = poScreenCenter
  13.   Scaled = False
  14.   OnCreate = FormCreate
  15.   TextHeight = 13
  16.   object DBChart1: TDBChart
  17.     Left = 0
  18.     Top = 41
  19.     Width = 536
  20.     Height = 370
  21.     BackWall.Brush.Color = clWhite
  22.     BackWall.Brush.Style = bsClear
  23.     Gradient.Visible = True
  24.     Title.Font.Color = clBlue
  25.     Title.Font.Height = -27
  26.     Title.Font.Name = 'Arial'
  27.     Title.Font.Style = [fsBold, fsItalic]
  28.     Title.Text.Strings = (
  29.       'TDBChart')
  30.     BottomAxis.EndPosition = 100.000000000000000000
  31.     Chart3DPercent = 100
  32.     LeftAxis.EndPosition = 100.000000000000000000
  33.     RightAxis.EndPosition = 100.000000000000000000
  34.     TopAxis.EndPosition = 100.000000000000000000
  35.     View3DOptions.Elevation = 343
  36.     View3DOptions.Orthogonal = False
  37.     View3DOptions.Rotation = 351
  38.     View3DOptions.Zoom = 90
  39.     Align = alClient
  40.     ParentShowHint = False
  41.     ShowHint = True
  42.     TabOrder = 0
  43.     OnMouseMove = DBChart1MouseMove
  44.     object Series1: TBarSeries
  45.       ColorEachPoint = True
  46.       Cursor = 2020
  47.       Marks.ArrowLength = 20
  48.       Marks.Style = smsPercent
  49.       Marks.Visible = True
  50.       DataSource = DataSource1
  51.       SeriesColor = clRed
  52.       XValues.DateTime = False
  53.       XValues.Name = 'X'
  54.       XValues.Multiplier = 1.000000000000000000
  55.       XValues.Order = loAscending
  56.       YValues.DateTime = False
  57.       YValues.Name = 'Bar'
  58.       YValues.Multiplier = 1.000000000000000000
  59.       YValues.Order = loNone
  60.       YValues.ValueSource = 'size;weight'
  61.     end
  62.   end
  63.   object Panel1: TPanel
  64.     Left = 0
  65.     Top = 0
  66.     Width = 536
  67.     Height = 41
  68.     Align = alTop
  69.     TabOrder = 1
  70.     object Label1: TLabel
  71.       Left = 296
  72.       Top = 20
  73.       Width = 104
  74.       Height = 13
  75.       Caption = 'Click on a chart part...'
  76.     end
  77.     object DBNavigator1: TDBNavigator
  78.       Left = 8
  79.       Top = 8
  80.       Width = 221
  81.       Height = 25
  82.       DataSource = DataSource1
  83.       TabOrder = 0
  84.     end
  85.     object BitBtn1: TBitBtn
  86.       Left = 456
  87.       Top = 8
  88.       Width = 75
  89.       Height = 25
  90.       Caption = '&Close'
  91.       TabOrder = 1
  92.       OnClick = BitBtn1Click
  93.     end
  94.   end
  95.   object Table1: TTable
  96.     Active = True
  97.     DatabaseName = 'dbdemos'
  98.     TableName = 'ANIMALS.DBF'
  99.     Left = 32
  100.     Top = 16
  101.   end
  102.   object DataSource1: TDataSource
  103.     DataSet = Table1
  104.     OnDataChange = DataSource1DataChange
  105.     Left = 32
  106.     Top = 72
  107.   end
  108. end
  109.