我在一个chart里加了两个series，我想通过button来切换显示series，应该怎么写啊？(100分)

C

cocoy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-04

• #1

我在一个chart里加了两个series，我想通过button来切换显示series，应该怎么写啊？

 

O

Oldtiger

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-05

• #2

procedure tform1.bottom1click(sender:Tobject) ;
begin
If Bottom1.Tag=1 then
begin
Chart1.series[0].show ;
Chart1.series[1].close ;
Bottom1.tag := 2 ;
End
else
begin
Chart1.series[0].close ;
Chart1.series[1].show ;
Bottom1.tag := 1 ;
End ;
End ;

 

8

816

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-05

• #3

差不多就是楼上的意思。

 

山

山水之间

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-10

• #4

同意！

 

W

wangfu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-10

• #5

设置visible属性即可

 

H

HIGOAL

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-10

• #6

显示的时候自己创建即可

 

C

ctx62

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-22

• #7

to wangfu
chart中的series没有visible属性
用button切换可用series中的active属性来切换
为true时可见，为false时不可见

 

C

Cardinal

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-07

• #8

if chart1.SeriesList[0].active then
begin
chart1.SeriesList[0].active:=False;
chart1.serieslist[1].active:=True;
end
else
begin
chart1.SeriesList[1].active:=False;
chart1.serieslist[0].active:=True;
end;

 

C

Cardinal

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-07

• #9

这要两天 语句就可以了：
chart1.SeriesList[0].active:=not chart1.SeriesList[0].Active;
chart1.SeriesList[1].Active:=not chart1.SeriesList[0].active;