Форум: "Начинающим";
Текущий архив: 2006.04.16;
Скачать: [xml.tar.bz2];

Вниз

удаление из ListView   Найти похожие ветки 

← →
13   (2006-03-29 20:42) [0]

В ListView находится список файлов (свойство Checked=true) мне нужно удалить файлы выбранные галкой.
Вот код:
var
 i:integer;
begin
 for i:=0 to listView1.Items.Count-1 do
  if listView1.Items[i].checked then
   begin
    DeleteFile(ListView1.items[i].caption);
   end;
end;

у меня вопрос а как одновременно с удалением файла удалить его из listView.

---

← →
Rial ©   (2006-03-29 22:13) [1]



Var I,N:Integer;
begin
With ListView1 do begin
 N:=Items.Count;
 I:=0;
 While (I<=N-1)do begin
  If (Items[I].Checked)then begin
   DeleteFile(Items[I].Caption);
   Items.Delete(I);
   Dec(N);
  end else
   Inc(I);
 end;
end;
end;


---

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

Форум: "Начинающим";
Текущий архив: 2006.04.16;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.044 c