Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поиск в TMemo [D6, Win2k]


VDen ©   (2002-06-26 16:42:00) 

Функция Pos находит первое вхождение подстроки в строку, а как определить все последующие?


rhf   (2002-06-27 11:02:00) [1]

или можно так
n:=n+pos(substr,copy(memo1.text,n+1,length(memo1.text)))

но как он будет себя вести при больших объемах я не знаю...


MAxiMum   (2002-06-27 10:51:00) [2]

Можно, но долго. Лучше "руками", сам посимвольно проверяешь Memo.Lines.Text и сравниваешь.


Song   (2002-06-27 09:05:00) [3]

Присвоить Memo.Lines.Text в промежуточную перемеенную, искать по ней, после поиска каждого последующего форагмента удалять найденный, пока поиск не закончится ( While Pos(..)>0 Do ... )


Наверх

Титульная страница Поиск, карта сайта Написать письмо