VirtualExplorerListview1EnumFolder

[GoogleCodeExporter]

I am trying to build a FileFilter by the

VirtualExplorerListviewEnumFolder
  (Sender: TCustomVirtualExplorerTree; Namespace: TNamespace;
  var AllowAsChild: Boolean);
var
 s:string;
begin
   s:='.mp3;.ac3';
   AllowAsChild := pos(namespace.Extension,WideString(s))>0;
end;

will working fine

but this will not working
   s:TStringList;
   s:= TStringList.create;
   s.add(.mp3);
   s.add(.ac3);

VirtualExplorerListviewEnumFolder
  (Sender: TCustomVirtualExplorerTree; Namespace: TNamespace;
  var AllowAsChild: Boolean);
var
 i: integer;
begin
   for i := 0 to s.count -1 do
     AllowAsChild :=namespace.Extension = s[i];
end;
 it will only filtering the first Entry not shure why

Original issue reported on code.google.com by chris.tr...@gmail.com on 7 Mar 2015 at 8:41