Как вывести одинаковые слова из строки в Делфи?

Question

[Alexman14003]

Мне нужно вывести одинаковые слова из строки, которая была введена пользователем в Edit. Заранее спасибо.

Answer 1

[kalapanga]

Очевидно, что сначала нужно разбить строку на слова и поместить их по вкусу например в массив или StringList. А вот как Вы это делать будете, зависит от того, что там у Вас такое вводится. В общем виде надо бежать по строке и проверять каждый символ - не разделитель ли он (пробел, знаки препинания, что-нибудь ещё). Если вводится что-то через один конкретный разделитель, то можно использовать свойство TStringList.DelimitedText, оно само строку поделит. А уж дальше список слов анализируете как хотите.

Comments

[Kot-da-Vinci]

В Delphi XE5 можно использовать метод split из хелпера к типу string.