Вниз
Скачать: CL | DM;

Удаление в ListView   Найти похожие ветки 

← →
Kolya   (2006-01-06 04:30) [0]

Привет! Я использую следующее:

for i:=1 to spPlayListListView1.Items.Count-1 do
begin
   if not FileExists(spPlayListListView1.Items[i].Caption) then
   spPlayListListView1.Items.Delete(i);

для удаления из списка несуществующих файлов. При нажатии удалить возникает ошибка Access violation. Как написать правильно? Может, дело в колонках (их у меня 3)?


← →
Almaz ©   (2006-01-06 06:14) [1]


> При нажатии удалить возникает ошибка Access violation. Как
> написать правильно? Может, дело в колонках (их у меня 3)?

Правильно, что возникает. Дело в том, что количество итераций цикла рассчитывается один раз - перед началом цикла. Теперь представте, что вы удалили несколько записей - тогда spPlayListListView1.Items.Count уменьшится, однако цикл повторится столько раз, сколько записей было на момент его начала - пройдясь по уже несуществующим записям. Отсюда и ошибка.
Решение ее предельно просто - сделать цикл не на возрастание, а на убывание, т.е.

for i:=spPlayListListView1.Items.Count-1 downto 0 do
begin
  if not FileExists(spPlayListListView1.Items[i].Caption) then
  spPlayListListView1.Items.Delete(i);


И еще, обратите внимание - индекс элементов начинается с нуля, а не 1.

Удачи.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.03 c
2-1136310684
Игорь новый
2006-01-03 20:51
2006.01.22
как начать изучать delphi.?


8-1123460022
Valera
2005-08-08 04:13
2006.01.22
Проиграть AudioCD с помощью DSPack


14-1135769635
Johnmen
2005-12-28 14:33
2006.01.22
Модераторам


2-1135652426
stef
2005-12-27 06:00
2006.01.22
Не правильно работает цикл for


2-1136134118
XporlnD
2006-01-01 19:48
2006.01.22
Установка компонента




   Наверх