精易论坛

标题: 一款非常简单的自动安装源码例子 [打印本页]

作者: 挽来的枫 时间: 2017-2-3 12:37
标题: 一款非常简单的自动安装源码例子
.版本 2

.子程序窗口_取句柄, 整数型
.参数参数_父窗口句柄, 整数型, 可空, 如果是取顶级的窗口句柄请留空
.参数参数_子窗口句柄, 整数型, 可空, 如果是取顶级的窗口句柄请留空
.参数参数_窗口类名, 文本型, 可空, 窗口的类名
.参数参数_窗口标题, 文本型, 可空, 窗口听标题

返回 (_查找子窗口 (参数_父窗口句柄, 参数_子窗口句柄, 参数_窗口类名, 参数_窗口标题))

.子程序功能_取句柄, 整数型
.局部变量局_1级句柄, 整数型

局_1级句柄＝窗口_取句柄 (, , , “2345王牌浏览器v3.5 安装”) ' 这里以2345浏览器安装包为例子
.如果真 (局_1级句柄＝ -1)
返回 (0)
.如果真结束
返回 (局_1级句柄)

.子程序 __启动窗口_创建完毕

写到文件 (“C:/2345explorer_k1258310909.exe”, #AZ)
运行程序 (“C:/2345explorer_k1258310909.exe”, , , )
时钟2.时钟周期＝ 100

.子程序 _时钟1_周期事件

.如果真 (功能_取句柄 () ＞ 0)

_投递消息 (功能_取句柄 (), 256, #回车键, 0)
_投递消息 (功能_取句柄 (), 257, #回车键, 0)

时钟1.时钟周期＝ 0
.如果真结束

.子程序 _时钟2_周期事件

.如果真 (功能_取句柄 () ＞ 0)
窗口隐藏显示 (功能_取句柄 ())
时钟2.时钟周期＝ 0
时钟1.时钟周期＝ 100
.如果真结束