Check if user is on desktop

[GordonNT]

Hi !

I would like to know when the user is switching on desktop, this is actually what I have :

#include <Array.au3>

$title = WinGetTitle("[active]")

Func onAppSwitch( $t )
    If $t == "" Then
        MsgBox($MB_SYSTEMMODAL, $title, "You are on desktop")
    EndIf
EndFunc

While 1
    Sleep( 250 )
    local $pTitle = WinGetTitle("[active]")
    If Not ( $pTitle == $title ) Then
        $title = $pTitle
        onAppSwitch( $pTitle )
    EndIf
Wend

But the problem is that the desktop is not the only window that has " " as title. Should I do that with the handle ? Well I don't really have clue about that.

Thanks for the help !

[Nine]

Look at WinGetHandle and _WinAPI_GetDesktopWindow

[GordonNT]

Hi, thanks for your help @Nine

This is what I have now, thanks to you

#include <MsgBoxConstants.au3>
#include <WinAPISysWin.au3>

While 1
    Sleep( 250 )
    local $pHandle = WinGetHandle( "[ACTIVE]" )
    local $dHandle = _WinAPI_GetDesktopWindow( )
    If ($dHandle == $pHandle) Then
        MsgBox($MB_SYSTEMMODAL, "h", "You are on desktop")
    EndIf
Wend

Unfortunatly, it doesn't work, I can't find out why, could you help me again ?

[BrewManNH]

The _WinAPI_GetDesktopWindow is returning the wrong handle, not sure what handle it's returning, but it's not the Desktop.

Try this, it works.

#include <MsgBoxConstants.au3>
#include <WinAPISysWin.au3>
Global $pHandle,$dHandle = WinGetHandle("Program Manager")

While 1
    Sleep(250)
    $pHandle = WinGetHandle("[ACTIVE]")
    If ($dHandle = $pHandle) Then
        MsgBox($MB_SYSTEMMODAL, "h", "You are on desktop")
    EndIf
WEnd

 

[Nine]

@GordonNT, I forgot that by default, the handle you get when all apps are minimized is the handle of explorer.exe (on win7 at least).  So the best way to ensure you got the right handle use this :

WinMinimizeAll ()
Sleep (500)
Global $pHandle,$dHandle = WinGetHandle("[ACTIVE]")

While 1
    Sleep(250)
    $pHandle = WinGetHandle("[ACTIVE]")
    If ($dHandle = $pHandle) Then
        MsgBox($MB_SYSTEMMODAL, "h", "You are on desktop")
    EndIf
WEnd

 

 

[BrewManNH]

Global $pHandle,$dHandle = WinGetHandle("[ACTIVE]")

That will only work if the desktop is the active window the first time this is ran, which is highly unlikely.

[GordonNT]

@BrewManNH Hi, thanks for your help

I tried you code but it doesn't work 😕  (i'm on win10, maybe it's different)

 

@Nine I tried your code as well but it always show me the msgbox even when I switch window 

[BrewManNH]

I'm on Windows 10 and it's working ok for me.  Try putting some consolewrites in there to see what handle you're getting.

#include <MsgBoxConstants.au3>
#include <WinAPISysWin.au3>
Global $pHandle, $dHandle = WinGetHandle("Program Manager")
ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $dHandle = ' & $dHandle & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
;~  shows the handle of the desktop
While 1
    Sleep(250)
    $pHandle = WinGetHandle("[ACTIVE]")
    ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $pHandle = ' & $pHandle & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
;~  shows the handle of the active window
    If ($dHandle = $pHandle) Then
        MsgBox($MB_SYSTEMMODAL, "h", "You are on desktop")
    EndIf
WEnd

You have to click on the desktop to get this to activate.

The title of the Program Manager (the desktop) might be different in other languages, you can use its class if the title doesn't work.

Edited April 5, 2019 by BrewManNH

[Nine]

Ok that is my best effort : 

expandcollapse popup

#include <MsgBoxConstants.au3>
#include <WinAPISysWin.au3>
#include <Process.au3>
#include <WinAPIProc.au3>
#include <Array.au3>


HotKeySet("{ESC}", "_Exit")
; HotKeySet("{F1}", "InitWindows")
Local $d1Handle = WinGetHandle ("Program Manager"),$pHandle
WinMinimizeAll ()
Local $d2Handle = WinGetHandle("[ACTIVE]")
InitWindows ()

While 1
    Sleep(1000)
    $pHandle = WinGetHandle("[ACTIVE]")
  If $d1Handle = $pHandle or $d2Handle = $pHandle Then
        If IsOnDesktop () then MsgBox($MB_SYSTEMMODAL, "h", "You are on desktop")
    EndIf
  ;ConsoleWrite (WinGetState ($d1Handle) & "/" & $d1Handle & "/" & $d2Handle & "/" & $pHandle & @CRLF)
WEnd

Func _Exit()
    Exit
EndFunc   ;==>_Exit

Func InitWindows ()
Global $aList = WinList ()

  _ArrayDelete ($aList,0)
  Redim $aList[ubound($aList)][3]
  For $i = 1 to UBound($aList)-1
    $aList[$i][2] = WinGetState ($aList[$i][1])
  Next

  _ArraySort ($aList, 0, 0, 0, 1)
  ;_ArrayDisplay ($aList)

EndFunc

Func IsOnDesktop ()
Local $aWin = WinList (), $iWin

  For $i = 1 to UBound($aWin)-1
    if $aWin[$i][0] = "" Then ContinueLoop
    $iWin = _ArrayBinarySearch ($aList,$aWin[$i][1],0,0,1)
    If @error Then
      If IsVisible ($aWin[$i][1]) then Return False
      ContinueLoop
    EndIf
    If $aWin[$i][1] = $d1Handle or $aWin[$i][1] = $d2Handle then ContinueLoop
    ; ConsoleWrite ($iWin & @CRLF)
    if $aList [$iWin][2] = WinGetState ($aWin[$i][1]) Then ContinueLoop
    if IsVisible ($aWin[$i][1]) then Return False
  Next
  Return True

EndFunc

Func IsVisible ($hWnd)
Local $iState = WinGetState ($hWnd)

  If not BitAnd($iState,$WIN_STATE_VISIBLE) then return False
  return not BitAnd($iState,$WIN_STATE_MINIMIZED)

EndFunc

Working great on Win7.  If there is any windows in front of desktop, it returns False.  You have to be perfectly clear above Desktop.

Edited April 5, 2019 by Nine

[GordonNT]

@BrewManNH You code work well but I prefer the Nine's one 'cause it doesn't need a click on the desktop, but thanks for your support !

 

@Nine Thanks a lot for your help, it works really fine, I just added something to your code because it didn't work very well, just a mouseClick with left button after the winMinimizeAll. I really appreciate your help and I'll try to understand the code

 

I've got my answer, thanks !

[BrewManNH]

On 4/5/2019 at 6:28 PM, GordonNT said:

@BrewManNH You code work well but I prefer the Nine's one 'cause it doesn't need a click on the desktop

 

On 4/5/2019 at 6:28 PM, GordonNT said:

I just added something to your code because it didn't work very well, just a mouseClick with left button after the winMinimizeAll.

How is that different than my code?