Тема: Работа со строками
Показать сообщение отдельно
  #3  
Старый 28.07.2010, 13:45
ilsur ilsur вне форума
Прохожий
  
Регистрация: 04.03.2009
Сообщения: 17
Репутация: 10
По умолчанию
Час попробую ! Значит по нажатию кнопки написать :

begin
if pos('cos ',edit1.text)>0 or
pos('cos,',edit1.text)>0 or
pos('cos.',edit1.text)>0 then shiwmessage('Ошибочка !');
endl
Ответить с цитированием