返回传递给 Win32 API 的回调函数指针.
DllCallbackGetPtr ( 句柄 )
句柄 | DllCallback 句柄, 由先前调用 DllCallbackRegister 返回. |
成功: | 返回回调函数的指针. |
失败: | 返回 0. |
; 创建回调函数
Local $handle
= DllCallbackRegister("_EnumWindowsProc", "int", "hwnd;lparam")
; 调用 EnumWindows(枚举窗口)函数
DllCall("user32.dll", "int", "EnumWindows", "ptr", DllCallbackGetPtr($handle), "lparam", 10)
; 删除回调函数
DllCallbackFree($handle)
; 回调程序
Func _EnumWindowsProc($hWnd, $lParam)
If
WinGetTitle($hWnd)
<> ""
And BitAND(WinGetState($hWnd), 2) Then
Local $res = MsgBox(1,
WinGetTitle($hWnd), "句柄=" & $hWnd & @CRLF & "lParam=" & $lParam & @CRLF & "句柄(类型)=" & VarGetType($hWnd))
If $res = 2 Then Return 0 ; "取消" 按钮被点击, 返回 0 并停止枚举
EndIf
Return 1 ; 返回
1 继续枚举
EndFunc ;==>_EnumWindowsProc
provider with jb51.net (unicode) |