TTeeChart怎样才能做到这样的效果？

Question

如图所示：
http://bbs.2ccc.com/attachments/2006/kingbenz_200652210812.jpg

Answer 1

第一，把3D的选项去掉
第二。添加line，并且把point设置为显示
第三、series1.add(x,y)
至于右边的那个，可以自己画，参考DELPHI自带的例子。

Answer 2

不过我看了你那个效果图之后，我觉得，要完成这样的功能，不需要用teechart，你在自己画，这样容易控制，也可以按照你自己的要求显示需要的信息。

Answer 3

如果你的黄线和红线是某个报警值的话，你就画一条横线就可以了啊。。或者添加几条line，然后X坐标主键增加，Y不变。。如果那些数据是从数据库中取得，你用DBCHART可以很容易实现，直接设置就可以产生那个效果了。

Answer 4

用DBCHART，你连代码都不用写。。

Answer 5

var
  y:integer;
begin
with Chart.Canvas do begin
   Pen.style:= psDot;
   Pen.mode:= pmNotXor;
   Pen.Width:=1;
   y:=LeftAxis.CalcYposvalue(你定的值);
   Moveto(CartRect.left,y);
   Lineto(CartRect.Right,y);............
其它的你自己写吧

Answer 6

在DelphiBBS得到正解:
uses TeeTools
//画线  Chart1.View3D:=False;
  Chart1.Tools.Add(TColorLineTool.Create(Self));
  Chart1.Tools.Add(TColorLineTool.Create(Self));
  (Chart1.Tools.Items[0] as TColorLineTool).Axis:=Chart1.Axes.left;
  (Chart1.Tools.Items[0] as TColorLineTool).Style:=clCustom;
  (Chart1.Tools.Items[0] as TColorLineTool).Value:=1.7;
  (Chart1.Tools.Items[0] as TColorLineTool).Pen.Color:=clRed;
  (Chart1.Tools.Items[1] as TColorLineTool).Axis:=Chart1.Axes.left;
  (Chart1.Tools.Items[1] as TColorLineTool).Style:=clCustom;
  (Chart1.Tools.Items[1] as TColorLineTool).Value:=1.8;
  (Chart1.Tools.Items[1] as TColorLineTool).Pen.Color:=clYellow;