If you click on thru on the FindAllFiles function, you will see it uses the tsearchrec method internally.
If you want to have a quick solution then copy the TFileSearcher.Search routine and modify it to your needs, e.g. assign the tsearchrec.size to the value part of the stringlist name / value pair...