易语言程序无边框窗口最大化功能

易语言 2020-08-21 19:25:02

易语言程序无边框窗口最大化功能

GetWindowRect (目标窗口句柄, 记录RECT)
.如果真 (SystemParametersInfo (48, 0, 桌面RECT, 0) = 0) ' 系统API才是最佳选择 如果失败 就用备用方案吧- -
hwnd = FindWindowA (“Progman”, “Program Manager”)
hwnd = FindWindowExA (hwnd, 0, “SHELLDLL_DefView”, 0)
.如果真 (GetWindowRect (hwnd, 桌面RECT) = 0)
hwnd = GetDesktopWindow ()
.如果真 (GetWindowRect (hwnd, 桌面RECT) = 0)
桌面RECT.x = 0
桌面RECT.y = 0
桌面RECT.x2 = GetSystemMetrics (0)
桌面RECT.y2 = GetSystemMetrics (1)
.如果真结束

.如果真结束

.如果真结束
MoveWindow (目标窗口句柄, 桌面RECT.x, 桌面RECT.y, 桌面RECT.x2 - 桌面RECT.x, 桌面RECT.y2 - 桌面RECT.y, 真)