RecordSet

[Javad_zahmatkesh]

hi
i have 3 TadoQuery
i want to combine Adoquery2 And Adoqeury3 Recordset and append to Tadoquery1 Recordset
how can i do that?

[ixilimuse]

Hi,
You can use this:

q1.FieldByName('SomeName').asString := q2.FieldByName('SomeName').asString + ' ' + q3.FieldByName('SomeName').asString;

But this will only work with strings. Numeric fields will be summarized.

You can use "Q.Fields.tag", to determine the string fields. And move the field in the loop by assigning a string.

Something like:

...
 
If q1.Fields[I].tag = 1 then 
begin
 q1.Append;
 q1.Fields[I].AsString := q2.Fields[I].AsString + ' ' + q3.Fields[I].AsString;
 q1.Post;
end;
q2.Next;
q3.Next;
...