delphi 创立的临时表 的记录过滤查询.立刻给分~

delphi 创立的临时表 的记录过滤查询....在线等,立刻给分~~~
//创建临时表格
function   TForm1.CreateTableInMemory(const   AFieldDefs:TFieldDefs):TDataSet;
var
    TempTable:TClientDataSet;
begin
    TempTable   :=   nil;
    Result   :=nil;
    if   AFieldDefs   <>   nil   then
    begin
        try
            TempTable   :=   TClientDataSet.Create(Application);
            TempTable.FieldDefs.Assign(AFieldDefs);
            TempTable.CreateDataSet;
            Result   :=   (TempTable   as   TDataSet);
        except
            if   TempTable   <>   nil   then
                TempTable.Free;
            Result   :=   nil;
            raise;
        end
    end
end;

 

//调用

procedure   TForm1.Button1Click(Sender:   TObject);
var
    ADataSet:TDataSet;
begin
    ADataSet:=TDataSet.Create(Self);
    with   ADataSet.FieldDefs   do
    begin
        Add( 'Name ',ftString,30,False);
        Add( 'Value ',ftInteger,0,False);
    end;
    with   DataSource1   do
    begin
        DataSet:=CreateTableInMemory(ADataSet.FieldDefs);
        DataSet.Open;
    end;
    ADataSet.Free;
end;


用以上方法建立临时表以后,数据都在DataSource1中了,怎么将DataSource1里面的数据通过条件查询语句将符合条件的数据插到自己新建立的TADOQuery1   中,,,

[解决办法]
如果是两个clientdataset可以这样
ClientDataSet1.data:=ClientDataSet2.data;


adoquery应该没有办法了