home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / TEECHART / Delphi1_And_Delphi2 / EXAMPLES / STANDARD / TEEMAIN.DFM / TEEMAIN.txt < prev   
Encoding:
Text File  |  1998-10-24  |  15.9 KB  |  630 lines

  1. object TeeMainForm: TTeeMainForm
  2.   Left = 91
  3.   Top = 73
  4.   ActiveControl = Button2
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsDialog
  7.   Caption = 'TeeChart Standard version 4.0 - Demo'
  8.   ClientHeight = 406
  9.   ClientWidth = 632
  10.   Color = clNavy
  11.   Font.Color = clBlack
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   PixelsPerInch = 96
  16.   Position = poScreenCenter
  17.   OnCreate = FormCreate
  18.   TextHeight = 13
  19.   object Image1: TImage
  20.     Left = 484
  21.     Top = 26
  22.     Width = 141
  23.     Height = 45
  24.     AutoSize = True
  25.     Picture.Data = {<image000.bmp>}
  26.     OnClick = Label10Click
  27.   end
  28.   object Label2: TLabel
  29.     Left = 168
  30.     Top = 353
  31.     Width = 300
  32.     Height = 13
  33.     Caption = '∩┐╜ Copyright 1996-1998 by David Berneda. All Rights Reserved.'
  34.     Color = clNavy
  35.     Font.Color = clWhite
  36.     Font.Height = -11
  37.     Font.Name = 'MS Sans Serif'
  38.     Font.Style = []
  39.     ParentColor = False
  40.     ParentFont = False
  41.   end
  42.   object Panel1: TPanel
  43.     Left = 0
  44.     Top = 376
  45.     Width = 632
  46.     Height = 30
  47.     Align = alBottom
  48.     Alignment = taLeftJustify
  49.     TabOrder = 0
  50.     object Label11: TLabel
  51.       Left = 12
  52.       Top = 49
  53.       Width = 3
  54.       Height = 13
  55.     end
  56.     object Label13: TLabel
  57.       Left = 12
  58.       Top = 6
  59.       Width = 97
  60.       Height = 19
  61.       Caption = 'teeMach, SL.'
  62.       Font.Color = clNavy
  63.       Font.Height = -16
  64.       Font.Name = 'Arial'
  65.       Font.Style = [fsBold]
  66.       ParentFont = False
  67.     end
  68.     object Label15: TLabel
  69.       Left = 212
  70.       Top = 9
  71.       Width = 27
  72.       Height = 13
  73.       Caption = 'email:'
  74.       Font.Color = clBlack
  75.       Font.Height = -11
  76.       Font.Name = 'MS Sans Serif'
  77.       Font.Style = []
  78.       ParentFont = False
  79.     end
  80.     object Label16: TLabel
  81.       Left = 244
  82.       Top = 9
  83.       Width = 92
  84.       Height = 13
  85.       Caption = 'info@teemach.com'
  86.       Font.Color = clBlack
  87.       Font.Height = -11
  88.       Font.Name = 'MS Sans Serif'
  89.       Font.Style = []
  90.       ParentFont = False
  91.     end
  92.     object Label14: TLabel
  93.       Left = 117
  94.       Top = 10
  95.       Width = 48
  96.       Height = 13
  97.       Caption = 'Barcelona'
  98.       Font.Color = clBlack
  99.       Font.Height = -11
  100.       Font.Name = 'MS Sans Serif'
  101.       Font.Style = []
  102.       ParentFont = False
  103.     end
  104.     object Label3: TLabel
  105.       Left = 375
  106.       Top = 6
  107.       Width = 127
  108.       Height = 16
  109.       Caption = 'www.teemach.com'
  110.       Font.Color = clBlue
  111.       Font.Height = -13
  112.       Font.Name = 'MS Sans Serif'
  113.       Font.Style = [fsBold, fsUnderline]
  114.       ParentFont = False
  115.       OnClick = Label3Click
  116.     end
  117.     object Button1: TButton
  118.       Left = 536
  119.       Top = 4
  120.       Width = 89
  121.       Height = 23
  122.       Caption = 'Close'
  123.       ModalResult = 1
  124.       TabOrder = 0
  125.       OnClick = Button1Click
  126.     end
  127.   end
  128.   object TPanel
  129.     Left = 476
  130.     Top = 102
  131.     Width = 157
  132.     Height = 251
  133.     BevelOuter = bvNone
  134.     BorderWidth = 1
  135.     Color = clNavy
  136.     TabOrder = 1
  137.     object Button2: TButton
  138.       Left = 8
  139.       Top = -1
  140.       Width = 141
  141.       Height = 41
  142.       Caption = 'Show me the Demo !'
  143.       Default = True
  144.       Font.Color = clBlack
  145.       Font.Height = -12
  146.       Font.Name = 'Arial'
  147.       Font.Style = [fsBold]
  148.       ParentFont = False
  149.       TabOrder = 0
  150.       OnClick = Button2Click
  151.     end
  152.     object Button3: TButton
  153.       Left = 8
  154.       Top = 85
  155.       Width = 141
  156.       Height = 29
  157.       Caption = 'Features...'
  158.       Font.Color = clBlack
  159.       Font.Height = -12
  160.       Font.Name = 'Arial'
  161.       Font.Style = [fsBold]
  162.       ParentFont = False
  163.       TabOrder = 1
  164.       OnClick = Button3Click
  165.     end
  166.     object Button4: TButton
  167.       Left = 8
  168.       Top = 122
  169.       Width = 141
  170.       Height = 29
  171.       Caption = 'Pro Specifications...'
  172.       Font.Color = clBlack
  173.       Font.Height = -12
  174.       Font.Name = 'Arial'
  175.       Font.Style = [fsBold]
  176.       ParentFont = False
  177.       TabOrder = 2
  178.       OnClick = Button4Click
  179.     end
  180.     object Button6: TButton
  181.       Left = 8
  182.       Top = 48
  183.       Width = 141
  184.       Height = 29
  185.       Caption = 'Chart Styles...'
  186.       Font.Color = clBlack
  187.       Font.Height = -12
  188.       Font.Name = 'Arial'
  189.       Font.Style = [fsBold]
  190.       ParentFont = False
  191.       TabOrder = 3
  192.       OnClick = Button6Click
  193.     end
  194.     object Chart2: TChart
  195.       Left = 8
  196.       Top = 168
  197.       Width = 141
  198.       Height = 73
  199.       BackWall.Brush.Color = clWhite
  200.       BackWall.Brush.Style = bsClear
  201.       BackWall.Pen.Visible = False
  202.       Title.Text.Strings = (
  203.         'TChart')
  204.       Title.Visible = False
  205.       AxisVisible = False
  206.       BottomAxis.EndPosition = 100.000000000000000000
  207.       ClipPoints = False
  208.       Frame.Visible = False
  209.       LeftAxis.EndPosition = 100.000000000000000000
  210.       Legend.Color = clSilver
  211.       Legend.Visible = False
  212.       RightAxis.EndPosition = 100.000000000000000000
  213.       TopAxis.EndPosition = 100.000000000000000000
  214.       View3DWalls = False
  215.       BevelWidth = 2
  216.       Color = clSilver
  217.       TabOrder = 4
  218.       OnMouseDown = Chart2MouseDown
  219.       OnMouseUp = Chart2MouseUp
  220.       object FastLineSeries1: TFastLineSeries
  221.         Marks.ArrowLength = 8
  222.         Marks.Visible = False
  223.         SeriesColor = clAqua
  224.         LinePen.Color = clAqua
  225.         XValues.DateTime = False
  226.         XValues.Name = 'X'
  227.         XValues.Multiplier = 1.000000000000000000
  228.         XValues.Order = loAscending
  229.         YValues.DateTime = False
  230.         YValues.Name = 'Y'
  231.         YValues.Multiplier = 1.000000000000000000
  232.         YValues.Order = loNone
  233.       end
  234.       object FastLineSeries2: TFastLineSeries
  235.         Marks.ArrowLength = 8
  236.         Marks.Visible = False
  237.         SeriesColor = clYellow
  238.         LinePen.Color = clYellow
  239.         XValues.DateTime = True
  240.         XValues.Name = 'X'
  241.         XValues.Multiplier = 1.000000000000000000
  242.         XValues.Order = loAscending
  243.         YValues.DateTime = False
  244.         YValues.Name = 'Y'
  245.         YValues.Multiplier = 1.000000000000000000
  246.         YValues.Order = loNone
  247.       end
  248.       object Label10: TLabel
  249.         Left = 30
  250.         Top = 16
  251.         Width = 67
  252.         Height = 19
  253.         Alignment = taCenter
  254.         Caption = 'Ordering'
  255.         Color = clBlack
  256.         Font.Color = clBlack
  257.         Font.Height = -16
  258.         Font.Name = 'Arial'
  259.         Font.Style = [fsBold]
  260.         ParentColor = False
  261.         ParentFont = False
  262.         Transparent = True
  263.         OnClick = Label10Click
  264.         OnMouseDown = Chart2MouseDown
  265.       end
  266.       object Label4: TLabel
  267.         Left = 30
  268.         Top = 34
  269.         Width = 87
  270.         Height = 19
  271.         Alignment = taCenter
  272.         Caption = 'Information'
  273.         Color = clBlack
  274.         Font.Color = clBlack
  275.         Font.Height = -16
  276.         Font.Name = 'Arial'
  277.         Font.Style = [fsBold, fsUnderline]
  278.         ParentColor = False
  279.         ParentFont = False
  280.         Transparent = True
  281.         OnClick = Label10Click
  282.         OnMouseDown = Chart2MouseDown
  283.       end
  284.     end
  285.   end
  286.   object Panel2: TPanel
  287.     Left = 9
  288.     Top = 102
  289.     Width = 465
  290.     Height = 241
  291.     BevelWidth = 2
  292.     Color = clAqua
  293.     TabOrder = 2
  294.     object Chart7: TChart
  295.       Left = 3
  296.       Top = 7
  297.       Width = 97
  298.       Height = 66
  299.       AllowPanning = pmNone
  300.       AllowZoom = False
  301.       BackWall.Brush.Color = clWhite
  302.       BackWall.Brush.Style = bsClear
  303.       BackWall.Pen.Visible = False
  304.       MarginBottom = 10
  305.       MarginLeft = 5
  306.       MarginRight = 5
  307.       MarginTop = 0
  308.       Title.Font.Color = clBlack
  309.       Title.Font.Height = -17
  310.       Title.Font.Name = 'Arial'
  311.       Title.Font.Style = [fsBold]
  312.       Title.Text.Strings = (
  313.         '')
  314.       AxisVisible = False
  315.       BottomAxis.EndPosition = 100.000000000000000000
  316.       Chart3DPercent = 50
  317.       ClipPoints = False
  318.       Frame.Visible = False
  319.       LeftAxis.EndPosition = 100.000000000000000000
  320.       Legend.Visible = False
  321.       RightAxis.EndPosition = 100.000000000000000000
  322.       TopAxis.EndPosition = 100.000000000000000000
  323.       View3DOptions.Elevation = 315
  324.       View3DOptions.Orthogonal = False
  325.       View3DOptions.Perspective = 0
  326.       View3DOptions.Rotation = 360
  327.       View3DOptions.Zoom = 92
  328.       View3DWalls = False
  329.       BevelOuter = bvNone
  330.       Color = clAqua
  331.       TabOrder = 1
  332.       object PieSeries6: TPieSeries
  333.         Marks.ArrowLength = 8
  334.         Marks.Visible = False
  335.         SeriesColor = clRed
  336.         CustomYRadius = 25
  337.         ExplodeBiggest = 25
  338.         OtherSlice.Text = 'Other'
  339.         PieValues.DateTime = False
  340.         PieValues.Name = 'Pie'
  341.         PieValues.Multiplier = 1.000000000000000000
  342.         PieValues.Order = loNone
  343.       end
  344.     end
  345.     object Chart8: TChart
  346.       Left = 3
  347.       Top = 163
  348.       Width = 97
  349.       Height = 66
  350.       AllowPanning = pmNone
  351.       AllowZoom = False
  352.       BackWall.Brush.Color = clWhite
  353.       BackWall.Brush.Style = bsClear
  354.       BackWall.Pen.Visible = False
  355.       MarginBottom = 10
  356.       MarginLeft = 5
  357.       MarginRight = 5
  358.       MarginTop = 0
  359.       Title.Font.Color = clBlack
  360.       Title.Font.Height = -17
  361.       Title.Font.Name = 'Arial'
  362.       Title.Font.Style = [fsBold]
  363.       Title.Text.Strings = (
  364.         '')
  365.       AxisVisible = False
  366.       BottomAxis.EndPosition = 100.000000000000000000
  367.       Chart3DPercent = 95
  368.       ClipPoints = False
  369.       Frame.Visible = False
  370.       LeftAxis.EndPosition = 100.000000000000000000
  371.       Legend.Visible = False
  372.       RightAxis.EndPosition = 100.000000000000000000
  373.       TopAxis.EndPosition = 100.000000000000000000
  374.       View3DOptions.Elevation = 315
  375.       View3DOptions.Orthogonal = False
  376.       View3DOptions.Perspective = 0
  377.       View3DOptions.Rotation = 360
  378.       View3DOptions.Zoom = 87
  379.       View3DWalls = False
  380.       BevelOuter = bvNone
  381.       Color = clAqua
  382.       TabOrder = 2
  383.       object PieSeries7: TPieSeries
  384.         Marks.ArrowLength = 8
  385.         Marks.Visible = False
  386.         SeriesColor = clRed
  387.         CustomYRadius = 25
  388.         ExplodeBiggest = 20
  389.         OtherSlice.Text = 'Other'
  390.         PieValues.DateTime = False
  391.         PieValues.Name = 'Pie'
  392.         PieValues.Multiplier = 1.000000000000000000
  393.         PieValues.Order = loNone
  394.       end
  395.     end
  396.     object Chart10: TChart
  397.       Left = 105
  398.       Top = 139
  399.       Width = 97
  400.       Height = 66
  401.       AllowPanning = pmNone
  402.       AllowZoom = False
  403.       BackWall.Brush.Color = clWhite
  404.       BackWall.Brush.Style = bsClear
  405.       BackWall.Pen.Visible = False
  406.       MarginBottom = 10
  407.       MarginLeft = 5
  408.       MarginRight = 5
  409.       MarginTop = 0
  410.       Title.Font.Color = clBlack
  411.       Title.Font.Height = -17
  412.       Title.Font.Name = 'Arial'
  413.       Title.Font.Style = [fsBold]
  414.       Title.Text.Strings = (
  415.         '')
  416.       AxisVisible = False
  417.       BottomAxis.EndPosition = 100.000000000000000000
  418.       Chart3DPercent = 100
  419.       ClipPoints = False
  420.       Frame.Visible = False
  421.       LeftAxis.EndPosition = 100.000000000000000000
  422.       Legend.Visible = False
  423.       RightAxis.EndPosition = 100.000000000000000000
  424.       TopAxis.EndPosition = 100.000000000000000000
  425.       View3DOptions.Elevation = 315
  426.       View3DOptions.Orthogonal = False
  427.       View3DOptions.Perspective = 0
  428.       View3DOptions.Rotation = 360
  429.       View3DOptions.VertOffset = -6
  430.       View3DOptions.Zoom = 92
  431.       View3DWalls = False
  432.       BevelOuter = bvNone
  433.       Color = clAqua
  434.       TabOrder = 4
  435.       object PieSeries9: TPieSeries
  436.         Marks.ArrowLength = 8
  437.         Marks.Visible = False
  438.         SeriesColor = clRed
  439.         CustomYRadius = 25
  440.         ExplodeBiggest = 40
  441.         OtherSlice.Text = 'Other'
  442.         PieValues.DateTime = False
  443.         PieValues.Name = 'Pie'
  444.         PieValues.Multiplier = 1.000000000000000000
  445.         PieValues.Order = loNone
  446.       end
  447.     end
  448.     object Chart9: TChart
  449.       Left = 206
  450.       Top = 4
  451.       Width = 255
  452.       Height = 221
  453.       AllowPanning = pmNone
  454.       AllowZoom = False
  455.       BackWall.Brush.Color = clWhite
  456.       BackWall.Brush.Style = bsClear
  457.       BackWall.Pen.Visible = False
  458.       MarginBottom = 5
  459.       MarginLeft = 5
  460.       MarginRight = 5
  461.       MarginTop = 0
  462.       Title.Font.Color = clBlack
  463.       Title.Font.Height = -24
  464.       Title.Font.Name = 'Arial'
  465.       Title.Font.Style = [fsBold]
  466.       Title.Text.Strings = (
  467.         '')
  468.       Title.Visible = False
  469.       AxisVisible = False
  470.       BottomAxis.EndPosition = 100.000000000000000000
  471.       Chart3DPercent = 70
  472.       ClipPoints = False
  473.       Frame.Visible = False
  474.       LeftAxis.EndPosition = 100.000000000000000000
  475.       Legend.TextStyle = ltsPlain
  476.       Legend.Visible = False
  477.       RightAxis.EndPosition = 100.000000000000000000
  478.       TopAxis.EndPosition = 100.000000000000000000
  479.       View3DOptions.Elevation = 315
  480.       View3DOptions.Orthogonal = False
  481.       View3DOptions.Perspective = 0
  482.       View3DOptions.Rotation = 360
  483.       View3DWalls = False
  484.       BevelOuter = bvNone
  485.       Color = clAqua
  486.       TabOrder = 3
  487.       object PieSeries8: TPieSeries
  488.         Marks.Arrow.Color = clBlack
  489.         Marks.ArrowLength = 1
  490.         Marks.Font.Color = clNavy
  491.         Marks.Font.Height = -11
  492.         Marks.Font.Name = 'Arial'
  493.         Marks.Font.Style = []
  494.         Marks.Frame.Visible = False
  495.         Marks.Transparent = True
  496.         Marks.Visible = True
  497.         DataSource = Series1
  498.         PercentFormat = '##0.00 %'
  499.         SeriesColor = clRed
  500.         CustomYRadius = 35
  501.         ExplodeBiggest = 40
  502.         OtherSlice.Text = 'Other'
  503.         PiePen.Visible = False
  504.         PieValues.DateTime = False
  505.         PieValues.Name = 'Pie'
  506.         PieValues.Multiplier = 1.000000000000000000
  507.         PieValues.Order = loNone
  508.         DataSources = (
  509.           'Series1'
  510.           'PieSeries6'
  511.           'PieSeries7'
  512.           'PieSeries9')
  513.         object PieSeries8TAddTeeFunction: TAddTeeFunction
  514.         end
  515.       end
  516.     end
  517.     object Chart1: TChart
  518.       Left = 105
  519.       Top = 31
  520.       Width = 97
  521.       Height = 66
  522.       AllowPanning = pmNone
  523.       AllowZoom = False
  524.       BackWall.Brush.Color = clWhite
  525.       BackWall.Brush.Style = bsClear
  526.       BackWall.Pen.Visible = False
  527.       MarginBottom = 10
  528.       MarginLeft = 5
  529.       MarginRight = 5
  530.       MarginTop = 0
  531.       Title.Font.Color = clBlack
  532.       Title.Font.Height = -17
  533.       Title.Font.Name = 'Arial'
  534.       Title.Font.Style = [fsBold]
  535.       Title.Text.Strings = (
  536.         '')
  537.       AxisVisible = False
  538.       BottomAxis.EndPosition = 100.000000000000000000
  539.       Chart3DPercent = 50
  540.       ClipPoints = False
  541.       Frame.Visible = False
  542.       LeftAxis.EndPosition = 100.000000000000000000
  543.       Legend.Visible = False
  544.       RightAxis.EndPosition = 100.000000000000000000
  545.       TopAxis.EndPosition = 100.000000000000000000
  546.       View3DOptions.Elevation = 315
  547.       View3DOptions.Orthogonal = False
  548.       View3DOptions.Perspective = 0
  549.       View3DOptions.Rotation = 360
  550.       View3DWalls = False
  551.       BevelOuter = bvNone
  552.       Color = clAqua
  553.       TabOrder = 0
  554.       object Series1: TPieSeries
  555.         Marks.ArrowLength = 8
  556.         Marks.Visible = False
  557.         SeriesColor = clRed
  558.         CustomYRadius = 25
  559.         ExplodeBiggest = 25
  560.         OtherSlice.Text = 'Other'
  561.         PieValues.DateTime = False
  562.         PieValues.Name = 'Pie'
  563.         PieValues.Multiplier = 1.000000000000000000
  564.         PieValues.Order = loNone
  565.       end
  566.     end
  567.   end
  568.   object TPanel
  569.     Left = 8
  570.     Top = 359
  571.     Width = 156
  572.     Height = 1
  573.     TabOrder = 3
  574.   end
  575.   object TPanel
  576.     Left = 475
  577.     Top = 360
  578.     Width = 153
  579.     Height = 1
  580.     TabOrder = 4
  581.   end
  582.   object Panel3: TPanel
  583.     Left = 8
  584.     Top = 11
  585.     Width = 465
  586.     Height = 81
  587.     TabOrder = 5
  588.     object Label1: TLabel
  589.       Left = 8
  590.       Top = 15
  591.       Width = 449
  592.       Height = 22
  593.       Alignment = taCenter
  594.       AutoSize = False
  595.       Caption = 'The 100% Native Delphi Charting VCL Library'
  596.       Font.Color = clBlue
  597.       Font.Height = -19
  598.       Font.Name = 'Arial'
  599.       Font.Style = [fsBold]
  600.       ParentFont = False
  601.     end
  602.     object Label9: TLabel
  603.       Left = 8
  604.       Top = 44
  605.       Width = 449
  606.       Height = 19
  607.       Alignment = taCenter
  608.       AutoSize = False
  609.       Caption = 'For Borland Delphi and Borland C++ Builder'
  610.       Font.Color = clNavy
  611.       Font.Height = -16
  612.       Font.Name = 'Arial'
  613.       Font.Style = [fsBold]
  614.       ParentFont = False
  615.     end
  616.   end
  617.   object Timer1: TTimer
  618.     Interval = 1
  619.     OnTimer = Timer1Timer
  620.     Left = 392
  621.     Top = 292
  622.   end
  623.   object Timer2: TTimer
  624.     Interval = 200
  625.     OnTimer = Timer2Timer
  626.     Left = 348
  627.     Top = 289
  628.   end
  629. end
  630.