如何获取系统托盘的工具提示ToolTip ？

nop

例如XP中鼠标放在托盘上的任务管理器上的时候显示“CPU 使用 x%”  ,放在喇叭上就显示“音量”，我需要获取指定进程的托盘提示信息。
使用SysTray_UDF.au3好像对中文支持不太好，经常只显示一部分（例如任务管理器只显示“CPU”，虚拟DAEMON管理器只显示“虚”）。
而GuiToolTip网上讲解的较少，我自己实验失败。


这里附上SysTray_UDF中所用函数的代码

1. 
   
2. Func _SysTrayIconTooltip($iIndex=0)
   
3. ;=========================================================
   
4. ;   Create the struct _TBBUTTON
   
5. ;   struct {
   
6. ;        int         iBitmap;
   
7. ;    int         idCommand;
   
8. ;    BYTE     fsState;
   
9. ;    BYTE     fsStyle;
   
10. ;       
    
11. ;        #ifdef _WIN64
    
12. ;    BYTE     bReserved[6]     // padding for alignment
    
13. ;        #elif defined(_WIN32)
    
14. ;    BYTE     bReserved[2]     // padding for alignment
    
15. ;        #endif
    
16. ;    DWORD_PTR   dwData;
    
17. ;    INT_PTR          iString;
    
18. 
    
19. ;   }
    
20. ;=========================================================
    
21. Local $str        = "int;int;byte;byte;byte[2];dword;int"
    
22. Dim $TBBUTTON   = DllStructCreate($str)
    
23. Dim $TBBUTTON2   = DllStructCreate($str)
    
24. Dim $ExtraData = DllStructCreate("dword[2]")
    
25. Dim $intTip = DllStructCreate("short[1024]")
    
26. 
    
27. 
    
28. Local $pId
    
29. Local $text
    
30. Local $procHandle
    
31. Local $index = $iIndex
    
32. Local $bytesRead
    
33. Local $info
    
34. Local $lpData
    
35. Local $trayHwnd
    
36. 
    
37. 
    
38. $trayHwnd = _FindTrayToolbarWindow()
    
39. If $trayHwnd = -1 Then
    
40.         $TBBUTTON = 0
    
41.         $TBBUTTON2 = 0
    
42.         $ExtraData = 0
    
43.         $intTip = 0
    
44.         ;SetError(1)
    
45.         Return -1
    
46. EndIf
    
47. 
    
48. Local $ret = DLLCall("user32.dll","int","GetWindowThreadProcessId", "hwnd", $trayHwnd, "int*", -1)
    
49. If Not @error Then
    
50.                 $pId = $ret[2]
    
51. Else
    
52.         ConsoleWrite("Error: Could not find toolbar process id, " & @error & @LF)
    
53.         $TBBUTTON = 0
    
54.         $TBBUTTON2 = 0
    
55.         $ExtraData = 0
    
56.         $intTip = 0
    
57.         Return -1
    
58. EndIf
    
59. $procHandle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', $PROCESS_ALL_ACCESS, 'int', False, 'int', $pId)
    
60. If @error Then
    
61.         ConsoleWrite("Error: Could not read toolbar process memory, " & @error & @LF)
    
62.         $TBBUTTON = 0
    
63.         $TBBUTTON2 = 0
    
64.         $ExtraData = 0
    
65.         $intTip = 0
    
66.         return -1
    
67. EndIf
    
68. 
    
69. $lpData = DLLCall("kernel32.dll","int","VirtualAllocEx", "int", $procHandle[0], "int", 0, "int", DllStructGetSize ( $TBBUTTON ), "int", 0x1000, "int", 0x04)
    
70. If @error Then
    
71.         ConsoleWrite("VirtualAllocEx Error" & @LF)
    
72.         $TBBUTTON = 0
    
73.         $TBBUTTON2 = 0
    
74.         $ExtraData = 0
    
75.         $intTip = 0
    
76.         Return -1
    
77. Else
    
78.         DLLCall("user32.dll","int","SendMessage", "hwnd", $trayHwnd, "int", $TB_GETBUTTON, "int", $index, "ptr",$lpData[0]);e(hwnd, TB_GETBUTTON, index, (LPARAM)lpData);
    
79.         DllCall('kernel32.dll', 'int', 'ReadProcessMemory', 'int', $procHandle[0], 'int', $lpData[0], 'ptr', DllStructGetPtr($TBBUTTON2), 'int', DllStructGetSize( $TBBUTTON), 'int', $bytesRead)
    
80.         DllCall('kernel32.dll', 'int', 'ReadProcessMemory', 'int', $procHandle[0], 'int', DllStructGetData($TBBUTTON2,7), 'int', DllStructGetPtr($intTip), 'int', DllStructGetSize( $intTip), 'int', 0);_MemRead($procHandle, $lpData[0], DllStructGetSize( $TBBUTTON))
    
81. 
    
82.         ; go through every character
    
83.         $i = 1
    
84.         While $i < 1024
    
85.                 $tipChar = ""
    
86.        
    
87. #cs       
    
88.                 BOOL ReadProcessMemory(
    
89.   HANDLE hProcess,
    
90.   LPCVOID lpBaseAddress,
    
91.   LPVOID lpBuffer,
    
92.   SIZE_T nSize,
    
93.   SIZE_T* lpNumberOfBytesRead
    
94. );
    
95. #ce
    
96. 
    
97.                
    
98.                 $tipChar = Chr(DllStructGetData($intTip,1,$i))
    
99. 
    
100.                 If $tipChar = "" Then
     
101.                         ExitLoop
     
102.                 EndIf
     
103.                 ;ConsoleWrite(@CRLF & $i & " Char: " & $tipChar & @LF)
     
104.                 $info =  $info & $tipChar
     
105. 
     
106.                 $i = $i + 1
     
107.         Wend
     
108.        
     
109.         If $info = "" Then
     
110.                 $info = "No tooltip text"
     
111.         EndIf
     
112.        
     
113.         DLLCall("kernel32.dll","int","VirtualFreeEx", "int", $procHandle[0], "ptr", $lpData[0], "int", 0, "int", 0x8000) ;DllStructGetSize ( $TBBUTTON ), "int", 0x8000))
     
114. EndIf
     
115. 
     
116. DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $procHandle[0])       
     
117. $TBBUTTON = 0
     
118. $TBBUTTON2 = 0
     
119. $ExtraData = 0
     
120. $intTip = 0
     
121. $lpData = 0
     
122. return $info
     
123. EndFunc
     

复制代码