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
Иначе будет ошибка

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

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;

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