DBGird数据绑定的问题！

[foolishidea]

var
Form1: TForm1;
AdoDb1 : TAdoConnection;
MySql : TAdoQuery;
MyDataSource: TDataSource;
ConStr :String;
//====================================================
procedure TForm1.Button1Click(Sender: TObject);
begin
ConStr := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;Persist Security Info=False;';
AdoDb1 := TAdoConnection.Create(owner);
AdoDb1.ConnectionString := ConStr;
AdoDb1.LoginPrompt := False;
AdoDb1.Connected := True;

MySql := TAdoQuery.Create(owner);
MySql.Connection := AdoDb1;
MySql.Sql.Text := 'Select * FROM xx';
MySql.Open;
MySql.Active := true;
MyDataSource := MySql.DataSource;
DBGrid1.DataSource :=MyDataSource;
DBGrid1.Refresh;
end;


在设计时DBGrid1不绑定任何东西，在运行时这样绑定不行吗？

[foolishidea]

谢谢!

[suton]

MySql.Sql.Text := 'Select * FROM xx';
MySql.Open;
MySql.Active := true; ///这里，既然已经open了，又Active:=true做什么？
MyDataSource := MySql.DataSource; //MyDataSource.DataSet:=MySql;
DBGrid1.DataSource :=MyDataSource;
DBGrid1.Refresh;

[wyr521]

同意楼上

[dxwin]

MySql.Sql.Text := 'Select * FROM xx';
MySql.Open;
MySql.Active := true;
MyDataSource := MySql.DataSource; //MyDataSource.DataSet:=MySql;
DBGrid1.DataSource :=MyDataSource;
DBGrid1.Refresh;
这样就可以了

[dxwin]

补充：
MySql.Open;
MySql.Active := true; 作用一样，就选一个吧