ClientDataSet 和DataSource连接，并在DBgrid显示-----------------请赐教，，，，
1：如何实现：ClientDataSet 和DataSource连接并在DBgrid显示
下面的代码：
procedure TForm1.Button2Click(Sender: TObject);
begin
ClientDataSet1.CreateDataSet;
ClientDataSet1.Open;
ClientDataSet1.Append;
ClientDataSet1.FieldByName('zkuan_').AsString:='1';
ClientDataSet1.FieldByName('cnum_').AsString:='张三';
ClientDataSet1.Post;
end;
如果要实现需要ClientDataSet ，DataSource设置那里？请高手说清楚一点，，，ClientDataSet这个控件以前没有用过，，，，

[解决办法]

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);begin  DBGrid1.DataSource  := DataSource1;  DataSource1.DataSet := ClientDataSet1;  with self.ClientDataSet1 do  begin    with FieldDefs.AddFieldDef do    begin      DataType:= ftString;      Name    := 'col1';      Size    := 100;    end;    CreateDataSet;    Append;    FieldByName( 'col1' ).AsString:='hello world';    Post;  end;end;
[解决办法]
Delphi(Pascal) code
procedure TForm1.Button2Click(Sender: TObject);begin  DataSetProvider1.DataSet:=self.ADOQuery1;  ClientDataSet1.ProviderName:='DataSetProvider1';  ADOQuery1.Close;  ADOQuery1.SQL.Clear;  ADOQuery1.SQL.Add( 'select * from a' );  ADOQuery1.Open;  ClientDataSet1.Data:=self.DataSetProvider1.Data;end;