[Electronic_Arts]

Всем привет

Есть две одинаковых таблиц в базе данных
как реализовать такую задачу
Нужно выбранный запись из одной таблицы перенести в другую

Пока в голове только одна идея - каждую ячейку из таблицы1 перенести в свое место в таблице2

А как еще это можно реализовать??

[Electronic_Arts]

Так выдает ошибку

Код:

1 2 3 4 5 6 7

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

[Electronic_Arts]

Все решил

Код:

1 2 3 4 5 6

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;