Вниз
Скачать: 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.015 c
1-96172
aamst
2003-09-16 13:16
2003.09.29
Запуск файла из проги


3-96055
АлеКс
2003-09-05 08:29
2003.09.29
Перенос данных


3-96098
Mikle
2003-09-09 16:13
2003.09.29
FastReport Invalid variant operation


3-96115
Russko
2003-09-09 09:35
2003.09.29
Фильтрация в TTable


3-96057
Karnegi.
2003-09-07 18:34
2003.09.29
Несохранение данных при выходе




   Наверх