.如果真 (进程信息.线程ID ＝ 0)
信息框 (“请先运行程序再操作。”, 0, )
返回 ()
.如果真结束
API_枚举任务窗口 (进程信息.线程ID, &枚举窗口过程, 0) ' 取得新程序的窗口操作句柄
SetParent (操作程序句柄, 取窗口句柄 ()) ' 将新程序置为本程序窗口内
取窗口矩形_ (操作程序句柄, r) ' 取得新程序的窗口尺寸
改变窗口_ (操作程序句柄, 20, 20, 1024, 768, 1) ' 改变窗口尺寸
上一篇 卷帘式菜单重命名菜单读配置项
下一篇 多线程同步执行、挂起、恢复、销毁