TStringList.Exchange

Procedure Exchange(Item1, Item2: Integer);
Example: S.CommaText := := 'Acrobatics, SpellCraft, Stealth'; S.Exchange(1, 2); Writeln(S[2]); results in SpellCraft.

Note: The list is zero-based.