[Black Raider]

Код:

if adoquery1.isEmpty=false then begin
  ADOQUERY1.first;
  repeat
    table1.append;
    table1.field['field1'].value:=Adoquery1.fieldbyname('fieldADO1').value;
    table1.field['field2'].value:=Adoquery1.fieldbyname('fieldADO2').value;
    table1.post;
    adoquery1.next;
  until adoquery1.eof;
end;

Где то так. под рукой сейчас Дельфи нет. но чтото около того.