AdvBuildFileList findet keine Systemdateien?

[HeikoAdams]

Hallo,
ich versuche, den Inhalt des Ordners C:\Dokumente und Einstellungen\ich\Anwendungsdaten\Microsoft\Crypto mit Delphi zu sichern.
Um den Inhalt des Verzeichnisses zu bekommen, verwende ich

Delphi-Quellcode:

    if AdvBuildFileList(IncludeTrailingPathDelimiter(aDir) + '*.*',
      $00017FFF, aFileList, amSuperSetOf,
      [flFullNames, flRecursive]) then
    begin
      for nCount := aFileList.Count - 1 downto 0 do
        if Like(aFileList.Strings[nCount], '*\.')
          or Like(aFileList.Strings[nCount], '*\..') then
          aFileList.Delete(nCount);
    end;

    aFileList.Sort;

Jedoch liefert mir diese Routine nur den Unterordner RSA ohne die Dateien darin. Mache ich da was falsch oder schlägt da nen Bug in AdvBuildFileList zu?