SetWindowLong (取窗口句柄 (), -16, GetWindowLong (取窗口句柄 (), -16) ＋ 524288)
' 子程序指针 ＝ 设置窗口信息_ (取窗口句柄 (), #GWL_WNDPROC, 到整数 (&窗口消息处理))
服务器_树型框.加入项目 (, “正在获取服务器列表...”, , , , , )
启动线程 (&子程序_线程获取列表, , )
.如果真 (当前_索引 ＞ 0 且 当前_索引 ≤ 取数组成员数 (服务器列表))
.如果真 (取文本左边 (服务器列表 [当前_索引].装备展示, 7) ≠ “http://”)
服务器列表 [当前_索引].装备展示 ＝ “http://” ＋ 服务器列表 [当前_索引].装备展示
.如果真结束
子程序_打开网页 (服务器列表 [当前_索引].装备展示)
上一篇 动态托盘小窗口，真彩控件模块例程