procedure Move(CurIndex: Integer; NewIndex: Integer);

Changes the position of an item in the Items array. 

Call Move to move the item at the position CurIndex so that it occupies the position NewIndex. CurIndex and NewIndex are zero-base indexes into the Items array.