Mit einer Inputbox in einer Listbox suchen

[spaceball]

Hallo
hat jemand ne ahnung wie ich mit einer input box in einer list box einträge suchen kann ???

[Matze]

Hi, herzlich willkommen!

Das hier ist ungetestet:

Delphi-Quellcode:

var
  Suchbegriff: string;
begin
  Suchwort InputBox('Suche ...', 'Gib einen Suchbegriff ein.', '');
  ListBox1.ItemIndex := ListBox1.Items.IndexOf(Suchbegriff);
end;

Es kommt natürlich auch drauf an, was du erreichen möchtest.

[spaceball]

ja so hatte ich das auch aber das gging irgendwie nicht.....
aber ich probiere das gleich mal aus..

[leddl]

Zitat von Matze:

Delphi-Quellcode:

var
  Suchbegriff: string;
begin
  Suchwort InputBox('Suche ...', 'Gib einen Suchbegriff ein.', '');
  ListBox1.ItemIndex := ListBox1.Items.IndexOf(Suchbegriff);
end;

Also soooo tut das garantiert nich
Aber ich denke, auch mit diesen - natürlich von Matze absichtlich für den Lerneffekt eingebauten - Fehlern dürfte das prinzip klar sein.
Und das muß es tun. Sollte es bei dir nicht funktionieren, hast du wahrscheinlich etwas eingegeben, das nicht in der ListBox war Im Übrigen ist IndexOf AFAIK CaseInsensitive.

//Edit1: Tags repariert
//Edit2: Posting sinnvoll gemacht

[spaceball]

[delphi]

var
Suchbegriff: string;
begin

Suchbegriff:=InputBox('Suche ', 'Gib einen Suchbegriff ein.', '');
ListBox1.ItemIndex := ListBox1.Items.IndexOf(Suchbegriff);
end;

[Matze]

Zitat von leddl:

Also soooo tut das garantiert nich
Aber ich denke, auch mit diesen - natürlich von Matze absichtlich für den Lerneffekt eingebauten - Fehlern dürfte das prinzip klar sein.

Ups, da hab ich wohl zu schlampig getippelt.
Nein, das war keine Absicht.

@spaceball: Jupp, so meinte ich es. Da müsste, bei 1:1 Übereinstimmung, das Item markiert werden, das den Suchbegriff enthält. Natürlich kannst du noch mit AnsiLowercase/AnsiUpperCase die Groß- und Kleinschreibung außer acht lassen.

NAchtrag:

Zitat von leddilein:

Im Übrigen ist IndexOf AFAIK CaseInsensitive.

Dann benötogst du AnsiLowerCase/AnsiUpperCase natürlich nicht.