ja, die Schleife wurde entfernt. Das Wort ist in der Liste, die zweite Anweisung genommen und der Button wurde auch gedrückt. Und dennoch nichts.Schicke es lieber nochmal:
Delphi-Quellcode:
procedure TForm1.Button9SucheClick(Sender: TObject);
begin
if ListBoxText.Items.IndexOf(Edit9Suche.Text) > -1 then
ListBoxText.ItemIndex := ListBoxText.Items.IndexOf(Edit9Suche.Text);
end;
mmhh?