I used the example for TFindFile, to find all files with "1" in the name.
Criteria.Files.FileName := '*1*';
or '*1.*', '*1', ...
The Result contains also Files without a "1" in the name.
I found this Problem only with the 1.
*3* for example works fine (if you are looking for Files with a 3 in the name

Any idea?