🚀 go-pugleaf

Hi all,

I am trying to use the following code to erase all (Files and Folders) under
a specified folder (ex: C:\\MyFolder), although each time I try to run my
application the function start giving weird results, for example sometime it
erases all files under (ex: C:\\MyFolder) and leave all subfolders and files
inside the subfolders, and sometime it erases all files under (ex:
C:\\MyFolder) and files under subfolders and leave subfolders without
erasing them !!, so can someone help me please and tell me what I am doing
wrong here....

Thanks

Environment: BCB 5 Ent
Windows: XP

Function:
======

ex. for calling:       DeleteAllFilesFolders("C:\\MyFolder", "*.*");

void __fastcall TForm1::DeleteAllFilesFolders(AnsiString Folder, const
AnsiString &MaskToFind)
{
        WIN32_FIND_DATA wfd;
        HANDLE hFind;
        String sFullPath;
        String sFindFilter;
        DWORD dwAttributes = 0;

        sFindFilter = Folder;
        sFindFilter += "\\*.*";

        if ((hFind = FindFirstFile(sFindFilter.c_str(), &wfd)) ==
INVALID_HANDLE_VALUE)
        {  return;
        }

        do
        {
                if (_tcscmp(wfd.cFileName, _T(".")) == 0 ||
_tcscmp(wfd.cFileName, _T("..")) == 0)
                {
                   continue;
                }

                 sFullPath = szPath;
                 sFullPath += "\\";
                 sFullPath += wfd.cFileName;

                 dwAttributes = GetFileAttributes(sFullPath.c_str());
                 if (dwAttributes & FILE_ATTRIBUTE_READONLY)
                {
                      dwAttributes &= ~FILE_ATTRIBUTE_READONLY;
                      SetFileAttributes(sFullPath.c_str(), dwAttributes);
                }

                if (wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
               {
                       DeleteAllFilesFolders(sFullPath.c_str(), MaskToFind);
                       RemoveDirectory(sFullPath.c_str());
                }
                else
               {
                       if(MaskToFind == "*.*")
                       {
                                DeleteFile(sFullPath);
                       }
                       else
                       {
                             if(MatchesMask(wfd.cFileName, MaskToFind))
                            {
                                DeleteFile(sFullPath);
                            }
                       }
               }
        }
        while(FindNextFile(hFind, &wfd));
        FindClose(hFind);
}
//--------------------------------------------------------------------------
--