读书人

怎么在隐藏窗体时同时隐藏托盘图标

发布时间: 2012-03-28 15:40:03 作者: rapoo

如何在隐藏窗体时同时隐藏托盘图标
我希望用热键实现窗体隐藏时托盘图标也自动隐藏,这该怎么实现呀??请指教~
最好把源码也给我,谢谢了~~

[解决办法]
[code=VB][/code]
'声明一个函数如下:
Private Sub traydelbal(ByVal MyForm As Form)

With ni
.cbSize = Len(ni)
.hWnd = MyForm.hWnd

End With
Shell_NotifyIcon NIM_DELETE, ni
End Sub
'再在热键隐藏处调用它。
'比如:
If a Then '如果窗体是可见状态那么
Form1.Hide '如果是你设置的快捷键且窗体当前可见 就隐藏窗体
traydelbal Form1
a = False '用于重新显示

读书人网 >VB

热点推荐