南通市住房城乡建设局网站,政务公开网站项目建设书,极客联盟网站建设公司怎么样,吃什么补肾效果最好“为应用程序在任务栏通知区域加个图标#xff0c;按最小化控制菜单后隐藏窗口#xff0c;单击通知区域内的图标恢复并显示窗口#xff0c;右击通知区域内的图标弹出快捷方式菜单”#xff0c;已成为时下程序设计上的一个时髦主题#xff0c;有不少文章介绍了如何实现按最小化控制菜单后隐藏窗口单击通知区域内的图标恢复并显示窗口右击通知区域内的图标弹出快捷方式菜单”已成为时下程序设计上的一个时髦主题有不少文章介绍了如何实现但在 PowerBuilder 下由于调用 Win32 API 函数和消息处理不很方便因而很少有人去涉及。本文将讨论如何在 PowerBuilder 下使用任务栏通知区域。 1.相关的 Win32 API 函数 Win32 API 函数 Shell_NotifyIconA 是本文所涉 Win32 API 函数中最为关键者通过它可以添删通知区域图标其 Powersoft 原型为 Function Boolean Shell_NotifyIconA(ULong dwMessage,stc_notifyicondata pnid) Library Shell32.dll 其中 stc_notifyicondata 是一个结构其成员有 Ulong cbSize // 结构大小为 88 字节 Ulong hWnd // 接受通知消息的窗口句柄 Ulong uID // 通知区域图标的标识号 Ulong uFlags // 指示哪些成员是有效的 Ulong uCallbackMessage // 通知消息的标识号 Ulong hIcon // 图标的句柄 Char szTip[64] // 图标提示 Ulong dwState // 图标状态 (IE5) Ulong dwStateMask // 状态掩码 (IE5) Char szInfo[256] // balloon tooltip (IE5) Ulong uTimeout // balloon tooltip 显示时间 (IE5) Char szInfoTitle[64] // balloon tooltip 标题 (IE5) Ulong dwInfoFlags // balloon tooltip 标志 (IE5) uFlags 可以是 NIF_MESSAGE(1)、NIF_ICON(2)、NIF_TIP(4)、NIF_STATE(8) 和 NIF_INFO(16) 的组合。如 uFlags 7 表示结构的 uCallbackMessage、hIcon 和 szTip 是有效的其他的一些成员的值将被忽略。 由于此处涉及回调消息和图标所以要用到另三个 Win32 API 函数他们的 Powersoft 原型为 Function UINT RegisterWindowMessageA(String lpString) Library User32.dll Function ULong LoadIconA(ULong hInstance,ULong lpIconName) Library User32.dll Function Boolean DestroyIcon(ULong hIcon) Library User32.dll 函数 RegisterWindowMessageA 用来定义一个唯一的窗口消息他的返回值被赋给 uCallbackMessage函数 LoadIconA 用来加载一个图标由于此处要加载 OEM 图标所以声明 lpIconName 的类型为 Ulong 而不是String函数 DestroyIcon 释放图标所占内存。 2.添删通知区域图标 为了便于演示笔者将在 w_main 的 Open 事件中添加通知区域图标在 Close 事件中删除状态区图标最小化 w_main 时隐藏 w_main单击通知区域内的图标时恢复并显示 w_main右击通知区域内的图标时显示快捷方式菜单即在整个程序运行过程中通知区域的图标始终存在。 笔者先声明一个实例变量 stc_notifyicondata istc_nid 添加通知区域图标 定义窗口 w_main 的 Open 事件脚本为 w_main.Event Open( ) returns long istc_nid.cbSize 88 // 结构大小 istc_nid.hWnd Handle(this) // w_main 句柄 istc_nid.uFlags 7 // uCallbackMessage、hIcon 和 szTip 有效 istc_nid.uID 0 // 通知区域图标的标识号 istc_nid.uCallbackMessage RegisterWindowMessageA(Demo) // 定义消息 istc_nid.hIcon LoadIconA(0, 32517) // 加载 Windows Logo 图标 istc_nid.szTip Demostration Application // 提示 Shell_NotifyIconA(0, istc_nid) // 添加图标 删除通知区域图标 定义窗口 w_main 的 Close 事件脚本为 w_main.Event Close( ) returns long Shell_NotifyIconA(2, istc_nid) // 删除通知区域图标 DestroyIcon(istc_nid.hIcon) // 释放内存 最小化窗口时隐藏窗口 定义窗口 w_main 的 Resize 事件脚本为 w_main.Event Resize( ) returns long if SizeType 1 then Hide() 3.处理通知消息 当用户在通知区域内的图标上移动鼠标、单击、双击或右击时Shell 会用 uCallbackMessage 所指示的标识号向 hWnd 指定的窗口发送通知消息。一般来说通知消息的参数 lparam 是个指向结构的指针不过幸好如果我们象示例一样只用到较早版本 Shell 的行为的话lparam 就只是个鼠标事件的标识号而已。处理这样的消息只要用 w_main 窗口的 Other 事件即可可定义脚本为 w_main.Event Other(Ulong wParam, Long lParam ) returns long // 参数 wParam 指示对应的通知区域图标的标识号 // 参数 lParam 指示对应的消息类型消息标识号。 if Message.Number istc_nid.uCallbackMessage and wParam istc_nid.uID then // 判断消息是否是待处理的消息 choose case lParam case 512 // 鼠标移动 case 513 // 单击 Show() WindowStateNormal! case 515 //双击 case 516 //右击 ShowSCMenu() end choose end if 转载于:https://www.cnblogs.com/midu/archive/2012/09/04/2670553.html
