在标题栏上添加按钮功能

易语言 2020-07-05 18:34:05

.如果真 (Msg = #WM_NCPAINT 或 Msg = #WM_ACTIVATEAPP 或 Msg = #WM_NCHITTEST 或 Msg = #WM_SIZE 或 Msg = 19)
' 重画窗口、窗口标题栏在激活与非激活之间切换、移动鼠标、改变一个窗口的大小时重画按钮
画按钮1 ()
.如果真结束
.如果真 (Msg = #WM_NCLBUTTONDOWN 且 spwz ≥ H.Left 且 spwz ≤ H.Right 且 czwz ≥ H.Top 且 czwz ≤ H.Bottom)
' 在标题栏上按下鼠标左键消息。可以画出按钮按下的样子,并且可以在其中进行自已的单击事件的处理
画按钮2 ()
弹出菜单 (aaa, , )
.如果真结束
.如果真 (Msg = #WM_NCLBUTTONUP)
' 在标题栏上释放鼠标左键消息。可以在标题栏上画出按钮弹起的样子
画按钮1 ()
.如果真结束
返回 (CallWindowProc (默认窗口程序, 窗口句柄, Msg, wParam, IParam))