TStringList.Insert

Procedure Insert(Index: Integer; S: String);
Example: S.CommaText := 'Acrobatics, SpellCraft, Stealth'; S.Insert(1, 'Cat'); Writeln(S[1]); results in Cat.

Note: The list is zero-based.