Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.16;
Скачать: CL | DM;

Вниз

удаление из 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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.048 c
2-1144052417
Sania
2006-04-03 12:20
2006.04.16
Вопрос по screenshot ам


15-1143186047
оЛиневод
2006-03-24 10:40
2006.04.16
Как хранится файл на диске


4-1138778434
Davinchi9
2006-02-01 10:20
2006.04.16
Как изменить положение ProgressBar в загрузчике ядра WinXP


15-1143442491
Gleb
2006-03-27 10:54
2006.04.16
Где можно скачать новые компоненты для Delphi 7


2-1143823246
ded22
2006-03-31 20:40
2006.04.16
Edit и Таблица