本帖最后由 fire9 于 2024-4-22 12:38 编辑
给喜欢的Ta发消息,从早发到晚,直接拿下Ta.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 lw, 图色模拟类
.子程序 _按钮_绑定_被单击
.局部变量 name, 文本型
name = 编辑框1.内容
.如果真 (lw.后台_绑定 (小羊_取句柄 (name), , , , , ))
调试输出 (“绑定成功”)
.如果真结束
.子程序 小羊_取句柄, 整数型, , 本子程序采用【精易编程助手】生成,成功返回窗口句柄,失败返回0
.参数 name, 文本型
.局部变量 局_句柄, 整数型
局_句柄 = 窗口_取句柄 (, , “ChatWnd”, name)
.如果真 (局_句柄 = 0)
返回 (0)
.如果真结束
返回 (局_句柄)
.子程序 _按钮_发送消息_被单击
.局部变量 times, 整数型
.局部变量 index, 整数型
.局部变量 msg, 文本型
times = 到整数 (编辑框2.内容)
msg = 编辑框4.内容
.计次循环首 (times, index)
lw.鼠标_移至点击 (96, 567, 100)
lw.键盘_输入字符 (msg, )
编辑框3.内容 = 到文本 (index)
lw.鼠标_移至点击 (473, 611, 100)
.计次循环尾 ()
.子程序 __启动窗口_创建完毕
皮肤_加载 (#皮肤_彩虹, , )
.子程序 _按钮_说明_被单击
信息框 (“先把需要发送的人单独开一个窗口” + #换行符 + “填好备注,发送信息,发送次数” + #换行符 + “再依次点击绑定,发送消息”, 0, “说明”, )
.子程序 __启动窗口_将被销毁
销毁 ()
|