以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]openQQ的链接状态判断 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=76702) |
-- 作者:script -- 发布时间:2015/11/3 17:43:00 -- [求助]openQQ的链接状态判断 老师 1. 我的项目是以窗口展示的 那么我在窗口中创建一个按钮来模拟 菜单栏上配置栏的openQQ状态菜单 判断openQQ的链接状态的语句是什么呢? 2. 我用这段代码能否让按钮显示未读条数呢 Static OpenQQ As WinForm.Button Static LastTime As Date If OpenQQ Is Nothing Then OpenQQ = e.Form.Controls("状态") End If Dim txt As String If QQClient.Ready If QQClient.UnreadCount > 0 Then txt = "(" & QQClient.UnreadCount & "条)" End If End If If OpenQQ.Text <> txt Then OpenQQ.Text = txt End If If OpenQQ.Text > "" Then Dim ntp As timeSpan = Date.Now - LastTime If ntp.TotalSeconds >= 0.5 Then LastTime = Date.Now If OpenQQ.ForeColor = Color.Red Then OpenQQ.ForeColor = Color.Transparent Else OpenQQ.ForeColor = Color.Red End If End If End If |
-- 作者:狐狸爸爸 -- 发布时间:2015/11/3 17:52:00 -- Ready判断状态 UnreadCount 返回未读消息数量。
剩下的何时判断,如何显示,随意。 |
-- 作者:大红袍 -- 发布时间:2015/11/3 17:59:00 -- 1、没有自己登录或退出的事件,所以没办法实时得到状态。你弄个计时器,判断ready吧。
2、参考 http://www.foxtable.com/help/topics/3012.htm
|