id := FDQuery.FieldByName('id').Value; SendBase.SQL.Clear; SendBase.SQL.Add('insert into Table2'); SendBase.SQL.Add('SELECT * FROM Table1'); SendBase.SQL.Add('WHERE idTable1='+inttostr(id)+''); SendBase.ExecSQL;