[XE7] FMX.ListView.TListView - Stolperfalle mit der Suchbox

[Sir Rufo]

Bevor der nächste da auch wieder drauf reinfällt:

Sobald man mit der Suchbox FMX.ListView.TListView.SearchVisible etwas gesucht hat und den Suchbegriff aus der Suchbox entfernt hat, werden neu hinzugefügte Einträge nicht in der ListView angezeigt.

Zunächst muss man den FMX.ListView.TListViewItems.Filter auf nil setzen und dann funktioniert auch wieder das Anfügen von Items wie gewohnt (und erwartet).

Delphi-Quellcode:

procedure AddItemToListView( AItems : TListViewItems );
var
  LFilter: TListViewItems.TFilterPredicate;
  LItem : TListViewItem;
begin
  // Filter sichern
  LFilter := AItems.Filter;
  AItems.BeginUpdate;
  try
    // Filter entfernen
    AItems.Filter := nil;
    
    // Eintrag hinzufügen
    LItem := AItems.Add;
    LItem.Text := 'Neuer Eintrag';

  finally
    AItems.EndUpdate;
    // Filter zurückschreiben
    AItems.Filter := LFilter;
  end;
end;