易语言调用Demo
<p><strong>易语言DEMO</strong></p>
<p>DLL</p>
<pre><code>.版本 2
.DLL命令 GetUserWeChatVersion, 整数型, &quot;WxLoader_d.dll&quot;, &quot;GetUserWeChatVersion&quot;
.参数 szVersion, 文本型
.DLL命令 InitWeChatSocket, , &quot;WxLoader_d.dll&quot;, &quot;InitWeChatSocket&quot;
.参数 pAccpetCallback, 子程序指针
.参数 pRecvCallback, 子程序指针
.参数 pCloseCallback, 子程序指针
.DLL命令 InjectWeChat, 整数型, &quot;WxLoader_d.dll&quot;, &quot;InjectWeChat&quot;, , 返回微信的进程ID,若值为0,则注入失败
.参数 DLL路径, 文本型
.DLL命令 SendWeChatData, 整数型, &quot;WxLoader_d.dll&quot;, &quot;SendWeChatData&quot;
.参数 dwClientId, 整数型
.参数 szJsonData, 文本型
.DLL命令 DestroyWeChat, 整数型, &quot;WxLoader_d.dll&quot;, &quot;DestroyWeChat&quot;
</code></pre>
<p>__启动窗口_创建完毕</p>
<pre><code>.版本 2
' 初始化回调参数
InitWeChatSocket (&amp;客户端连接回调, &amp;客户端接收数据回调, &amp;客户端关闭回调)
' 自动注入,如果有打开的自动注入,没有打开的微信,会多开一个并注入,无需干预
DLL路径 = 取运行目录 () + “\” + “WeChatHelper_d.dll”
pid = InjectWeChat (DLL路径)</code></pre>
<p>微信回调程序集</p>
<pre><code>.版本 2
.子程序 客户端连接回调
.参数 客户ID, 整数型
_启动窗口.编辑框1.加入文本 (“有新客户端进入,ID: ” + 到文本 (客户ID) + #换行符 + #换行符)
G_clientId = 客户ID
.子程序 客户端关闭回调
.参数 客户ID, 整数型
_启动窗口.编辑框1.加入文本 (“有客户端退出,ID: ” + 到文本 (客户ID) + #换行符 + #换行符)
.子程序 客户端接收数据回调
.参数 客户ID, 整数型
.参数 JSON数据, 文本型
.参数 数据长度, 整数型
_启动窗口.编辑框1.加入文本 (JSON数据 + #换行符 + #换行符)</code></pre>