QQ协议可开发自动无限加好友软件

编辑框_friendQQ.内容 ＝ ListView_friends.取标题 (ListView_friends.现行选中项, 0)
.计次循环首 (ListView_friends.取表项数 (), i)
m_pcQQ.SendFriendMessage (ListView_friends.取标题 (i － 1, 0), 编辑框_friendMsg.内容)
.计次循环尾 ()