易语言为无边框窗口添加右键系统菜单源码

为无边框窗口添加右键系统菜单系统结构:处理,GetWindowLong,GetSystemMenu,TrackPopupMenu,SetWindowLong,SetWindowLong1,CallWindowProc,EnableMenuItem, ======窗口程序集1 || ||------_图形按钮2_被单击 || ||------_图形按钮1_被单击 || ||------__启动窗口_创建完毕 || ||------_画板1_鼠标位置被移动 || ||------_画板1_鼠标右键被放开 || ||------_画板1_鼠标左键被按下 || ||------处理 || || ======调用的Dll || ||---[dll]------GetWindowLong || ||---[dll]------GetSystemMenu || ||---[dll]------TrackPopupMenu || ||---[dll]------SetWindowLong || ||---[dll]------SetWindowLong1 || ||---[dll]------CallWindowProc || ||---[dll]------EnableMenuItem 调用的DLL命令: .DLL命令GetWindowLong,整数型,,"GetWindowLongA" .参数a,整数型 .参数b,整数型 .DLL命令GetSystemMenu,整数型,,"GetSystemMenu" .参数hwnd,整数型 .参数bRevert,整数型 .DLL命令TrackPopupMenu,整数型,,"TrackPopupMenu" .参数hMenu,整数型 .参数wFlags,整数型 .参数x,整数型 .参数y,整数型 .参数nReserved,整数型 .参数hwnd,整数型 .参数rect,整数型 .DLL命令SetWindowLong,整数型,,"SetWindowLongA" .参数a,整数型 .参数b,整数型 .参数c,整数型 .DLL命令SetWindowLong1,子程序指针,"user32","SetWindowLongA" .参数hwnd,整数型 .参数nIndex,整数型 .参数dwNewLong,子程序指针 .DLL命令CallWindowProc,整数型,"user32","CallWindowProcA" .参数lpPrevWndFunc,子程序指针 .参数hWnd,整数型 .参数Msg,整数型 .参数wParam,整数型 .参数lParam,整数型 .DLL命令EnableMenuItem,整数型,"user32","EnableMenuItem" .参数hMenu,整数型 .参数wIDEnableItem,整数型 .参数wEnable,整数型