function  __findfil(f: string; var s: string): boolean;

   Finds files with wildcards in f; found file is returned in s.
   If you don't (re-)move s, then the same s is found everytime.