DeleteFile() meldet Fehler

[Smiley]

Ich habe einen ganz einfachen Codeschnipsel benutzt und bekomme beim Compilieren einen Fehler "Inkompatible Typen: 'TFileName und PAnsiChar'" in der Zeile mit DeleteFile(SearchRec.Name);
Sieht so aus, als wollte er die Windowsfunktion benutzen anstatt der Delphifunktion.

Delphi-Quellcode:

procedure DeleteAll(Dir, Files : string);
var
  SearchRec : TSearchRec;
begin
  if FindFirst(Dir+Files, faAnyFile, SearchRec) = 0 then
    begin
      DeleteFile(SearchRec.Name);
      while FindNext(SearchRec) = 0 do
        DeleteFile(Dir + SearchRec.Name);
    end;
  FindClose(SearchRec);
end;

Beim FindClose kommt dann auch eine entsprechende Meldung.

Was mache ich hier falsch ????