.版本 2
.支持库 iext2
.支持库 internet
.支持库 iext
通用对话框1.打开 ()
Q群 = 到文本 (读入文件 (通用对话框1.文件名))
Q号码 = 分割文本 (Q群, #换行符, )
图片组 = 建空图片组 (40, 40)
.计次循环首 (取数组成员数 (Q号码), 计次)
加入成员 (图片组成员, HTTP读文件 (“
http://q4.qlogo.cn/headimg_dl?bs=qq&dst_uin=” + Q号码 [计次] + “&src_uin=” + Q号码 [计次] + “&spec=40&url_enc=0&referer=bu_interface&term_type=PC”)) ' 读取图片加到图片组
加入图片 (图片组, 图片组成员 [计次], )
.计次循环尾 ()
' 调试输出 (取数组成员数 (图片组cy), 取图片组图片数 (图片组))
超级列表框1.图片组 = 图片组
.计次循环首 (取数组成员数 (Q号码), 计次)
表位置 = 超级列表框1.插入表项 (, , , , , )
昵称 = 取出中间文本 (到文本 (HTTP读文件 (“
http://users.qzone.qq.com/fcg-bin/cgi_get_portrait.fcg?get_nick=1&uins=” + Q号码 [计次])), “,” +
#引号, #引号 + “,”)
超级列表框1.置标题 (表位置, 1, Q号码 [计次])
超级列表框1.置图片 (表位置, 0, 计次 - 1)
超级列表框1.置标题 (表位置, 2, 昵称)
.计次循环尾 ()