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

Почему не работает   Найти похожие ветки 

← →
P0tia ©   (2003-09-16 22:15) [0]

for i:=listBox1.Count-1 downto 0 do
for j:=listBox2.Count-1 downto 0 do
if listBox2.Items[j] = ListBox1.Items[i] then begin
Listbox2.ItemIndex := j;
listbox2.DeleteSelected;
end;


← →
P0tia ©   (2003-09-16 22:25) [1]

Я понил почему, Если последняя строка удаляется ему несчем сравнивать. Есть команды выхода из for.


← →
Palladin ©   (2003-09-16 22:25) [2]

1 как именно не работает?
2
ListBox2.ItemIndex=j;
ListBox2.DeleteSelected;
это как в магазин через огороды ездить
ListBox2.Items.Delete(j);


← →
Юрий Федоров ©   (2003-09-16 22:26) [3]

if listBox2.Items[j] = ListBox1.Items[i] then
listBox2.Items.Delete(j)


← →
HolaCost! ©   (2003-09-17 08:18) [4]

Проблема немного в другом!
Если удаляешь J елемент, то извините по этому индексу будет уже другой элемент... Тут Фор использовать противопаказано!


← →
BillyJeans ©   (2003-09-17 08:35) [5]

for i:=listBox1.Count-1 downto 0 do
for j:=listBox2.Count-1 downto 0 do
if listBox2.Items[j] = ListBox1.Items[i] then begin
Listbox2.Items.Delete(j);
Break;
end;


← →
Anatoly Podgoretsky ©   (2003-09-17 09:08) [6]

P0tia © (16.09.03 22:25) [1]
Если удаляется последнея строка, то цикл заканчивается или не выполняется.



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

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



Память: 0.46 MB
Время: 0.033 c
14-96394
wal
2003-09-11 15:57
2003.09.29
Все. Бросаем бросать. Прямо сейчас (15:16).Ни одного бросания


14-96439
SiJack
2003-09-04 14:25
2003.09.29
Ура мне купят лицензионный Delphi !!!


1-96169
big_bugzy
2003-09-16 12:17
2003.09.29
Как в WideString записать длинную строку (~4500 символов)?


4-96498
Yuri Btr
2003-07-28 21:10
2003.09.29
Смена принтера по умолчанию


1-96230
BillyJeans
2003-09-16 14:05
2003.09.29
Временные интервалы...




   Наверх