так чтоли? (на mysql точно работает)
Код:
ADOQuery2.SQL.Add('Update Таблица1 SET ID = ID + 1, Оценка='+IntToStr(oko));
P.S. шото вы не то делаете, нужно же через INSERT, сделайте поле ID типа Счетчик и не используйте его при INSERT, оно само авто увеличиться.
Код:
INSERT INTO Table (MARK) VALUES (:MARK)
.........................
ADOQuery1.Params.ParamByName('MARK').AsInteger := 5;
ADOQuery1.ExecSQL;