Markierte ListBox-Einträge entfernen

[Aike]

Falls MultiSelect an ist (ungetestet):

Delphi-Quellcode:

i:=Listbox.Count-1;
for i downto 0 do
begin
  Listbox.Items.Delete(i);
end;