| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: Для новичков > Замена поиска слова с Edit1.Text на Pos |
| Автор: Ruzza 7.9.2009, 12:18 |
| Здравствуйте. подскажите. есть программа, в которой поиск слова производится вводом в Edit1: [CODE]procedure TMainForm.FindTextButtonClick(Sender: TObject); begin Edit1.Text; BeginFindReplacible; end;[CODE] т.е. ищем одно слово. Если вводить два слова, то они ищутся подряд, как и ввели - "пора домой" вводим - ищем "пора домой", а хотелось бы как, на примере POS: if (Pos(пора', List[b]) <> 0) and (Pos('домой', List[b]) <> 0) and (_temp.IndexOf(List[b]) = -1) then .. т.е. поиск слов в любом месте строки и с условием "и", "или" (должны быть жестко зашиты в программу). можно ли такой осуществить? |