🚀 go-pugleaf

Hi all,

I am trying to locate my windows temp directory and erase all its contents,
so I am using the following code to 1) locate the windows temp directory. 2)
erase all the directory contents.
The problem I am facing is that the temp directory contents never get
erased, although when I try to delete them manually they get deleted
normally! So can someone please tell me where is my mistake exactly


Thank you for your help and cooperation


void __fastcall TForm1::Button1Click(TObject *Sender)
{
   CHAR szPath[MAX_PATH];
   if(GetTempPath(MAX_PATH, szPath))
   {  EraseAllFolderContents(szPath, "*.*");
   }
}
//--------------------------------------------------------------------------
-
bool __fastcall TForm1::EraseAllFolderContents(const AnsiString &Folder,
const AnsiString &MaskToFind)
{ //erase all contents of the folder

        WIN32_FIND_DATA wfd;
        HANDLE hFind;
        String sFullPath, sFindFilter, sCurrentFolder;
        bool Result = true;

        sCurrentFolder = IncludeTrailingBackslash(Folder);
        sFindFilter = sCurrentFolder + "*.*";

        hFind = FindFirstFile(sFindFilter.c_str(), &wfd);
        if( hFind != INVALID_HANDLE_VALUE )
        {
            do
            {
                if( (_tcscmp(wfd.cFileName, _T(".")) == 0) ||
(_tcscmp(wfd.cFileName, _T("..")) == 0) )
                    continue;

                sFullPath = sCurrentFolder + String(wfd.cFileName);

                if(wfd.dwFileAttributes & FILE_ATTRIBUTE_READONLY)
                {
                    Result = SetFileAttributes(sFullPath.c_str(),
wfd.dwFileAttributes & ~FILE_ATTRIBUTE_READONLY);
                    if(!Result)
                        break;
                }

                if( wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
                {
                    Result = EraseAllFolderContents(sFullPath, MaskToFind);
                    if(Result)
                        Result = RemoveDirectory(sFullPath.c_str());
                }
                else
                {
                    if(MatchesMask(wfd.cFileName, MaskToFind))
                    {
                        Result = DeleteFile(sFullPath);
                    }
                }
            }
            while((Result) && (FindNextFile(hFind, &wfd)));
            FindClose(hFind);
        }

  return Result;
}
//--------------------------------------------------------------------------
--