🚀 go-pugleaf

> What exactly are you using AttachThreadInput() for?  Perhaps there is an
> alternative approach.

I have an OOP COM server that is basically a 'client' for logging in/out of 
a propriearty system.  Calling the OOP 'Login' method calls 
ForceForegroundWindow() to ensure that the modal login form becomes the 
foreground, focused form.  Upon completion, the previous forground window is 
restored to the foreground with the same method.

I'm using code found frequently on these groups (slightly modified) to force 
a window to the foreground.  Currently I am using the following code:

bool __fastcall ForceForegroundWindow(HWND hwnd)
{
  bool Result;

  DWORD nullvalue = 0;

  DWORD ForegroundThreadID;
  DWORD ThisThreadID;
  DWORD timeout;

  if(IsIconic(hwnd))
    ShowWindow(hwnd, SW_RESTORE);

  HWND hForeWnd = GetForegroundWindow();

  if(hForeWnd == hwnd)
    return true;
  else
  {
 // Windows 98/2000 doesn't want to foreground a window when some other
 // window has keyboard focus
 if( ((Win32Platform == VER_PLATFORM_WIN32_NT) && (Win32MajorVersion > 4))
   || ((Win32Platform == VER_PLATFORM_WIN32_WINDOWS)
   && ((Win32MajorVersion > 4) || ((Win32MajorVersion == 4) &&
   (Win32MinorVersion > 0)))) )
 {
   // Code from Karl E. Peterson, www.mvps.org/vb/sample.htm
   // Converted to Delphi by Ray Lischner
   // Published in The Delphi Magazine 55, page 16

   Result = false;
   ForegroundThreadID = GetWindowThreadProcessId(hForeWnd, NULL);
   ThisThreadID = GetWindowThreadProcessId(hwnd,NULL);

   if(ThisThreadID != ForegroundThreadID && GetThreadDesktop(ThisThreadID) 
!= GetThreadDesktop(ForegroundThreadID))
   {
     if(AttachThreadInput(ThisThreadID, ForegroundThreadID, true) )
    {
      BringWindowToTop(hwnd); // IE 5.5 related hack
      SetForegroundWindow(hwnd);
      AttachThreadInput(ThisThreadID, ForegroundThreadID, false);
      Result = (GetForegroundWindow() == hwnd);
    }
   }
   if(!Result)
   {
  // Code by Daniel P. Stasinski
  SystemParametersInfo(SPI_GETFOREGROUNDLOCKTIMEOUT, 0, &timeout, 0);
  SystemParametersInfo(SPI_SETFOREGROUNDLOCKTIMEOUT, 0, &nullvalue, 
SPIF_SENDCHANGE);
  BringWindowToTop(hwnd); // IE 5.5 related hack
  SetForegroundWindow(hwnd);
  SystemParametersInfo(SPI_SETFOREGROUNDLOCKTIMEOUT, 0, &timeout, 
SPIF_SENDCHANGE);
   }
 }
 else
 {
   BringWindowToTop(hwnd); // IE 5.5 related hack
   SetForegroundWindow(hwnd);
 }
 Result = (GetForegroundWindow() == hwnd);
  }
  return Result;
}
//---------------------------------------------------------------------------