a ver a ver aver....
segun entendi lo que deseas hacer es unir 2 tablas en una nueva verdad?
si las tablas tienen los campos iguales entonces funcionaria perfectamente
Código Delphi
[-]
table2.FieldByName('noreg').AsInteger:=nr;
for I := 1 to query2.fields.Count - 1 do
Begin
table2.Fields[i].Value := query2.Fields[i].Value;
table2.post;
query2.Next;
end
ten cuidado con los Begin y los end, quiza ahi esta tu problema