窗口嵌入桌面例子

易语言 2020-06-21 18:26:47

窗口句柄 = 寻找顶级窗口 (“Progman”, “Program Manager”) ' Program Manager 桌面的标题
新父窗口 (取窗口句柄 (), 窗口句柄)

.子程序 __启动窗口_鼠标右键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

.如果真 (信息框 (“你要关闭程序吗?”, #信息图标 + #是否钮, “提示信息”) = #是钮)
结束 ()