Delete Multiple Selected Items in a TListBox Delphi Control

The TListBox Delphi control displays collection of strings in a scrollable list. By setting the MultiSelect property to true, the user can select more than one item at a time.

How to Remove Selected ListBox Items

To remove all the selected items from the list box you need to call the Delete method of the underlying TStrings object.

Since Delete changes the ordinal position of the remaining items in the list, when deleting items from the list using the for loop you need to start iterating from the end of he list. The Selected property tells you if an item at a particular index is selected.

Here's the code to delete multiple selected items in the list box:

 //make sure ListBox1.MultiSelect = true
 var
   ii : integer;
 begin
   with ListBox1 do
   begin
     for ii := -1 + Items.Count downto 0 do
     if Selected[ii] then Items.Delete(ii) ;
   end;
 end;
 

• tlistbox
• delphi vcl controls
• delphi with statement
• tstrings
• loops in delphi