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

Checklistbox   Найти похожие ветки 

 
Ibn El Ivan   (2004-07-26 14:32) [0]

Подскажите пожалуйста для удаления из Checklistbox используется цикл:
for i:=0 to checklistbox.count-1 do
if checklistbox.checked[i] then checklistbox.items.delete(i);
При запуске проги и при попытке удаление нескольких отмеченных элементов появляется сообщение об ошибке: list index out of bounds


 
Subdigger ©   (2004-07-26 14:35) [1]

при удалении параметр  checklistbox.count становится на 1 меньше

правильно будет так
i:=0;
while i<checklistbox.count do
if checklistbox.checked[i] then checklistbox.items.delete(i)
else inc(i);


 
@Lex ©   (2004-07-26 14:35) [2]

i:=0;
while i < checklistbox.count do
 if checklistbox.checked[i] then checklistbox.items.delete(i)
 else Inc(i);


 
Ega23 ©   (2004-07-26 14:37) [3]

Естественно. Потому, что когда ты делаешь
checklistbox.items.delete(i)
твой checklistbox.count становится меньше на единицу.
Здесь тебе не for цикл нужен, а while


 
Андрей Л.   (2004-07-26 14:37) [4]

При удалениии элемента из списка, весь список перенумеровывается, и от этого элементов ставновится меньше.


 
Ibn El Ivan   (2004-07-26 14:39) [5]

Спасибо!!


 
ssk ©   (2004-07-26 14:49) [6]

можно и for do, только цикл гнать с конца:

for i:=MAXVALUE downto 0 do
  ....


 
ssk ©   (2004-07-26 14:49) [7]

можно и for do, только цикл гнать с конца:

for i:=MAXVALUE downto 0 do
  ....



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

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



Память: 0.46 MB
Время: 0.022 c
6-1086534680
lena19
2004-06-06 19:11
2004.08.08
на что открыт доступ на текущем компе (где прога запущена)


1-1090216972
Michael
2004-07-19 10:02
2004.08.08
Отследить вращение колесика мыши в мышки вне приложения


6-1086193906
neteditor
2004-06-02 20:31
2004.08.08
TThread.Suspend и TWinSocketStream.TimeOut


1-1090763487
Никсон
2004-07-25 17:51
2004.08.08
Из строки с пробелами (tab или Space*X) в массив.


6-1086550906
lena19
2004-06-06 23:41
2004.08.08
проверка прав доступа (NetShareEnum)




   Наверх