Strings & PChars

HELP!

Does anyone have a clue why this will not work?  This procedure (unchanged) works perfectly in Delphi 1.0.
In Delphi 2.0, however, I keep getting a compiler error stating 'Strings & Pchars are incompatible.'
Any help would be appreciated.  You can E-mail me back at:  E...@DarkElf.reno.nv.us
Thanks....

procedure TMain.DeleteFiles(FN:string;DrName:string);
var
  y:integer;
  SearchRec:TSearchRec;
  Result: Boolean;
begin
  y := FindFirst(FN, faAnyFile, SearchRec);
  DeleteFile(DrName+SearchRec.Name);
  while y <> -18 do
    begin
      y := FindNext(SearchRec);
      DrName := DrName + SearchRec.Name;
      {DeleteFile(DrName);}
    end;
end;