[e]
.版本 2
.程序集 窗口程序集1
.程序集变量 窗口, Ex_DirectUI
.程序集变量 按钮1, 按钮_Ex
.程序集变量 按钮2, 按钮_Ex
.程序集变量 窗口句柄, 整数型
.子程序 __启动窗口_创建完毕
窗口句柄 = 取窗口句柄 ()
窗口.挂接皮肤 (窗口句柄, , , , , , , , , , , , , )
按钮1.创建 (窗口句柄, 100, 100, 100, 100, “按钮1”, , , , , , , , )
按钮2.创建 (窗口句柄, 300, 100, 100, 100, “按钮2”, , , , , , , , )
按钮1.挂接事件 (#事件_左键单击, &按钮_被单击)
按钮2.挂接事件 (#事件_左键单击, &按钮_被单击)
.子程序 按钮_被单击, , , 这个子程序的参数是按 挂接事件 的提示修改
.参数 组件句柄, 整数型
.参数 事件类型, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.判断开始 (组件句柄 = 按钮1.取组件句柄 ())
信息框 (“按钮1被单击”, 0, )
.判断 (组件句柄 = 按钮2.取组件句柄 ())
信息框 (“按钮2被单击”, 0, )
.默认
.判断结束
[/e] |