Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
bulldog
4 / 4 / 1
Регистрация: 09.05.2010
Сообщений: 15
1

ПОиск через стринглист

10.05.2011, 17:00. Просмотров 398. Ответов 0
Метки нет (Все метки)

Столкнулся с ситлуацией оптимизации, и вместо того что бы создавать громоздкий код, засунул всё в стринглист, работает на ура, но цыкл уходит в бесконечность(даль прога не пашит), в чём может быть трабл
Код
var  i, j, j1: integer;
p:TStringList;
begin
p := TStringList.Create;
///лишние добавления убраны
p.Add('букашка');
begin
for j:= Listview1.Items[0].SubItems.Count-1 downto 0 do
for j1:= 0 to p.Count - 1 do
if pos(p[j1], ListView1.Items[0].SubItems.Strings[j]) > 0 then
begin
//что-то делаем
end;
end;
end;
мож я что напутал с циклом
Код
for j1:= 0 to p.Count - 1 do
Просто подобная ситлуация была с циклом в listview, да и трасировку из-за сладого железа сделать не могу
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.05.2011, 17:00
Ответы с готовыми решениями:

Данные в стринглист
Здравствуйте! Генерирую список чисел отдельной программой и потом загружаю в...

Как загрузить файл в стринглист с сервера
Здравствуйте. Мне уже подсказывали на форуме как это сделать, но я так и не...

Поиск через FindDialog
Нужно организовать поиск нужной строки в ComboBox с помощью компонента...

Поиск через adoquery
Всем привет! Не могу разобраться с проблемой: with ADOQuery1 do begin...

Поиск через FindDialog
Здравствуйте! У меня есть компонент Memo и Find в созданном главном меню. К...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.05.2011, 17:00

Поиск на сайте через делфи
Как реализовать это? Чтобы получить курс валюты. Хотя бы текстом виде

Поиск в StringGrid через edit
Всем доброго времени суток. У меня возникли сложности с заданием в колледже. У...

Поиск в ListBox через Edit
Данный код находит совпадения, но он выводит сообщение Нет совпадений Я так...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru