TStringList.AddStrings

Procedure AddStrings(Source: TStringList);
Example: S.AsString := 'Acrobatics + 1, SpellCraft + 1, Stealth + 8'; T.AsString := 'Perform +9, Survival +5'); S.AddStrings(T); Writeln(S.Count); results in 5.