DBChart控件的DataSource属性动态改变问题(64分)

  • 主题发起人 主题发起人 callxuelin
  • 开始时间 开始时间
C

callxuelin

Unregistered / Unconfirmed
GUEST, unregistred user!
case ComboBox2.ItemIndex of
0..3: with DataModule1.ADOTable4 do
begin
Filter:='DateTimeNum='+''''+S_DateTime+'''';
Filtered:=True;
Open;
First;
repeat
with Series1 do
begin
case ComboBox2.ItemIndex of
0:
begin
//共享初始化
DBChart1.LeftAxis.Maximum := 350;
DBChart1.LeftAxis.Minimum := 150;
DBChart1.LeftAxis.Increment := 10;
DBChart1.LeftAxis.EndPosition := 57;
//用DBChart实现字段显示
DataSource:=DataModule1.ADOTable4;
Series1.YValues.ValueSource:='VA';
Series1.XValues.ValueSource:='Time';
Series1.XValues.DateTime :=True;
end;
... ... ... ...
4..5: with DataModule1.ADOTable5 do
begin
Filter:='DateTimeNum='+''''+S_DateTime+'''';
Filtered:=True;
Open;
First;
repeat
with Series1 do
begin
case ComboBox2.ItemIndex of
4:
begin
//共享初始化
DBChart1.LeftAxis.Maximum := 350;
DBChart1.LeftAxis.Minimum := 150;
DBChart1.LeftAxis.Increment := 10;
DBChart1.LeftAxis.EndPosition := 57;
//用DBChart实现字段显示
DataSource:=DataModule1.ADOTable5;
//改变Series1 的DataSource
Series1.YValues.ValueSource:='VA';
Series1.XValues.ValueSource:='Time';
Series1.XValues.DateTime :=True;
end;
end;
end;
Next;
until DataModule1.ADOTable5.Eof
end
else
MessageBox(self.handle,'抱歉,没有您想要的数据曲线','曲线信息',MB_OK+MB_ICONEXCLAMATION);
end

当ComboBox的ItemIndex为4或5时,实现另外一个表(DataModule1.ADOTable5)
的数据曲线显示,运行的结果提示找不到DataModule1.ADOTable4中的字段,而我想实现的是DataModule1.ADOTable5,
是不是不能修改DataSource属性,还是什么别的??
 
怎么没反应啊,
救命啊·!
 
在所作修改之前先将数据库关闭,修改之后,在将数据库打开。
 
更改datasorce属性时,得把数据集先关闭掉。
 
这样会不会影响过滤集,
外循环包含表的过滤处理的结果,
关闭以后,过滤的结果不是没了吗?
 
后退
顶部