Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.09.2008, 14:27   #1
zotox
Форумчанин
 
Регистрация: 09.09.2008
Сообщений: 395
По умолчанию Как проверить на наличее частицы в Edit1

Как???

(пс я не знаю что писать между if then)
zotox вне форума Ответить с цитированием
Старый 18.09.2008, 14:45   #2
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Ну примерно так.
Код:
const ch=['не','ни',....];
for i:=1 to length(edit1.text) do
if s[i] in ch then 
    begin
      showmessage('частица есть!');
      break;
    end;
puporev вне форума Ответить с цитированием
Старый 18.09.2008, 15:40   #3
zotox
Форумчанин
 
Регистрация: 09.09.2008
Сообщений: 395
По умолчанию

А что такое s в ифе???
zotox вне форума Ответить с цитированием
Старый 18.09.2008, 15:49   #4
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Это Edit1.text[i].
puporev вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Чтение из Edit1 выражения Rusl92 Общие вопросы Delphi 11 11.04.2008 18:01
y=Edit1->Text ??? m.a.x.i.m Помощь студентам 8 31.03.2008 11:29
if edit1.text:='123'then ben95 Помощь студентам 5 28.01.2008 16:29
из edit1.text в stringgrid. fluer Общие вопросы Delphi 8 25.04.2007 11:23
Поиск символа в Edit1.text Alar Компоненты Delphi 0 29.10.2006 19:02