Главная страница
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.016 c
1-96175
Yuraz
2003-09-16 11:55
2003.09.29
мастера, посмотрите плз, компонент, компилирует, но не добавляет


7-96470
Eliminator
2003-07-14 18:09
2003.09.29
Частоты видео адаптера и видео памяти


3-96147
Agent_03
2003-09-08 11:59
2003.09.29
Как прописать в BDE Administrator путь к сетевой базе?


1-96287
denis24
2003-09-16 10:52
2003.09.29
Управляющие коды принтера


1-96235
Qwerr
2003-09-17 17:28
2003.09.29
Мышька !