Mega Code Archive

 

Categories / Delphi / VCL

 

Listview den tüm seçilenlerin silinmesi

var i:integer; begin if listview1.Selected <> nil then //eğer seçilen item varsa begin for i := 0 to listview1.SelCount -1 do //seçilen item adedi kadar tekrar et listview1.Selected.Delete; //seçiliyi sil end; end;