Delphi - baugleich ListBox String-Suche für Listview

Question

ListBox haben eine sehr einfache Möglichkeit für einen String im Inneren zu suchen:

if ListBox1.Items.IndexOf('yourString') > -1 then 
begin 
    //arriba 
end; 

Gibt es ein Äquivalent Weg für eine string zu suchen, aber ListView mit?

Answer 1

Verwenden Sie FindCaption Methode von TListView.

Answer 2

Vielleicht ist das, was Sie für die Suche Swissdelphicenter eine schnelle Lösung Link to the article

Anruf FindCaption Methode zu haben scheint durch die String angegeben als Wert Parameter

markiert für eine Listenansicht Artikel suchen

ich bin kein Experte FMX aber kippe Sie verwenden:

FMX.ListView.TListViewBase.SearchVisible

um weitere Informationen zu verwenden, um dies Link

ein Suchfeld zeigt oben auf Ihrer Liste Ansicht, die den Inhalt der Liste filtern.

Answer 3

Try this:

procedure SarchLV(SearchStr: String); 
begin 

    SearchStr := LowerCase(SearchStr); 

    ListView1.Items.Filter := 
    Function(X: string): Boolean 
    Begin 
     Result:= (SearchStr = EmptyStr) Or LowerCase(X).Contains(SearchStr); 
    End; 

end; 

Answer 4

So Helfer erstellen. In Formulareinheit:

THelperListView = class helper for TListView 
public 
    function FindCaption(const aText: string): boolean; 
end; 

function THelperListView.FindCaption(const aText: string): boolean; 
var 
    i: Integer; 
begin 
    Result := false; 
    for i := 0 to Items.Count - 1 do 
    begin 
    Result := CompareText(Items[i].Text, aText) = 0; 
    if Result then 
     exit; 
    end; 
end;