显示菜单时首先要调用SetForegroundWindow函数才行. Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long 这样就可以实现:“托盘点击后弹出菜单如何单击别处菜单消灭或者收起” 至于加图标,网上有很多这样的例子,找找吧。
1 使用SetForegroundWindow参数,如楼上朋友所说。该函数用来强行激活某个窗口使之成为前台窗口。其唯一的参数就是窗口句柄。这样就可以实现托盘点击后弹出菜单如何单击别处菜单消灭或者收起。 2 详细用法解说: SetForegroundWindow VB声明 Declare Function SetForegroundWindow Lib "user32" Alias "SetForegroundWindow" (ByVal hwnd As Long) As Long 说明 将窗口设为系统的前台窗口。这个函数可用于改变用户目前正在操作的应用程序 返回值 Long,非零表示成功,零表示失败。会设置GetLastError 参数表 参数 类型及说明 hwnd Long,带到前台的窗口 注解 不应随便使用它,因为一旦程序突然从后台进入前台,可能会使用户产生迷惑
[email protected]
多谢了。
[email protected]
我也要一份可以吗?
我想帮你测试一下你的控件,能不能发给我, E-mail:[email protected]
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
这样就可以实现:“托盘点击后弹出菜单如何单击别处菜单消灭或者收起”
至于加图标,网上有很多这样的例子,找找吧。
2 详细用法解说:
SetForegroundWindow VB声明
Declare Function SetForegroundWindow Lib "user32" Alias "SetForegroundWindow" (ByVal hwnd As Long) As Long
说明
将窗口设为系统的前台窗口。这个函数可用于改变用户目前正在操作的应用程序
返回值
Long,非零表示成功,零表示失败。会设置GetLastError
参数表
参数 类型及说明
hwnd Long,带到前台的窗口
注解
不应随便使用它,因为一旦程序突然从后台进入前台,可能会使用户产生迷惑