procedure Move(CurIndex, NewIndex: Integer)
Перемещает элемент из одной позиции списка в другую.
Параметры: