From a79f2dbb13c4d26f0b8b78a0aec4ea7bb32c2890 Mon Sep 17 00:00:00 2001 From: f_swallow Date: Mon, 11 Oct 2010 02:28:45 +0000 Subject: [PATCH] =?utf8?q?=E8=A4=87=E6=95=B0=E3=81=AE=E7=99=BA=E8=A8=80?= =?utf8?q?=E3=82=92=E9=81=B8=E6=8A=9E=E3=81=97=E3=81=9F=E7=8A=B6=E6=85=8B?= =?utf8?q?=E3=81=A7=E3=81=B5=E3=81=81=E3=81=BC=E5=89=8A=E9=99=A4=E3=82=92?= =?utf8?q?=E5=AE=9F=E8=A1=8C=E3=81=97=E3=81=9F=E3=81=A8=E3=81=8D=E3=81=AE?= =?utf8?q?=E3=83=A1=E3=83=83=E3=82=BB=E3=83=BC=E3=82=B8=E3=81=8C=E3=81=8A?= =?utf8?q?=E3=81=8B=E3=81=97=E3=81=8B=E3=81=A3=E3=81=9F=E3=81=AE=E3=82=92?= =?utf8?q?=E4=BF=AE=E6=AD=A3?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@956 e39ad16e-3079-482e-bb30-4b4d378143b6 --- Tween/Tween.vb | 19 +++++++++++++------ 1 file changed, 13 insertions(+), 6 deletions(-) diff --git a/Tween/Tween.vb b/Tween/Tween.vb index e1f56574..214a70b3 100644 --- a/Tween/Tween.vb +++ b/Tween/Tween.vb @@ -2409,9 +2409,16 @@ Public Class TweenMain '複数fav確認msg If _curList.SelectedIndices.Count > 1 Then - If MessageBox.Show(My.Resources.FavAddToolStripMenuItem_ClickText1, My.Resources.FavAddToolStripMenuItem_ClickText2, _ - MessageBoxButtons.OKCancel, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Cancel Then - Exit Sub + If FavAdd Then + If MessageBox.Show(My.Resources.FavAddToolStripMenuItem_ClickText1, My.Resources.FavAddToolStripMenuItem_ClickText2, _ + MessageBoxButtons.OKCancel, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Cancel Then + Exit Sub + End If + Else + If MessageBox.Show(My.Resources.FavRemoveToolStripMenuItem_ClickText1, My.Resources.FavRemoveToolStripMenuItem_ClickText2, _ + MessageBoxButtons.OKCancel, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Cancel Then + Exit Sub + End If End If End If @@ -2419,21 +2426,21 @@ Public Class TweenMain args.ids = New List(Of Long) args.sIds = New List(Of Long) args.tName = _curTab.Text - If FavAdd = True Then + If FavAdd Then args.type = WORKERTYPE.FavAdd Else args.type = WORKERTYPE.FavRemove End If For Each idx As Integer In _curList.SelectedIndices Dim post As PostClass = GetCurTabPost(idx) - If FavAdd = True Then + If FavAdd Then If Not post.IsFav Then args.ids.Add(post.Id) Else If post.IsFav Then args.ids.Add(post.Id) End If Next If args.ids.Count = 0 Then - If FavAdd = True Then + If FavAdd Then StatusLabel.Text = My.Resources.FavAddToolStripMenuItem_ClickText4 Else StatusLabel.Text = My.Resources.FavRemoveToolStripMenuItem_ClickText4 -- 2.11.0