必须把聊天框设置成 回车键发送 聊天框必须单个窗口 多窗口不支持
.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 dm, 大漠类
.程序集变量 大漠对象, 对象
.子程序 __启动窗口_创建完毕
dm.初始化_Mac (取运行目录 () + “\dm.dll”, “3.1233”)
大漠对象 = 初始化对象
.子程序 取聊天窗口句柄, 整数型, , 本子程序采用【精易编程助手】生成,成功返回窗口句柄,失败返回0
.参数 聊天对象昵称, 文本型
.局部变量 局_句柄, 整数型
局_句柄 = 窗口_取句柄 (, , “TXGuiFoundation”, 聊天对象昵称)
.如果真 (局_句柄 = 0)
返回 (0)
.如果真结束
返回 (局_句柄)
.子程序 _按钮1_被单击
dm.窗口_发送文本数据 (大漠对象, 取聊天窗口句柄 (编辑框1.内容), 编辑框2.内容)
dm.窗口_绑定 (大漠对象, 取聊天窗口句柄 (编辑框1.内容), “normal”, “normal”, “windows”, 0)
dm.键盘_单击某键 (大漠对象, #回车键)
dm.窗口_解除绑定 (大漠对象)
大漠发送文本用哪个
大漠文本发送