请先参看我原来发的http://expert.csdn.net/Expert/topic/3045/3045683.xml?temp=6.653994E-02这帖子!
我后来发现仍然不能解决问题!线段发生了折点!并不是我要的正确答案!
请高手解决这个问题!
-----------------------------
本贴UP有分!解决后另开贴给分!谢谢!

解决方案 »

  1.   

    请参看http://www.yaowen.cn/Temp/dbchart.jpg
      

  2.   

    一条的不会。
    偷懒的办法到有一个,用两条不同颜色的series,然后连起来。^_^
      

  3.   

    大家看看!我用变通的方法加add(0.2,'',clBlue)来实现了一下http://www.yaowen.cn/Temp/dbchart1.jpg,大家可以对比一下就知道了!
    还希望大家鼎力支持!看看哪位仁兄能解决!
    =============
    大家共有的财富!
      

  4.   

    你应该 线条画笔的颜色,在划线procedure Tfrom.FormCreate(Sender: TObject);
    begin
     series1.DataSource :=adoquery1 ;
       series1.Clear ;
       while not adoquery1.eof  do
         begin
        if adoquery1.FieldValues['aVal']>0.5 then
        begin
        //调节画笔的颜色
           series1.Add(adoquery1.FieldValues['aVal'],vartostr(adoquery1.FieldValues['aDate']),clYellow);
        end
        else
        //调节画笔的颜色
          series1.Add(adoquery1.FieldValues['aVal'],vartostr(adoquery1.FieldValues['aDate']), clBlue);
         adoquery1.next;    end;
    end;
    你的线,我不知道能不能用lineto和moveto 画出来,如果能可能简单一点