.版本 2 .程序集 窗口程序集1 .程序集变量 原_启动窗口, 子程序指针 .程序集变量 x .程序集变量 y .程序集变量 x_ .程序集变量 y_ .子程序 限制窗口大小 .参数 窗口, 整数型 .参数 最小宽度, 整数型 .参数 最小高度, 整数型 .参数 最大宽度, 整数型 .参数 最大高度, 整数型 x ＝ 最小宽度 y ＝ 最小高度 x_ ＝ 最大宽度 y_ ＝ 最大高度 原_启动窗口 ＝ SetWindowLongA (窗口, -4, &处理) .子程序 处理, 整数型 .参数 hwnd, 整数型 .参数 Msg, 整数型 .参数 wp, 整数型 .参数 lp, 整数型 .局部变量 a, MINMAXINFO .如果真 (Msg ＝ 36) CopyMemory1 (a, lp, 40) a.ptMinTrackSize.横向位置 ＝ x a.ptMinTrackSize.纵向位置 ＝ y a.ptMaxTrackSize.横向位置 ＝ x_ a.ptMaxTrackSize.纵向位置 ＝ y_ CopyMemory (lp, a, 40) .如果真结束 返回 (CallWindowProcA (原_启动窗口, hwnd, Msg, wp, lp)) .子程序 __启动窗口_创建完毕 限制窗口大小 (取窗口句柄 (), 宽度, 高度, 取屏幕宽度 () × 2, 取屏幕高度 () × 2)