BCB6 Tchart LineSeries 右键菜单方式清除曲线出错
void TForm1::refurbishTempFun(int Num ) //画线函数
{
Series1->Clear(); //清除曲线
Chart1->Series[0]->Clear(); //清除曲线
Series1->Active=false;
for(int i=0;i<Num;i++) //每月31天
{ Series1->AddXY( i+1, i*0.1+35,i*0.1+35, clBlue ); //显示点
}
Series1->Active=true;
}
//********** 按钮触发，画线 ，，没有问题
void __fastcall TForm1::btn1Click(TObject *Sender) //按钮1事件
{
refurbishTempFun(7 ); //画7个点
}
void __fastcall TForm1::btn2Click(TObject *Sender) //按钮2事件
{
refurbishTempFun(6 ); //画6个点
}
//*********** 右键菜单触发，画线 ，，
但是注意，我是用右键菜单事件触发的， 就会出错的，大家可以试一下，等回复
void __fastcall TForm1::mniN71Click(TObject *Sender)
{
refurbishTempFun(7 );
}
void __fastcall TForm1::mniN61Click(TObject *Sender)
{
refurbishTempFun(6 );
}
触发mniN71Click，后再mniN61Click
就会出现弹窗警告：“List index out of bounds (6)”
//我试过这种方法： 仍然弹窗警告：“List index out of bounds (6)”
void __fastcall TForm1::mniN71Click(TObject *Sender)
{
btn1Click(this);
}
void __fastcall TForm1::mniN61Click(TObject *Sender)
{
btn2Click(this);
}
[解决办法]
我测试过，没有出错，你的曲线是怎么定义的？折线还是什么？是否属性方面有特别的设置过？
[解决办法]
按你的代码，我也不出错，；你那里是咋回事呢
