如何在同一个DBGrid中显示数据库中不同的表(在程序中通过按钮来操作)(50分)

我现在想在同一个DBGrid中显示数据库中不同的表,就是我想把多个ADOTable(都与ADOConnection1连接)中的表通过不同的[red]按钮[/red]来显示在这个DBGrid中,就是希望通过程序打开不同的表但只在同一个DBGrid中显示出来.
大家帮帮忙啊

DBGrid的procedure TForm1.Button1Click(Sender: TObject);
begin

DBGrid1.Refresh;
adoquery1.Connection:=ADOConnection1;
adoquery1.Close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from b_min');
adoquery1.open;
datasource1.DataSet:=adoquery1;
DBGrid1.DataSource:=datasource1;

end;

procedure TForm1.Button2Click(Sender: TObject);
begin

DBGrid1.Refresh;
adoquery1.Connection:=ADOConnection1;
adoquery1.Close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from zzz');
adoquery1.open;
datasource1.DataSet:=adoquery1;
DBGrid1.DataSource:=datasource1;
end;

你用代码控制连接DBGrid的DataSource与ADOTable的连接就可以了；

接受答案了