程序集—窗口程序集1,窗口程序集2,窗口程序集3
窗口—_启动窗口,窗口1,窗口4
DLL命令—GetSystemMetrics
窗口程序集1:
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_位置被改变
移动按钮窗口 ()
.子程序 __启动窗口_创建完毕
载入 (窗口1, _启动窗口, 假)
移动按钮窗口 ()
载入 (窗口4, _启动窗口, 假)
移动按钮窗口 ()
.子程序 __启动窗口_尺寸被改变
移动按钮窗口 ()
.子程序 移动按钮窗口
.局部变量 x
.局部变量 y
.局部变量 标题栏高度, 整数型
.局部变量 边界宽度, 整数型
.局部变量 按钮宽度, 整数型
.局部变量 按钮高度, 整数型
.局部变量 框架宽度, 整数型
标题栏高度 = GetSystemMetrics (#SM_CYCAPTION)
框架宽度 = GetSystemMetrics (#SM_CXFRAME)
边界宽度 = GetSystemMetrics (#SM_CYBORDER)
按钮宽度 = GetSystemMetrics (#SM_CXSIZE)
按钮高度 = GetSystemMetrics (#SM_CYSIZE)
窗口1.宽度 = 按钮宽度
窗口4.宽度 = 按钮宽度
窗口1.高度 = 按钮高度 - 框架宽度
窗口4.高度 = 按钮高度 - 框架宽度
y = 顶边 + 边界宽度 + 标题栏高度 - 窗口1.高度
x = 左边 + 宽度 - 按钮宽度 × 4 - 框架宽度
y = 顶边 + 6
窗口1.左边 = x
窗口1.顶边 = y
窗口程序集2:
.版本 2
.程序集 窗口程序集2
.子程序 _按钮1_被单击
_启动窗口.高度 = 35
.子程序 _窗口1_尺寸被改变
按钮1.宽度 = 宽度
按钮1.高度 = 高度
窗口程序集3:
.版本 2
.程序集 窗口程序集3
.子程序 _按钮1_被单击
_启动窗口.高度 = 250
.子程序 _窗口1_尺寸被改变
按钮1.宽度 = 宽度
按钮1.高度 = 高度
DLL命令:
.版本 2
.DLL命令 GetSystemMetrics, 整数型, "user32", "GetSystemMetrics", , 返回与windows环境有关的信息 取决于具体的常数索引
.参数 索引, 整数型
我运行后第二个按钮无法再标题显示,却在_启动窗口的中间显示。高手指点。