Привет программистам помогите плиз мне надо чтоб из Memo1 каждое слово вставлялось в ValueListEditor и количество этого слова встречающего в тексте т.е слово = количество. 
вот функция подсчета количества всех слов мож кому поможет

Значит обрисую на пальцах, а реализовывать уже как-нить сами пожалуйста иначе "центр помощи".
Значит есть такая функция pos ещё с Pascal осталась, она находит первое вхождение подстроки в строку(как работает будешь искать уже сам)
Значит берёшь первую строчку и присваеваем её значение некоторой переменной, далее ищем при помощи pos первый пробел, находим используем copy(тоже найдёшь в учебники по Pascal'ю как работает), то что выдернули copy проверяем последний символ, если запятая или точка или ещё какой знак препинания, то его удаляем функцией delete. Потом опять Delete, только удаляем из исходной строки все символы что выдернул copy и минус пробел.
Все функции что я указал описаны в любом нормальном учебнике по Pascal'ю, но вроде есть и в некоторых учебниках по Delphi, если нет учебников, то скачать никаких проблем не представляет - благо инет огромен.

Далее желательно видеть попытку реализации алгоритма 

Хотелось бы знать, что за текст в Memo (как отделены слова друг от друга).

Это сообщение отредактировал(а) Keeper89 - 24.3.2010, 22:09

НУ судя по 14 строчке там запятые есть точки и ещё кое что а также прОбЕлы  

Добавлено через 2 минуты и 53 секунды
А ещё мне очень нравится 16 строчка       

P.S. модераторы не ругайте меня, а то день был длинным и теперь начинаю издеватьсяя над всеми

Что там судить, пусть ТС и скажет 

вот пытался написать ну чет не получается