Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.29;
Скачать: 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 вся ветка

Текущий архив: 2003.09.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.041 c
7-96469
RomanS
2003-07-17 08:42
2003.09.29
Как программно запретить запускаться Screen Saverу


8-96300
Still Swamp
2003-05-17 17:38
2003.09.29
Закончилось ли воспроизведени


3-96103
Burn
2003-09-09 00:56
2003.09.29
Локальные БД


3-96063
Step[B.M.]
2003-09-07 09:40
2003.09.29
Какие ограничения у нелицензированой IBPlus?


4-96499
Pauk
2003-07-28 19:48
2003.09.29
передача значения в чужой Edit