zygs你说的我没听太懂
我的意思是在onneeddata里设置的
代码如下:
procedure TfrmBbiao2.QuickRep6NeedData(Sender: TObject;
var MoreData: Boolean);
begin
moredata:=(i<48);
if moredata then
begin
adoquery1.Filter:='测点编号='''+num[i-1]+'''';
adoquery1.Filtered:=true;
with qrchart1.Chart.Title.Textdo
begin
clear;
add('第'+inttostr(i)+'号点');
end;
inc(i);
end;
end;
这样一共打了47个图
qrchart的连接状态是在设计时指定的
预览都正常
照你这么说我该如何改呢??