home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / TEECHART / Delphi1_And_Delphi2 / EXAMPLES / DATABASE / TEEGROUP.DFM / TEEGROUP.txt
Encoding:
Text File  |  1998-10-24  |  2.8 KB  |  133 lines
  1. object FormGroupBy: TFormGroupBy
  2.   Left = 60
  3.   Top = 26
  4.   Width = 603
  5.   Height = 473
  6.   ActiveControl = Chart1
  7.   Caption = 'Group By (CrossTab) Database Charts'
  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 Chart1: TChart
  18.     Left = 0
  19.     Top = 218
  20.     Width = 595
  21.     Height = 228
  22.     BackWall.Brush.Color = clWhite
  23.     BackWall.Brush.Style = bsClear
  24.     BottomWall.Size = 9
  25.     LeftWall.Size = 9
  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.     Align = alClient
  33.     TabOrder = 0
  34.     object Series1: TBarSeries
  35.       Marks.ArrowLength = 20
  36.       Marks.Visible = False
  37.       SeriesColor = clRed
  38.       BarStyle = bsPyramid
  39.       MultiBar = mbNone
  40.       XValues.DateTime = False
  41.       XValues.Name = 'X'
  42.       XValues.Multiplier = 1.000000000000000000
  43.       XValues.Order = loAscending
  44.       YValues.DateTime = False
  45.       YValues.Name = 'Bar'
  46.       YValues.Multiplier = 1.000000000000000000
  47.       YValues.Order = loNone
  48.     end
  49.   end
  50.   object Panel1: TPanel
  51.     Left = 0
  52.     Top = 170
  53.     Width = 595
  54.     Height = 48
  55.     Align = alTop
  56.     TabOrder = 1
  57.     object DBNavigator1: TDBNavigator
  58.       Left = 16
  59.       Top = 16
  60.       Width = 231
  61.       Height = 25
  62.       DataSource = DataSource1
  63.       TabOrder = 0
  64.     end
  65.     object RadioGroup1: TRadioGroup
  66.       Left = 264
  67.       Top = 8
  68.       Width = 153
  69.       Height = 33
  70.       Caption = 'Amount Paid:'
  71.       Columns = 2
  72.       ItemIndex = 1
  73.       Items.Strings = (
  74.         'Count'
  75.         'Sum')
  76.       TabOrder = 1
  77.       OnClick = RadioGroup1Click
  78.     end
  79.     object Button1: TButton
  80.       Left = 432
  81.       Top = 16
  82.       Width = 57
  83.       Height = 25
  84.       Caption = 'Swap'
  85.       TabOrder = 2
  86.       OnClick = Button1Click
  87.     end
  88.     object BitBtn1: TBitBtn
  89.       Left = 504
  90.       Top = 16
  91.       Width = 75
  92.       Height = 25
  93.       Caption = 'Edit...'
  94.       TabOrder = 3
  95.       OnClick = BitBtn1Click
  96.     end
  97.   end
  98.   object Panel2: TPanel
  99.     Left = 0
  100.     Top = 0
  101.     Width = 595
  102.     Height = 170
  103.     Align = alTop
  104.     Caption = 'Panel2'
  105.     TabOrder = 2
  106.     object DBGrid1: TDBGrid
  107.       Left = 1
  108.       Top = 1
  109.       Width = 593
  110.       Height = 168
  111.       Align = alClient
  112.       DataSource = DataSource1
  113.       TabOrder = 0
  114.       TitleFont.Color = clWindowText
  115.       TitleFont.Height = -11
  116.       TitleFont.Name = 'MS Sans Serif'
  117.       TitleFont.Style = []
  118.     end
  119.   end
  120.   object Query1: TQuery
  121.     DatabaseName = 'dbdemos'
  122.     SQL.Strings = (
  123.       'select * from orders')
  124.     Left = 16
  125.     Top = 16
  126.   end
  127.   object DataSource1: TDataSource
  128.     DataSet = Query1
  129.     Left = 64
  130.     Top = 16
  131.   end
  132. end
  133.