Item aus einer Listbox entfernen per Text

[Robert_G]

TListBox.Items ist doch TStrings -> Also kannst du mit ...

Delphi-Quellcode:

with DeineListBox.Items do
  Delete(IndexOf('Hallo'));

.. das erste Item, dass den Text "Hallo" enthält, löschen.

Willst du alle löschen, muss das natürlich in einer Schleife passieren:

Delphi-Quellcode:

var
  Idx :Integer
begin
  DeineListBox.BeginUpdate();

  repeat 
    with DeineListBox.Items do
    begin
      Idx := IndexOf('Hallo');
      Delete(Idx);
    end;
  until Idx := -1;

  DeineListBox.EndUpdate();
end;

Nachtrag:
@Luckie
Eigentlich hast du Recht, der Hinweis auf TStrings.IndexOf hätte gereicht.