.版本 2
.支持库 spec
.支持库 EThread
.程序集 WinMain
.子程序 _WinMain_创建完毕
.子程序 Base
.参数 _this, 整数型
.局部变量 Copy, Copy
.局部变量 Base, Base
.局部变量 Msg, 文本型
Copy.Copy (Base, _this)
Base.Login (“username”, “www.hunankuai.com”, Msg)
调试输出 (Base.getToken ())
.子程序 demo
.局部变量 hendle, 整数型
.局部变量 i, 整数型
.局部变量 addr, 整数型
.局部变量 论坛, 易语言论坛, , "1"
.局部变量 快站, 湖南快站, , "1"
.局部变量 Copy, Copy
.计次循环首 (取数组成员数 (论坛), i)
启动线程 (&Base, Copy.getFunc (论坛 [i]), hendle)
等待线程 (hendle, 1000)
' 信息框 (“Token:” + 论坛 [i].getToken (), 0, , WinMain)
.计次循环尾 ()
.计次循环首 (取数组成员数 (快站), i)
启动线程 (&Base, Copy.getFunc (快站 [i]), hendle)
等待线程 (hendle, 1000)
' 信息框 (“Token:” + 论坛 [i].getToken (), 0, , WinMain)
.计次循环尾 ()
.子程序 _按钮1_被单击
demo ()
易语言类引用dll