procedure Move(CurIndex, NewIndex: Integer)  

Перемещает элемент из одной позиции списка в другую.

Параметры:

• CurIndex - текущая позиция в списке.
• NewIndex - новая позиция.