/contextmenu.ahk

http://7plus.googlecode.com/ · AutoHotKey · 33 lines · 19 code · 1 blank · 13 comment · 4 complexity · 7d1188d599f5de551b720a3f26caebac MD5 · raw file 

    

  1. ;Checks if a context menu is active and has focus

    2. 

  2. ;Need to check if other context menus are active (trillian, browsers,...)

    3. 

  3. IsContextMenuActive() 

    4. 

  4. { 

    5. 

  5. 	GuiThreadInfoSize := 24 + 6 * A_PtrSize 

    6. 

  6. 	VarSetCapacity(GuiThreadInfo, GuiThreadInfoSize) 

    7. 

  7. 	NumPut(GuiThreadInfoSize, GuiThreadInfo, 0) 

    8. 

  8. 	if not DllCall("GetGUIThreadInfo", uint, 0, "Ptr", &GuiThreadInfo) 

    9. 

  9. 	{ 

    10. 

  10. 	  ;MsgBox GetGUIThreadInfo() indicated a failure. 

    11. 

  11. 	  return 

    12. 

  12. 	} 

    13. 

  13. 	; GuiThreadInfo contains a DWORD flags at byte 4 

    14. 

  14. 	; Bit 4 of this flag is set if the thread is in menu mode. GUI_INMENUMODE = 0x4 

    15. 

  15. 	if (NumGet(GuiThreadInfo, 4) & 0x4) 

    16. 

  16. 		return true

    17. 

  17. 	return false

    18. 

  18. }

    19. 

  19. 

    20. 

  20. ;This stuff doesn't properly use COM.ahk yet :(

    21. 

  21. /*

    22. 

  22. Executes context menu entries of shell items without showing their menus

    23. 

  23. Usage:

    24. 

  24. ShellContextMenu("Desktop",1)			;Calls "Next Desktop background" in Win7

    25. 

  25. 1st parameter can be "Desktop" for empty selection desktop menu, a path, or an idl

    26. 

  26. Leave 2nd parameter empty to show context menu and extract idn by clicking on an entry (shows up in debugview)

    27. 

  27. */ 

    28. 

  28. ShellContextMenu(sPath,idn=0) 

    29. 

  29. { 

    30. 

  30. 	result := DllCall(Settings.DllPath "\Explorer.dll\ExecuteContextMenuCommand", "Str", sPath, "Int", idn, "PTR", A_ScriptHwnd)

    31. 

  31. 	if(Errorlevel != 0)

    32. 

  32. 		Notify("Couldn't execute context menu command!", "Error Calling ExecuteContextMenuCommand() in Explorer.dll!", 5, NotifyIcons.Error)

    33. 

  33. }
    34.