我想动态给table1.tablename赋值,可是运行时只有tabsheet显示了数据,请问怎么解决!
procedure Tqtjl_form.TabSheet1Show(Sender: TObject);
begin
table1.Active:=false;
table1.TableName:='zzjl';
table1.Active:=true;
end;procedure Tqtjl_form.TabSheet2Show(Sender: TObject);
begin
table1.Active:=false;
table1.TableName:='qtdpjl';
table1.Active:=true;
end;