troubleshooting Question

CHTML View : Add Favorites Menu

Avatar of cheapstr
cheapstr asked on
System Programming
5 Comments1 Solution488 ViewsLast Modified:
I am using the microsoft sample "mfcie" from the samples download at the msdn site to go by on this. When trying to fill the 'favorites' menu, I keep getting a debug assertation failure. I can get this funtion to work fine using a SDI app, but it crashes if I try to use it in a MDI app. I'm trying to make a MDI web browser (just for fun and to learn from) to have several browsers open in the same frame. Here is the code:

int CWebView::setup()
{
// set up Favorites menu
      TCHAR           sz[MAX_PATH];
      TCHAR           szPath[MAX_PATH];
      HKEY            hKey;
      DWORD           dwSize;
      CMenu*          pMenu;

      // first get rid of bogus submenu items.
      pMenu = GetMenu()->GetSubMenu(3);
      while(pMenu->DeleteMenu(0, MF_BYPOSITION));

      // find out from the registry where the favorites are located.
      if(RegOpenKey(HKEY_CURRENT_USER, _T("Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\User Shell Folders"), &hKey) != ERROR_SUCCESS)
      {
            TRACE0("Favorites folder not found\n");
            return 0;
      }
      dwSize = sizeof(sz);
      RegQueryValueEx(hKey, _T("Favorites"), NULL, NULL, (LPBYTE)sz, &dwSize);
      ExpandEnvironmentStrings(sz, szPath, MAX_PATH);
      RegCloseKey(hKey);

      BuildFavoritesMenu(szPath, 0, pMenu);
      return 0;
}
 int CWebView::BuildFavoritesMenu(LPCTSTR pszPath, int nStartPos, CMenu* pMenu)
{
      CString         strPath(pszPath);
      CString         strPath2;
      CString         str;
      WIN32_FIND_DATA wfd;
      HANDLE          h;
      int             nPos;
      int             nEndPos;
      int             nNewEndPos;
      int             nLastDir;
      TCHAR           buf[INTERNET_MAX_PATH_LENGTH];
      CStringArray    astrFavorites;
      CStringArray    astrDirs;
      CMenu*          pSubMenu;

      // make sure there's a trailing backslash
      if(strPath[strPath.GetLength() - 1] != _T('\\'))
            strPath += _T('\\');
      strPath2 = strPath;
      strPath += "*.*";

      // now scan the directory, first for .URL files and then for subdirectories
      // that may also contain .URL files
      h = FindFirstFile(strPath, &wfd);
      if(h != INVALID_HANDLE_VALUE)
      {
            nEndPos = nStartPos;
            do
            {
                  if((wfd.dwFileAttributes & (FILE_ATTRIBUTE_DIRECTORY|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM))==0)
                  {
                        str = wfd.cFileName;
                        if(str.Right(4) == _T(".url"))
                        {
                              // an .URL file is formatted just like an .INI file, so we can
                              // use GetPrivateProfileString() to get the information we want
                              ::GetPrivateProfileString(_T("InternetShortcut"), _T("URL"),
                                                                    _T(""), buf, INTERNET_MAX_PATH_LENGTH,
                                                                    strPath2 + str);
                              str = str.Left(str.GetLength() - 4);

                              // scan through the array and perform an insertion sort
                              // to make sure the menu ends up in alphabetic order
                              for(nPos = nStartPos ; nPos < nEndPos ; ++nPos)
                              {
                                    if(str.CompareNoCase(astrFavorites[nPos]) < 0)
                                          break;
                              }
                              astrFavorites.InsertAt(nPos, str);
                              m_astrFavoriteURLs.InsertAt(nPos, buf);
                              ++nEndPos;
                        }
                  }
            } while(FindNextFile(h, &wfd));
            FindClose(h);
            // Now add these items to the menu
            for(nPos = nStartPos ; nPos < nEndPos ; ++nPos)
            {
                  pMenu->AppendMenu(MF_STRING | MF_ENABLED, 0xe00 + nPos, astrFavorites[nPos]);
            }


            // now that we've got all the .URL files, check the subdirectories for more
            nLastDir = 0;
            h = FindFirstFile(strPath, &wfd);
            ASSERT(h != INVALID_HANDLE_VALUE);
            do
            {
                  if(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
                  {
                        // ignore the current and parent directory entries
                        if(lstrcmp(wfd.cFileName, _T(".")) == 0 || lstrcmp(wfd.cFileName, _T("..")) == 0)
                              continue;

                        for(nPos = 0 ; nPos < nLastDir ; ++nPos)
                        {
                              if(astrDirs[nPos].CompareNoCase(wfd.cFileName) > 0)
                                    break;
                        }
                        pSubMenu = new CMenu;
                        pSubMenu->CreatePopupMenu();

                        // call this function recursively.
                        nNewEndPos = BuildFavoritesMenu(strPath2 + wfd.cFileName, nEndPos, pSubMenu);
                        if(nNewEndPos != nEndPos)
                        {
                              // only intert a submenu if there are in fact .URL files in the subdirectory
                              nEndPos = nNewEndPos;
                              pMenu->InsertMenu(nPos, MF_BYPOSITION | MF_POPUP | MF_STRING, (UINT)pSubMenu->m_hMenu, wfd.cFileName);
                              pSubMenu->Detach();
                              astrDirs.InsertAt(nPos, wfd.cFileName);
                              ++nLastDir;
                        }
                        delete pSubMenu;
                  }
            } while(FindNextFile(h, &wfd));
            FindClose(h);
      }
      return nEndPos;
}
Does anyone know why this crashes when using in a MDI app and how can I get this to work?
Join the community to see this answer!
Join our exclusive community to see this answer & millions of others.
Unlock 1 Answer and 5 Comments.
Join the Community
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 5 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros