var
series2:array of TLineSeries;
可以這樣定義吧. SetLength(series2,2);
這裡有2個. 是我在按鈕事件里點第一次的時候, 可以創建. 一切正常.
在點一次按鈕就報 list index out of bounds(-1)
點第3次又正常了. 下一次又報錯.
如果我把series2[1] 那一組注釋掉. 點多少次都沒有關係. series2[0]:=TLineSeries.Create(DBChart1);
series2[0].DataSources.Add(dxMemData1);
series2[0].YValues.ValueSource := 'stand';
series2[0].XLabelsSource := 'riqi';
series2[0].Title :='ĵ§Ù½u';
DBChart1.AddSeries(series2[0]); series2[1] :=TLineSeries.Create(DBChart1);
series2[1].DataSources.Add(dxMemData1);
series2[1].YValues.ValueSource := 'total';
series2[1].Title :='¦Xp';
series2[1].XLabelsSource := 'riqi';
series2[1].LineHeight :=2;
DBChart1.AddSeries(series2[1]); 高人們, 為什麼?
series2:array of TLineSeries;
可以這樣定義吧. SetLength(series2,2);
這裡有2個. 是我在按鈕事件里點第一次的時候, 可以創建. 一切正常.
在點一次按鈕就報 list index out of bounds(-1)
點第3次又正常了. 下一次又報錯.
如果我把series2[1] 那一組注釋掉. 點多少次都沒有關係. series2[0]:=TLineSeries.Create(DBChart1);
series2[0].DataSources.Add(dxMemData1);
series2[0].YValues.ValueSource := 'stand';
series2[0].XLabelsSource := 'riqi';
series2[0].Title :='ĵ§Ù½u';
DBChart1.AddSeries(series2[0]); series2[1] :=TLineSeries.Create(DBChart1);
series2[1].DataSources.Add(dxMemData1);
series2[1].YValues.ValueSource := 'total';
series2[1].Title :='¦Xp';
series2[1].XLabelsSource := 'riqi';
series2[1].LineHeight :=2;
DBChart1.AddSeries(series2[1]); 高人們, 為什麼?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货