From: kiri_feather <kiri_feather@users.sourceforge.jp>
Date: Thu, 20 Jan 2011 02:49:28 +0000 (+0000)
Subject: 未読replyある時のUS有効時にタスクトレイアイコン更新がおかしかったので修正
X-Git-Tag: Tween_v0.9.8.0~66
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=de5d57712bb0ed08449712ff8e84e513e1632590;p=opentween%2Fopen-tween.git

未読replyある時のUS有効時にタスクトレイアイコン更新がおかしかったので修正

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@1382 e39ad16e-3079-482e-bb30-4b4d378143b6
---

diff --git a/Tween/Tween.vb b/Tween/Tween.vb
index b514ecdf..a3d46f06 100644
--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -1198,7 +1198,7 @@ Public Class TweenMain
     End Sub
 
     Private Sub RefreshTimeline(ByVal isUserStream As Boolean)
-        If isUserStream Then NotifyIcon1.Icon = NIconAt
+        If isUserStream Then Me.RefreshTasktrayIcon(True)
         'スクロール制御準備
         Dim smode As Integer = -1    '-1:制御しない,-2:最新へ,その他:topitem使用
         Dim topId As Long = GetScrollPos(smode)
@@ -6505,8 +6505,7 @@ RETRY:
         _tabDrag = False
     End Sub
 
-    Private Sub TimerRefreshIcon_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerRefreshIcon.Tick
-        '200ms
+    Private Sub RefreshTasktrayIcon(ByVal forceRefresh As Boolean)
         If _colorize Then Colorize()
         If Not TimerRefreshIcon.Enabled Then Exit Sub
         Static iconCnt As Integer = 0
@@ -6516,6 +6515,9 @@ RETRY:
         'Static usCheckCnt As Integer = 0
 
         Static iconDlListTopItem As ListViewItem = Nothing
+
+        If forceRefresh Then idle = False
+
         If DirectCast(ListTab.SelectedTab.Tag, ListView).TopItem Is iconDlListTopItem Then
             DirectCast(Me.TIconDic, ImageDictionary).PauseGetImage = False
         Else
@@ -6587,6 +6589,11 @@ RETRY:
         End If
     End Sub
 
+    Private Sub TimerRefreshIcon_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerRefreshIcon.Tick
+        '200ms
+        Me.RefreshTasktrayIcon(False)
+    End Sub
+
     Private Sub ContextMenuTabProperty_Opening(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles ContextMenuTabProperty.Opening
         '右クリックの場合はタブ名が設定済。アプリケーションキーの場合は現在のタブを対象とする
         If String.IsNullOrEmpty(_rclickTabName) OrElse sender IsNot ContextMenuTabProperty Then