TStringList.Create

Constructor Create;
Example: var S: TStringList; begin S := TStringList.Create; S.AsString := 'Acrobatics + 1, SpellCraft + 1, Stealth + 8'; Writeln(S.Count); S.Free; end;