SQL:
Код:
insert into Tb2 select * from Tb1 where id = :id;
потом просто перечитаешь вторую таблицу.
Структура таблиц должна быть одинаковая.
Delphi:
Код:
Tb2.Edit;
For I := 0 To Tb1.Fields.Count-1 Do
Tb2.Fields[i].Value := Tb1.Fields[i].Value;
Tb2.Post;
В предположении, что структура таблиц одинаковая и нет BLOB-полей.
Если структура разная, то нужен список перекидываемых полей.
Соответсвенно, в случае SQL надо будет генерировать запрос в рантайм (если для разных таблиц нужна операция). В случае Delphi, просто идем по списку имен полей и обращаемся через FieldByName(names[i]) вместо Fields[i].