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

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

← →
John   (2005-03-09 10:07) [0]

Подскажите кто-нибудь!
Как в ListBox программно выделить нужный пункт для удаления?

---

← →
Yanis ©   (2005-03-09 10:44) [1]

ListBox1.Itemindex := 1

---

← →
Drakosha   (2005-03-09 11:14) [2]

хм ...
а зачем выделять? мона ж и так удалить не выделяя

---

← →
markers ©   (2005-03-09 11:18) [3]

Да вот так:
ListBox1.Items.Delete(x);
Если удаляешь в цикле то лучше построить так:
for i:=ListBox.Items.Count DownTo 0 do
begin
..
end;

---

← →
John   (2005-03-09 12:33) [4]

Спосибо Yanis, но в моём случае лучше..ListBox1.ItemIndex:=0;
Выделяется первый пункт.
Вопрос markers..у а как остановить этот цикл?

---

← →
markers ©   (2005-03-09 12:34) [5]

Break;

---

← →
markers ©   (2005-03-09 12:36) [6]

for i:=ListBox.Items.Count DownTo 0 do
begin
if ListBox.Items.Strings[i] = "xxx" Then
 begin
   ListBox.Items.Delete[i];
   Break;
 end;
end;

---

← →
markers ©   (2005-03-09 12:36) [7]

ошибся
for i:=ListBox.Items.Count DownTo 0 do
на
for i:=ListBox.Items.Count-1 DownTo 0 do
Иначе будет ошибка

---

← →
MU ©   (2005-03-09 13:02) [8]

idx := ListBox1.Items.IndexOf("xxx");
 if (idx >= 0) then
   ListBox1.Items.Delete(Idx);

---

← →
markers ©   (2005-03-09 13:03) [9]

to MU
Так даже лучше;)

---

← →
John   (2005-03-09 18:33) [10]

Я сделал так:
for i:=ListBox1.Items.Count-1 DownTo 0 do
begin
DeleteFile(pchar(listbox1.Items[listbox1.itemindex]));
ListBox1.Items.Delete(ListBox1.ItemIndex);
ListBox1.ItemIndex:=0;

---

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

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



Память: 0.47 MB
Время: 0.031 c