使用AutoIT在Windows系统托盘中输出程序

fsi0uk1n  于 2023-11-21  发布在  Windows
关注(0)|答案(1)|浏览(196)

有没有办法使用AutoIT来显示哪些程序当前正在运行或显示在Windows系统托盘中？
我已经咨询了一些人工智能工具，并在AutoIt文档中查找，但只能找到在托盘中运行自己程序的可能性

windows

1条答案

按热度按时间
polkgigr

polkgigr1#

试试这个吧https://www.autoitscript.com/forum/topic/103871-_systray-udf/
您的代码

  1. #NoTrayIcon
  2. #include <SysTrayUDF13.au3>
  3. #include <Process.au3>
  5. $count = _SysTrayIconCount()
  6. ConsoleWrite("Count visible tray:  " & $count & @CRLF)
  7. For $i = $count - 1 To 0 Step -1
  8.     $handle = _SysTrayIconHandle($i)
  9.     $visible = _SysTrayIconVisible($i)
  10.     $pid = WinGetProcess($handle)
  11.     $name = _ProcessGetName($pid)
  12.     $title = WinGetTitle($handle)
  13.     $tooltip = _SysTrayIconTooltip($i)
  14.     ConsoleWrite("index:  " & $i & @TAB & "visible:  " & $visible & @TAB & "handle:  " & $handle & @TAB & "pid:  " & _
  15.                     $pid & @TAB & "proc:  " & $name & @TAB & @TAB & "title:  " & $title & @TAB & @TAB & "tooltip:  " & $tooltip & @CRLF)
  16.     If $pid = -1 Then _SysTrayIconRemove($i)
  17. Next
  19. If _FindTrayToolbarWindow(2) <> -1 Then
  20.     ConsoleWrite("-====================-" & @CRLF)
  21.     $countwin7 = _SysTrayIconCount(2)
  22.     ConsoleWrite("Count overflow area:  " & $countwin7 & @CRLF)
  23.     For $i = $countwin7 - 1 To 0 Step -1
  24.         $handle = _SysTrayIconHandle($i, 2)
  25.         $visible = _SysTrayIconVisible($i, 2)
  26.         $pid = WinGetProcess($handle)
  27.         $name = _ProcessGetName($pid)
  28.         $title = WinGetTitle($handle)
  29.         $tooltip = _SysTrayIconTooltip($i, 2)
  30.         ConsoleWrite("index:  " & $i & @TAB & "visible:  " & $visible & @TAB & "handle:  " & $handle & @TAB & "pid:  " & _
  31.                         $pid & @TAB & "proc:  " & $name & @TAB & @TAB & "title:  " & $title & @TAB & @TAB & "tooltip:  " & $tooltip & @CRLF)
  32.         If $pid = -1 Then _SysTrayIconRemove($i, 2)
  33.     Next
  34. EndIf

字符串
UDF

  1. #include-once
  2. ; ----------------------------------------------------------------------------
  3. ;
  4. ; Author:         Tuape
  5. ; Modified:       Erik Pilsits
  6. ;
  7. ; Script Function:
  8. ;   Systray UDF - Functions for reading icon info from system tray / removing
  9. ;   any icon.
  10. ;
  11. ; Last Update: 5/13/2013
  12. ;
  13. ; ----------------------------------------------------------------------------
  15. ;===============================================================================
  16. ;
  17. ; Function Name:    _SysTrayIconCount($iWin = 1)
  18. ; Description:      Returns number of icons on systray
  19. ;                   Note: Hidden icons are also reported
  20. ; Parameter(s):     $iWin
  21. ;                   | 1         - ToolbarWindow32, Win2000+
  22. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  23. ;
  24. ; Requirement(s):
  25. ; Return Value(s):  On Success - Returns number of icons found
  26. ;                   On Failure - Returns -1
  27. ;
  28. ; Author(s):        Tuape, Erik Pilsits
  29. ;
  30. ;===============================================================================
  31. Func _SysTrayIconCount($iWin = 1)
  32.     Local Const $TB_BUTTONCOUNT = 1048
  33.     Local $hWnd = _FindTrayToolbarWindow($iWin)
  34.     If $hWnd = -1 Then Return -1
  35.     Local $count = DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $hWnd, "uint", $TB_BUTTONCOUNT, "wparam", 0, "lparam", 0)
  36.     If @error Then Return -1
  37.     Return $count[0]
  38. EndFunc   ;==>_SysTrayIconCount
  40. ;===============================================================================
  41. ;
  42. ; Function Name:    _SysTrayIconTitles($iWin = 1)
  43. ; Description:      Get list of all window titles that have systray icon
  44. ; Parameter(s):     $iWin
  45. ;                   | 1         - ToolbarWindow32, Win2000+
  46. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  47. ; Requirement(s):
  48. ; Return Value(s):  On Success - Returns an array with all window titles
  49. ;                   On Failure - Returns -1
  50. ;
  51. ; Author(s):        Tuape, Erik Pilsits
  52. ;
  53. ;===============================================================================
  54. Func _SysTrayIconTitles($iWin = 1)
  55.     Local $count = _SysTrayIconCount($iWin)
  56.     If $count <= 0 Then Return -1
  57.     Local $titles[$count]
  58.     ; Get icon owner window"s title
  59.     For $i = 0 To $count - 1
  60.         $titles[$i] = WinGetTitle(_SysTrayIconHandle($i, $iWin))
  61.     Next
  62.     Return $titles
  63. EndFunc   ;==>_SysTrayIconTitles
  65. ;===============================================================================
  66. ;
  67. ; Function Name:    _SysTrayIconPids($iWin = 1)
  68. ; Description:      Get list of all processes id's that have systray icon
  69. ; Parameter(s):     $iWin
  70. ;                   | 1         - ToolbarWindow32, Win2000+
  71. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  72. ; Requirement(s):
  73. ; Return Value(s):  On Success - Returns an array with all process id's
  74. ;                   On Failure - Returns -1
  75. ;
  76. ; Author(s):        Tuape, Erik Pilsits
  77. ;
  78. ;===============================================================================
  79. Func _SysTrayIconPids($iWin = 1)
  80.     Local $count = _SysTrayIconCount($iWin)
  81.     If $count <= 0 Then Return -1
  82.     Local $processes[$count]
  83.     For $i = 0 To $count - 1
  84.         $processes[$i] = WinGetProcess(_SysTrayIconHandle($i, $iWin))
  85.     Next
  86.     Return $processes
  87. EndFunc   ;==>_SysTrayIconPids
  89. ;===============================================================================
  90. ;
  91. ; Function Name:    _SysTrayIconProcesses($iWin = 1)
  92. ; Description:      Get list of all processes that have systray icon
  93. ; Parameter(s):     $iWin
  94. ;                   | 1         - ToolbarWindow32, Win2000+
  95. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  96. ; Requirement(s):
  97. ; Return Value(s):  On Success - Returns an array with all process names
  98. ;                   On Failure - Returns -1
  99. ;
  100. ; Author(s):        Tuape, Erik Pilsits
  101. ;
  102. ;===============================================================================
  103. Func _SysTrayIconProcesses($iWin = 1)
  104.     Local $pids = _SysTrayIconPids($iWin)
  105.     If Not IsArray($pids) Then Return -1
  106.     Local $processes[UBound($pids)]
  107.     ; List all processes
  108.     Local $list = ProcessList()
  109.     For $i = 0 To UBound($pids) - 1
  110.         For $j = 1 To $list[0][0]
  111.             If $pids[$i] = $list[$j][1] Then
  112.                 $processes[$i] = $list[$j][0]
  113.                 ExitLoop
  114.             EndIf
  115.         Next
  116.     Next
  117.     Return $processes
  118. EndFunc   ;==>_SysTrayIconProcesses
  120. ;===============================================================================
  121. ;
  122. ; Function Name:    _SysTrayIconIndex($test, $mode = 0, $iWin = 1)
  123. ; Description:      Get list of all processes id"s that have systray icon
  124. ; Parameter(s):     $test       - process name / window title text / process PID
  125. ;                   $mode
  126. ;                   | 0         - get index by process name (default)
  127. ;                   | 1         - get index by window title
  128. ;                   | 2         - get index by process PID
  129. ;                   $iWin
  130. ;                   | 1         - ToolbarWindow32, Win2000+
  131. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  132. ; Requirement(s):
  133. ; Return Value(s):  On Success - Returns index of found icon
  134. ;                   On Failure - Returns -1
  135. ;
  136. ; Author(s):        Tuape, Erik Pilsits
  137. ;
  138. ;===============================================================================
  139. Func _SysTrayIconIndex($test, $mode = 0, $iWin = 1)
  140.     Local $ret = -1, $compare = -1
  141.     If $mode < 0 Or $mode > 2 Or Not IsInt($mode) Then Return -1
  142.     Switch $mode
  143.         Case 0
  144.             $compare = _SysTrayIconProcesses($iWin)
  145.         Case 1
  146.             $compare = _SysTrayIconTitles($iWin)
  147.         Case 2
  148.             $compare = _SysTrayIconPids($iWin)
  149.     EndSwitch
  150.     If Not IsArray($compare) Then Return -1
  151.     For $i = 0 To UBound($compare) - 1
  152.         If $compare[$i] = $test Then
  153.             $ret = $i
  154.             ExitLoop
  155.         EndIf
  156.     Next
  157.     Return $ret
  158. EndFunc   ;==>_SysTrayIconIndex
  160. ; INTERNAL =====================================================================
  161. ;
  162. ; Function Name:    _SysTrayGetButtonInfo($iIndex, $iWin = 1, $iInfo = 0)
  163. ; Description:      Gets Tray Button Info
  164. ; Parameter(s):     $iIndex     - icon index (Note: starting from 0)
  165. ;                   $iWin
  166. ;                   | 1         - ToolbarWindow32, Win2000+
  167. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  168. ;                   $iInfo      - Info to return
  169. ;                   | 1         - TBBUTTON structure
  170. ;                   | 2         - TRAYDATA structure
  171. ;                   | 3         - tooltip
  172. ;                   | 4         - icon position
  173. ; Requirement(s):
  174. ; Return Value(s):  On Success - Returns requested info
  175. ;                   On Failure - Sets @error and returns -1
  176. ;                   | 1        - Failed to find tray window
  177. ;                   | 2        - Failed to get tray window PID
  178. ;                   | 3        - Failed to open process
  179. ;                   | 4        - Failed to allocate memory
  180. ;                   | 5        - Failed to get TBBUTTON info
  181. ;
  182. ; Author(s):        Erik Pilsits, Tuape
  183. ;
  184. ;===============================================================================
  185. Func _SysTrayGetButtonInfo($iIndex, $iWin = 1, $iInfo = 1)
  186.     Local Const $TB_GETBUTTON = 1047
  187. ;~  Local Const $TB_GETBUTTONTEXT = 1099
  188. ;~  Local Const $TB_GETBUTTONINFO = 1089
  189.     Local Const $TB_GETITEMRECT = 1053
  190.     Local Const $ACCESS = BitOR(0x0008, 0x0010, 0x0400) ; VM_OPERATION, VM_READ, QUERY_INFORMATION
  191.     Local $TBBUTTON
  192.     If @OSArch = "X86" Then
  193.         $TBBUTTON = DllStructCreate("int iBitmap;int idCommand;byte fsState;byte fsStyle;byte bReserved[2];dword dwData;int iString")
  194.     Else ; X64
  195.         $TBBUTTON = DllStructCreate("int iBitmap;int idCommand;byte fsState;byte fsStyle;byte bReserved[6];uint64 dwData;int64 iString")
  196.     EndIf
  197.     Local $TRAYDATA
  198.     If @OSArch = "X86" Then
  199.         $TRAYDATA = DllStructCreate("hwnd hwnd;uint uID;uint uCallbackMessage;dword Reserved[2];handle hIcon")
  200.     Else
  201.         $TRAYDATA = DllStructCreate("uint64 hwnd;uint uID;uint uCallbackMessage;dword Reserved[2];uint64 hIcon")
  202.     EndIf
  203.     Local $trayHwnd = _FindTrayToolbarWindow($iWin)
  204.     If $trayHwnd = -1 Then Return SetError(1, 0, -1)
  205.     Local $return, $err = 0
  206.     Local $ret = DllCall("user32.dll", "dword", "GetWindowThreadProcessId", "hwnd", $trayHwnd, "dword*", 0)
  207.     If @error Or Not $ret[2] Then SetError(2, 0, -1)
  208.     Local $pId = $ret[2]
  209.     Local $procHandle = DllCall("kernel32.dll", "handle", "OpenProcess", "dword", $ACCESS, "bool", False, "dword", $pId)
  210.     If @error Or Not $procHandle[0] Then Return SetError(3, 0, -1)
  211.     Local $lpData = DllCall("kernel32.dll", "ptr", "VirtualAllocEx", "handle", $procHandle[0], "ptr", 0, "ulong", DllStructGetSize($TBBUTTON), "dword", 0x1000, "dword", 0x04)
  212.     If Not @error And $lpData[0] Then
  213.         $ret = DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $trayHwnd, "uint", $TB_GETBUTTON, "wparam", $iIndex, "lparam", $lpData[0])
  214.         If Not @error And $ret[0] Then
  215.             DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", $procHandle[0], "ptr", $lpData[0], "struct*", $TBBUTTON, "ulong", DllStructGetSize($TBBUTTON), "ulong*", 0)
  216.             Switch $iInfo
  217.                 Case 2
  218.                     ; TRAYDATA structure
  219.                     DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", $procHandle[0], "ptr", DllStructGetData($TBBUTTON, 6), "struct*", $TRAYDATA, "ulong", DllStructGetSize($TRAYDATA), "ulong*", 0)
  220.                     $return = $TRAYDATA
  221.                 Case 3
  222.                     ; tooltip
  223.                     $return = ""
  224.                     If BitShift(DllStructGetData($TBBUTTON, 7), 16) <> 0 Then
  225.                         Local $intTip = DllStructCreate("wchar[1024]")
  226.                         ; we have a pointer to a string, otherwise it is an internal resource identifier
  227.                         DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", $procHandle[0], "ptr", DllStructGetData($TBBUTTON, 7), "struct*", $intTip, "ulong", DllStructGetSize($intTip), "ulong*", 0)
  228.                         $return = DllStructGetData($intTip, 1)
  229.                     ;else internal resource
  230.                     EndIf
  231.                 Case 4
  232.                     ; icon position
  233.                     If Not BitAND(DllStructGetData($TBBUTTON, 3), 8) Then ; 8 = TBSTATE_HIDDEN
  234.                         Local $pos[2], $RECT = DllStructCreate("int;int;int;int")
  235.                         DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $trayHwnd, "uint", $TB_GETITEMRECT, "wparam", $iIndex, "lparam", $lpData[0])
  236.                         DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", $procHandle[0], "ptr", $lpData[0], "struct*", $RECT, "ulong", DllStructGetSize($RECT), "ulong*", 0)
  237.                         $ret = DllCall("user32.dll", "int", "MapWindowPoints", "hwnd", $trayHwnd, "ptr", 0, "struct*", $RECT, "uint", 2)
  238.                         $pos[0] = DllStructGetData($RECT, 1)
  239.                         $pos[1] = DllStructGetData($RECT, 2)
  240.                         $return = $pos
  241.                     Else
  242.                         $return = -1
  243.                     EndIf
  244.                 Case Else
  245.                     ; TBBUTTON
  246.                     $return = $TBBUTTON
  247.             EndSwitch
  248.         Else
  249.             $err = 5
  250.         EndIf
  251.         DllCall("kernel32.dll", "bool", "VirtualFreeEx", "handle", $procHandle[0], "ptr", $lpData[0], "ulong", 0, "dword", 0x8000)
  252.     Else
  253.         $err = 4
  254.     EndIf
  255.     DllCall("kernel32.dll", "bool", "CloseHandle", "handle", $procHandle[0])
  256.     If $err Then
  257.         Return SetError($err, 0, -1)
  258.     Else
  259.         Return $return
  260.     EndIf
  261. EndFunc   ;==>_SysTrayGetButtonInfo
  263. ;===============================================================================
  264. ;
  265. ; Function Name:    _SysTrayIconHandle($iIndex, $iWin = 1)
  266. ; Description:      Gets hwnd of window associated with systray icon of given index
  267. ; Parameter(s):     $iIndex     - icon index (Note: starting from 0)
  268. ;                   $iWin
  269. ;                   | 1         - ToolbarWindow32, Win2000+
  270. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  271. ;
  272. ; Requirement(s):
  273. ; Return Value(s):  On Success - Returns hwnd of found icon
  274. ;                   On Failure - Sets @error and returns -1
  275. ;                   | See _SysTrayGetButtonInfo for @error returns
  276. ;
  277. ; Author(s):        Tuape, Erik Pilsits
  278. ;
  279. ;===============================================================================
  280. Func _SysTrayIconHandle($iIndex, $iWin = 1)
  281.     Local $TRAYDATA = _SysTrayGetButtonInfo($iIndex, $iWin, 2)
  282.     If @error Then
  283.         Return SetError(@error, 0, -1)
  284.     Else
  285.         Return Ptr(DllStructGetData($TRAYDATA, 1))
  286.     EndIf
  287. EndFunc   ;==>_SysTrayIconHandle
  289. ;===============================================================================
  290. ;
  291. ; Function Name:    _SysTrayIconTooltip($iIndex, $iWin = 1)
  292. ; Description:      Gets the tooltip text of systray icon of given index
  293. ; Parameter(s):     $iIndex     - icon index (Note: starting from 0)
  294. ;                   $iWin
  295. ;                   | 1         - ToolbarWindow32, Win2000+
  296. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  297. ;
  298. ; Requirement(s):
  299. ; Return Value(s):  On Success - Returns tooltip text of icon
  300. ;                   On Failure - Sets @error and returns -1
  301. ;                   | See _SysTrayGetButtonInfo for @error returns
  302. ;
  303. ; Author(s):        Tuape, Erik Pilsits
  304. ;
  305. ;===============================================================================
  306. Func _SysTrayIconTooltip($iIndex, $iWin = 1)
  307.     Local $ret = _SysTrayGetButtonInfo($iIndex, $iWin, 3)
  308.     If @error Then
  309.         Return SetError(@error, 0, -1)
  310.     Else
  311.         Return $ret
  312.     EndIf
  313. EndFunc   ;==>_SysTrayIconTooltip
  315. ;===============================================================================
  316. ;
  317. ; Function Name:    _SysTrayIconPos($iIndex, $iWin = 1)
  318. ; Description:      Gets x & y position of systray icon
  319. ; Parameter(s):     $iIndex     - icon index (Note: starting from 0)
  320. ;                   $iWin
  321. ;                   | 1         - ToolbarWindow32, Win2000+
  322. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  323. ;
  324. ; Requirement(s):
  325. ; Return Value(s):  On Success - Returns array, x [0] and y [1] position of icon
  326. ;                   On Failure - Sets @error and returns -1
  327. ;                   | -1       - Icon is hidden (Autohide on XP, etc)
  328. ;                   | See _SysTrayGetButtonInfo for additional @error returns
  329. ;
  330. ; Author(s):        Tuape, Erik Pilsits
  331. ;
  332. ;===============================================================================
  333. Func _SysTrayIconPos($iIndex, $iWin = 1)
  334.     Local $ret = _SysTrayGetButtonInfo($iIndex, $iWin, 4)
  335.     If @error Then
  336.         Return SetError(@error, 0, -1)
  337.     Else
  338.         If $ret = -1 Then
  339.             Return SetError(-1, 0, -1)
  340.         Else
  341.             Return $ret
  342.         EndIf
  343.     EndIf
  344. EndFunc   ;==>_SysTrayIconPos
  346. ;===============================================================================
  347. ;
  348. ; Function Name:    _SysTrayIconVisible($iIndex, $iWin = 1)
  349. ; Description:      Gets the visibility of a systray icon
  350. ; Parameter(s):     $iIndex     - icon index (Note: starting from 0)
  351. ;                   $iWin
  352. ;                   | 1         - ToolbarWindow32, Win2000+
  353. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  354. ;
  355. ; Requirement(s):
  356. ; Return Value(s):  On Success - Returns True (visible) or False (hidden)
  357. ;                   On Failure - Sets @error and returns -1
  358. ;                   | See _SysTrayGetButtonInfo for @error returns
  359. ;
  360. ; Author(s):        Tuape, Erik Pilsits
  361. ;
  362. ;===============================================================================
  363. Func _SysTrayIconVisible($iIndex, $iWin = 1)
  364.     Local $TBBUTTON = _SysTrayGetButtonInfo($iIndex, $iWin, 1)
  365.     If @error Then
  366.         Return SetError(@error, 0, -1)
  367.     Else
  368.         Return Not BitAND(DllStructGetData($TBBUTTON, 3), 8) ;TBSTATE_HIDDEN
  369.     EndIf
  370. EndFunc   ;==>_SysTrayIconVisible
  372. ;===============================================================================
  373. ;
  374. ; Function Name:    _SysTrayIconHide($index, $iFlag, $iWin = 1)
  375. ; Description:      Hides / unhides any icon on systray
  376. ;
  377. ; Parameter(s):     $index      - icon index. Can be queried with _SysTrayIconIndex()
  378. ;                   $iFlag      - hide (1) or show (0) icon
  379. ;                   $iWin
  380. ;                   | 1         - ToolbarWindow32, Win2000+
  381. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  382. ;
  383. ; Requirement(s):
  384. ; Return Value(s):  On Success - Returns 1 if operation was successfull or 0 if
  385. ;                   icon was already hidden/unhidden
  386. ;                   On Failure - Sets @error and returns -1
  387. ;                   | See _SysTrayGetButtonInfo for @error returns
  388. ;
  389. ; Author(s):        Tuape, Erik Pilsits
  390. ;
  391. ;===============================================================================
  392. Func _SysTrayIconHide($index, $iFlag, $iWin = 1)
  393. ;~     Local Const $TB_HIDEBUTTON = 0x0404 ; WM_USER + 4
  394.     Local $TBBUTTON = _SysTrayGetButtonInfo($index, $iWin, 1)
  395.     If @error Then Return SetError(@error, 0, -1)
  396.     Local $visible = Not BitAND(DllStructGetData($TBBUTTON, 3), 8) ;TBSTATE_HIDDEN
  397.     If ($iFlag And Not $visible) Or (Not $iFlag And $visible) Then
  398.         Return 0
  399.     Else
  400.         Local $TRAYDATA = _SysTrayGetButtonInfo($index, $iWin, 2)
  401.         If @error Then Return SetError(@error, 0, -1)
  402.         Local $NOTIFYICONDATA = DllStructCreate("dword cbSize;hwnd hWnd;uint uID;uint uFlags;uint uCallbackMessage;handle hIcon;wchar szTip[128];" _
  403.             & "dword dwState;dword dwStateMask;wchar szInfo[256];uint uVersion;wchar szInfoTitle[64];dword dwInfoFlags;" _
  404.             & "STRUCT;ulong;ushort;ushort;byte[8];ENDSTRUCT;handle hBalloonIcon")
  405.         DllStructSetData($NOTIFYICONDATA, 1, DllStructGetSize($NOTIFYICONDATA))
  406.         DllStructSetData($NOTIFYICONDATA, 2, Ptr(DllStructGetData($TRAYDATA, 1)))
  407.         DllStructSetData($NOTIFYICONDATA, 3, DllStructGetData($TRAYDATA, 2))
  408.         DllStructSetData($NOTIFYICONDATA, 4, 8) ; NIF_STATE
  409.         DllStructSetData($NOTIFYICONDATA, 8, $iFlag) ; dw_State, 0 or 1 = NIS_HIDDEN
  410.         DllStructSetData($NOTIFYICONDATA, 9, 1) ; dwStateMask
  411.         Local $ret = DllCall("shell32.dll", "bool", "Shell_NotifyIconW", "dword", 0x1, "struct*", $NOTIFYICONDATA) ; NIM_MODIFY
  412.         DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", WinGetHandle("[CLASS:Shell_TrayWnd]"), "uint", 0x001A, "wparam", 0, "lparam", 0) ; WM_SETTINGCHANGE
  413.         If IsArray($ret) And $ret[0] Then
  414.             Return 1
  415.         Else
  416.             Return 0
  417.         EndIf
  418. ;~      $ret = DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $trayHwnd, "uint", $TB_HIDEBUTTON, "wparam", DllStructGetData($TBBUTTON, 2), "lparam", $iHide)
  419. ;~      If @error Or Not $ret[0] Then
  420. ;~          $return = -1
  421. ;~      Else
  422. ;~          $return = $ret[0]
  423. ;~      EndIf
  424.     EndIf
  425. EndFunc   ;==>_SysTrayIconHide
  427. ;===============================================================================
  428. ;
  429. ; Function Name:    _SysTrayIconMove($curPos, $newPos, $iWin = 1)
  430. ; Description:      Moves systray icon
  431. ;
  432. ; Parameter(s):     $curPos     - icon's current index (0 based)
  433. ;                   $newPos     - icon's new position
  434. ;                                 ($curPos+1 = one step to right, $curPos-1 = one step to left)
  435. ;                   $iWin
  436. ;                   | 1         - ToolbarWindow32, Win2000+
  437. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  438. ;
  439. ; Requirement(s):   AutoIt3 Beta
  440. ; Return Value(s):  On Success - Returns 1 if operation was successfull, 0 if not
  441. ;                   On Failure - Sets @error and returns -1
  442. ;                   | 1        - Bad parameters
  443. ;                   | 2        - Failed to find tray window
  444. ;
  445. ; Author(s):        Tuape, Erik Pilsits
  446. ;
  447. ;===============================================================================
  448. Func _SysTrayIconMove($curPos, $newPos, $iWin = 1)
  449.     Local Const $TB_MOVEBUTTON = 0x0452 ; WM_USER + 82
  450.     Local $iconCount = _SysTrayIconCount($iWin)
  451.     If $curPos < 0 Or $newPos < 0 Or $curPos > $iconCount - 1 Or $newPos > $iconCount - 1 Or Not IsInt($curPos) Or Not IsInt($newPos) Then Return SetError(1, 0, -1)
  452.     Local $hWnd = _FindTrayToolbarWindow($iWin)
  453.     If $hWnd = -1 Then Return SetError(2, 0, -1)
  454.     Local $ret = DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $hWnd, "uint", $TB_MOVEBUTTON, "wparam", $curPos, "lparam", $newPos)
  455.     If @error Or Not $ret[0] Then
  456.         Return 0
  457.     Else
  458.         Return 1
  459.     EndIf
  460. EndFunc   ;==>_SysTrayIconMove
  462. ;===============================================================================
  463. ;
  464. ; Function Name:    _SysTrayIconRemove($index, $iWin = 1)
  465. ; Description:      Removes systray icon completely.
  466. ;
  467. ; Parameter(s):     $index      - Icon index (first icon is 0)
  468. ;                   $iWin
  469. ;                   | 1         - ToolbarWindow32, Win2000+
  470. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  471. ;
  472. ; Return Value(s):  On Success - Returns 1 if icon successfully removed, 0 if not
  473. ;                   On Failure - Sets @error and returns -1
  474. ;                   | See _SysTrayGetButtonInfo for @error returns
  475. ;
  476. ; Author(s):        Tuape, Erik Pilsits
  477. ;
  478. ;===============================================================================
  479. Func _SysTrayIconRemove($index, $iWin = 1)
  480.     Local Const $TB_DELETEBUTTON = 1046
  481.     Local $TRAYDATA = _SysTrayGetButtonInfo($index, $iWin, 2)
  482.     If @error Then Return SetError(@error, 0, -1)
  483.     Local $NOTIFYICONDATA = DllStructCreate("dword cbSize;hwnd hWnd;uint uID;uint uFlags;uint uCallbackMessage;handle hIcon;wchar szTip[128];" _
  484.         & "dword dwState;dword dwStateMask;wchar szInfo[256];uint uVersion;wchar szInfoTitle[64];dword dwInfoFlags;" _
  485.         & "STRUCT;ulong;ushort;ushort;byte[8];ENDSTRUCT;handle hBalloonIcon")
  486.     DllStructSetData($NOTIFYICONDATA, 1, DllStructGetSize($NOTIFYICONDATA))
  487.     DllStructSetData($NOTIFYICONDATA, 2, Ptr(DllStructGetData($TRAYDATA, 1)))
  488.     DllStructSetData($NOTIFYICONDATA, 3, DllStructGetData($TRAYDATA, 2))
  489.     Local $ret = DllCall("shell32.dll", "bool", "Shell_NotifyIconW", "dword", 0x2, "struct*", $NOTIFYICONDATA) ; NIM_DELETE
  490.     DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", WinGetHandle("[CLASS:Shell_TrayWnd]"), "uint", 0x001A, "wparam", 0, "lparam", 0) ; WM_SETTINGCHANGE
  491.     If IsArray($ret) And $ret[0] Then
  492.         Return 1
  493.     Else
  494.         Return 0
  495.     EndIf
  496. ;~  Local $hWnd = _FindTrayToolbarWindow($iWin)
  497. ;~  If $hwnd = -1 Then Return -1
  498. ;~  Local $ret = DllCall("user32.dll", "lresult", "SendMessageW", "hwnd", $hWnd, "uint", $TB_DELETEBUTTON, "wparam", $index, "lparam", 0)
  499. ;~  If @error Or Not $ret[0] Then Return -1
  500. ;~  Return $ret[0]
  501. EndFunc   ;==>_SysTrayIconRemove
  503. ;===============================================================================
  504. ;
  505. ; Function Name:    _FindTrayToolbarWindow($iWin = 1)
  506. ; Description:      Utility function for finding Toolbar window hwnd
  507. ; Parameter(s):     $iWin
  508. ;                   | 1         - ToolbarWindow32, Win2000+
  509. ;                   | 2         - NotifyIconOverflowWindow, Win7+
  510. ;
  511. ; Requirement(s):
  512. ; Return Value(s):  On Success - Returns Toolbar window hwnd
  513. ;                   On Failure - returns -1
  514. ;
  515. ; Author(s):        Tuape, Erik Pilsits
  516. ;
  517. ;===============================================================================
  518. Func _FindTrayToolbarWindow($iWin = 1)
  519.     Local $hwnd, $ret = -1
  520.     If $iWin = 1 Then
  521.         $hWnd = DllCall("user32.dll", "hwnd", "FindWindow", "str", "Shell_TrayWnd", "ptr", 0)
  522.         If @error Then Return -1
  523.         $hWnd = DllCall("user32.dll", "hwnd", "FindWindowEx", "hwnd", $hWnd[0], "hwnd", 0, "str", "TrayNotifyWnd", "ptr", 0)
  524.         If @error Then Return -1
  525.         If @OSVersion <> "WIN_2000" Then
  526.             $hWnd = DllCall("user32.dll", "hwnd", "FindWindowEx", "hwnd", $hWnd[0], "hwnd", 0, "str", "SysPager", "ptr", 0)
  527.             If @error Then Return -1
  528.         EndIf
  529.         $hWnd = DllCall("user32.dll", "hwnd", "FindWindowEx", "hwnd", $hWnd[0], "hwnd", 0, "str", "ToolbarWindow32", "ptr", 0)
  530.         If @error Then Return -1
  531.         $ret = $hwnd[0]
  532.     ElseIf $iWin = 2 Then
  533.         ; NotifyIconOverflowWindow for Windows 7
  534.         $hWnd = DllCall("user32.dll", "hwnd", "FindWindow", "str", "NotifyIconOverflowWindow", "ptr", 0)
  535.         If @error Then Return -1
  536.         $hWnd = DllCall("user32.dll", "hwnd", "FindWindowEx", "hwnd", $hWnd[0], "hwnd", 0, "str", "ToolbarWindow32", "ptr", 0)
  537.         If @error Then Return -1
  538.         $ret = $hwnd[0]
  539.     EndIf
  540.     Return $ret
  541. EndFunc   ;==>_FindTrayToolbarWindow

型

展开查看全部
赞(0）分享  回复(0）举报  2023-11-21
我来回答

相关问题

    查看更多

    热门标签

    更多
    JavaquerypythonNode开发语言requestUtil数据库Table后端算法LoggerMessageElementParser

    最新问答

    更多
    • 蜀ICP备13028337号-1 大数据知识库 https://www.saoniuhuo.com © All rights reserved
    • 本站内容来源互联网,如果侵犯您的权益请联系我们删除, 联系方式：448109455@qq.com