ADO_Group1 - ADOTable
ADO_Group1.First;
for i:=1 to 4 do
begin ADO_Group1.FieldByName('Имя игрока').Asstring:=ADOTable1.FieldByName('Имя игрока').asstring;
ADO_Group1.Post;
ADOTable1.Next;
В таблице появляются 8 записей, причем они являются копиями первого и последнего значений.
Может, использовать SQL запрос? Но какой?