🚀 go-pugleaf

"Dennis Jones" <nospam@nospam.com> wrote in message
news:443aac3c$1@newsgroups.borland.com...
>
> There's probably an easier way, but the first thing that comes to mind is
to
> enumerate the modules loaded by each process currently running on the
> system, looking for the one you're interested in.  If you don't find it,
it
> isn't loaded.

Here's a quick and dirty implementation:

bool IsDLLLoaded( const AnsiString &DLLName )
{
   bool bIsDLLLoaded = false;

   HANDLE hProcessSnapshot = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS,
0 );

   if ( INVALID_HANDLE_VALUE != hProcessSnapshot )
   {
      PROCESSENTRY32 ProcessEntry;
      ProcessEntry.dwSize = sizeof( ProcessEntry );

      for ( bool bProcessFound = Process32First( hProcessSnapshot,
&ProcessEntry );
            bProcessFound;
            bProcessFound = Process32Next( hProcessSnapshot,
&ProcessEntry ) )
      {
         HANDLE hModuleSnapshot = CreateToolhelp32Snapshot(
TH32CS_SNAPMODULE, ProcessEntry.th32ProcessID );

         if ( INVALID_HANDLE_VALUE != hModuleSnapshot )
         {
            MODULEENTRY32 ModuleEntry;
            ModuleEntry.dwSize = sizeof( ModuleEntry );

            for ( bool bModuleFound = Module32First( hModuleSnapshot,
&ModuleEntry );
                  bModuleFound;
                  bModuleFound = Module32Next( hModuleSnapshot,
&ModuleEntry ) )
            {
               if ( DLLName == ModuleEntry.szModule )
               {
                  bIsDLLLoaded = true;
                  break;
               }
            }
         }

         CloseHandle( hModuleSnapshot );

         if ( bIsDLLLoaded )
         {
            break;
         }
      }

      CloseHandle( hProcessSnapshot );
   }

   return bIsDLLLoaded;
}

- Dennis