Delphi Mobile Listview Filter

Merhabalar,

Embarcadero sitesinde gezinirken bulduğum birşeyden bahsetmek istiyorum.
Bazılarınız fark etmiştir ki XE6 versiyonlarda TListview üzerinden search box olayları biraz sorunlu bunu kısmen XE7 sürümünde gidermişlerdi. Sitelerinde sanırım bu search box nesnesine bağımlı kalmamamız için ayarladıkları bir özelliği buldum.

ListView1.Items.Filter := function (S: string): Boolean
                          var I : Integer;
                          begin
                            I := PosEx('Sales',S);
                            Result := I <> 0;
                            end;

Şahsen daha kullanma şansı bulamadım kullananlar yorum olarak bildirebilirler.