Question

易语言投递文本中文

这个是投递QQ音速游戏的代码。为什么投递不了汉字。只能投递 字母和数字。哪里有问题。求大神帮帮忙解决。谢谢

.版本 2.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 res, 整数型
.局部变量 zjj, 字节集
.局部变量 i, 整数型

zjj ＝ 到字节集 (编辑框1.内容)
取句柄 (“game.exe”)
.计次循环首 (取字节集长度 (zjj), i)
res ＝ API_PostMessage (取句柄 (“game.exe”, , “R2Beat”), 258, zjj [i], 0)
调试输出 (res)
.计次循环尾 ()
按键消息 (取句柄 (“game.exe”), #回车键)

Answer 1

• 楼主似乎知道所谓的输入文字是通过消息的方式实现的，但是你不知道接收的时候是接收的编码，而你这样直接发了个字节码过去当然不对~~！！！

• '顺道送你个API，这么好的源码，难道楼主不打算加个分什么的~_~//？

 

.版本 2

.子程序 _按钮1_被单击

.局部变量 a, 文本型

a ＝ “123abcd456我们123abc你们456”

输出调试文本 (投递文本中英数混合 (编辑框1.取窗口句柄 (), a))

 

.子程序 投递文本中英数混合, 逻辑型

.参数 hwnd

.参数 text, 文本型

.局部变量 bin, 字节集

.局部变量 size, 整数型

.局部变量 pos, 整数型

.局部变量 code, 整数型

 

.如果真 (IsWindow (hwnd) ＝ 0)

    返回 (假)  ' 窗口不存在返回假

.如果真结束

bin ＝ 到字节集 (text)

size ＝ 取字节集长度 (bin)

.判断循环首 (pos ＜ size)

    pos ＝ pos ＋ 1

    .如果 (bin [pos] ＞ 127)  ' 好像是127，具体我也忘了，呵~~！

        code ＝ bin [pos] ＋ bin [pos ＋ 1] × 256

        pos ＝ pos ＋ 1

    .否则

        code ＝ bin [pos]

    .如果结束

    PostMessage (hwnd, 258, code, 0)

.判断循环尾 ()

返回 (真)

 

.版本 2

.DLL命令 IsWindow, 整数型

    .参数 hwnd, 整数型