Показать сообщение отдельно
  #1  
Старый 21.02.2011, 20:00
Alex_Gordon Alex_Gordon вне форума
Прохожий
 
Регистрация: 21.02.2011
Сообщения: 19
Репутация: 10
По умолчанию Поиск в файлах

Есть вот такой вот код, написанный для поиска строки в файлах:
Код:
for z:=0 to ListBox1.Items.Count-1 do begin
  Memo9.Lines.LoadFromFile(extractfilepath(Label1.Caption)+'cl_dll\'+AnsiReplaceText(ListBox1.Items[z], '"', ''));
  if pos(Edit1.Text,SynMemo1.Lines.Text) <> 0 then begin
     Memo8.Lines.Add(ListBox1.Items[z]);
  end;
  end;

B ListBox хранятся имена файлов, они заключены в кавычки.
Проблема в том, что в Memo8 прописываются все файлы, а не только те, в которых были найдены совпадения. В чем дело?
Ответить с цитированием