Тема: Memo и последнее повторяющееся слово
Показать сообщение отдельно
  #2  
Старый 17.12.2010, 16:18
Аватар для friz
friz friz вне форума
Местный
  
Регистрация: 04.04.2008
Адрес: Минск
Сообщения: 596
Версия Delphi: 2007 & JAVA EE
Репутация: 10670
По умолчанию
Код:
if pos('псина',memo1.text) then begin showmessage('DOG'); exit; end;
__________________
Последний раз редактировалось Admin, Сегодня в 10:32.
Ответить с цитированием