窗口被关闭时,自动缩小到托盘,可正常关机。
.版本 2
.子程序
__启动窗口_创建完毕 置托盘图标 (#图片1, _启动窗口.标题)
' ↓子类化,拦截窗口消息hOldWndProc = SetWindowLong (_启动窗口.取窗口句柄 (), #GWL_WNDPROC, 到整数 (&窗口消息处理))
.子程序
窗口消息处理,
整数型,
.参数 hWnd,
整数型, ,
要接收消息的那个窗口的句柄 .参数 wMsg,
整数型, ,
消息的标识符 .参数 wParam,
整数型, ,
具体取决于消息 .参数 lParam,
整数型, ,
具体取决于消息; .判断开始 (wMsg = #WM_CLOSE)
' 关闭窗口 SendMessage (hWnd, #WM_SYSCOMMAND, #SC_MINIMIZE, 0)
' 让窗口最小化 ShowWindow (hWnd, #SW_HIDE)
' 隐藏窗口 返回 (0)
.判断 (wMsg = #WM_QUERYENDSESSION)
' 退出 DestroyWindow (hWnd)
' 销毁窗口 返回 (0)
.判断 (wMsg = #WM_DESTROY)
' 即将销毁窗口 SetWindowLong (hWnd, #GWL_WNDPROC, hOldWndProc)
' 取消子类化 置托盘图标 ({ }, )
' 删除托盘图标 DestroyWindow (hWnd)
' 销毁窗口.默认 .判断结束返回 (
CallWindowProc (hOldWndProc, hWnd, wMsg, wParam, lParam))
源码下载:禁止关闭窗口.rar[点击下载](110 K) 下载次数:11 累计下载获得 DB 22 刀