{ Заполняет список List словами, выделенных из строки S,
разделителями слов являются любое кол-во символов из множества Delimiters.
Возвращает List. Чтобы можно было писать примерно следующим образом
sl := FillWordsList(SomeStr, SomeDelim, TStringList.Create);
try
Do something...