Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как выполнить поиск в memo правильно..?

wancuver © (2010-04-23 11:15:00)
procedure TForm1.Button1Click(Sender: TObject); begin ListBox1.Clear; // очистка компонента ListBox1 перед занесением в него списка файлов FindRes:=FindFirst(ExtractFilePath(Application.ExeName)+'Processed files/*.txt',faAnyFile,SR); // задание условий поиска и начало поиска While FindRes=0 do // пока мы находим файлы (каталоги), то выполнять цикл begin ListBox1.Items.Add(SR.Name); // добавление в список название найденного элемент res:=ExtractFilePath(Application.ExeName)+'Processed files/'+SR.Name; memo1.Lines.Add(res); // вот сдесь выполнить поиск в memo1 регулярным выражением. Найден участок совпадения, сохранить в ListBox2 и продолжить поиск..??? FindRes:=FindNext(SR); // продолжение поиска по заданным условиям end; FindClose(SR); // закрываем поиск kiv:=listbox1.Items.Count; label6.Caption:=IntToStr(kiv); end;
Пробывал что то делать, но без успеха, в delphi не сильно разбераюсь. Прошу помощи у мастеров

Не занят (2010-04-23 22:18:00) [1]
В конце концов выяснится, что искать нужно в текстовом файле.

Amoeba_ (2010-04-23 16:08:00) [2]
Статья о регулярных выражениях:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=163

wancuver (2010-04-23 15:15:00) [3]
Спасибо за ответы, искать всёже нужно не в memo а в самой переменной res.

wancuver (2010-04-23 15:12:00) [4]
Мой uin 413410131

wancuver (2010-04-23 15:10:00) [5]

> oldman © (23.04.10 15:02) [9]
>
>
> > wancuver (23.04.10 14:49) [8]
>
>
> То есть всю ветку ты не читал?
> Не нужен тебе поиск в мемо, не нужен...
> :)

У Вас есть ICQ, можно с Вами поговорить ВНЕ эфира.?

oldman (2010-04-23 15:02:00) [6]

> wancuver (23.04.10 14:49) [8]

То есть всю ветку ты не читал?
Не нужен тебе поиск в мемо, не нужен...
:)

wancuver (2010-04-23 14:49:00) [7]
Уважаемый oldman, я не очень знаком с регулярными выражениями, если выложите ссылочку на материал, буду благодарен, а тогда объяснить бы сохранение того что найду в listbox2..

Anatoly Podgoretsky (2010-04-23 13:17:00) [8]

> Зачем добавлять строку
> и опять искать во всем тексте?

Что бы получить бесконечный цикл.

oldman (2010-04-23 12:58:00) [9]
А уж если так нужен ListBox, почему не

label1.caption:=inttostr(listbox1.items.count);

oldman (2010-04-23 12:19:00) [10]

> kiv:=listbox1.Items.Count;
> label6.Caption:=IntToStr(kiv);

А почему вместо
ListBox1.Items.Add(SR.Name);
не
kiv:=kiv+1;

12 (2010-04-23 12:14:00) [11]
// вот сдесь выполнить поиск в res. Зачем добавлять строку и опять искать во всем тексте?
memo1.Lines.Add(res);

oldman (2010-04-23 11:58:00) [12]
И топик, имхо, для "Начинающих"

oldman (2010-04-23 11:52:00) [13]

> вот сдесь выполнить поиск в memo1 регулярным выражением.
> Найден участок совпадения, сохранить в ListBox2 и продолжить
> поиск..???

Тебе код написать по регулярным выражениям или по сохранению в ListBox2?

> Пробывал что то делать, но без успеха

Как пробовал?

> Если есть другие алгоритмы поиска, с интересом прочту

Ты даже задачу не объяснил, о алгоритме умолчу.

wancuver (2010-04-23 11:20:00) [14]
Если есть другие алгоритмы поиска, с интересом прочту

Наверх

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