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应该没有办法了