From 65101acc13b99ff196491f7f8aea39350c027d2f Mon Sep 17 00:00:00 2001 From: kiri_feather Date: Mon, 9 Aug 2010 06:26:16 +0000 Subject: [PATCH] =?utf8?q?=E5=85=AC=E5=BC=8FRT=E5=8C=96=E7=A2=BA=E8=AA=8D?= =?utf8?q?=E3=81=AE=E3=83=A1=E3=83=83=E3=82=BB=E3=83=BC=E3=82=B8=E3=82=92?= =?utf8?q?=E4=B8=81=E5=AF=A7=E3=81=AB=E3=80=82=E6=8A=95=E7=A8=BF=E4=B8=AD?= =?utf8?q?=E6=96=AD=E3=82=82=E5=8F=AF=E8=83=BD=E3=81=AB?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@680 e39ad16e-3079-482e-bb30-4b4d378143b6 --- Tween/My Project/Resources.Designer.vb | 4 ++-- Tween/My Project/Resources.en.resx | 2 +- Tween/My Project/Resources.resx | 2 +- Tween/Tween.vb | 17 ++++++++++++----- 4 files changed, 16 insertions(+), 9 deletions(-) diff --git a/Tween/My Project/Resources.Designer.vb b/Tween/My Project/Resources.Designer.vb index 97d00393..2daf2375 100644 --- a/Tween/My Project/Resources.Designer.vb +++ b/Tween/My Project/Resources.Designer.vb @@ -541,7 +541,7 @@ Namespace My.Resources ''' ''' 更新履歴 ''' - '''==== Ver 0.9.4.1(2010/07/**) + '''==== Ver 0.9.5.0(2010/08/08) ''' * 画像投稿のキャンセル時にフォーカスをリスト部へ戻すようにした ''' * 画像投稿モードをESCキーでキャンセルした際にビープ音が鳴らないようにした ''' * 読み上げソフトで、タイムラインの選択tweetを変更すると、画像投稿画面の「投稿先」ラベルを毎回読み上げてしまうので、未使用時は投稿画面のパーツを無効に @@ -1455,7 +1455,7 @@ Namespace My.Resources End Property ''' - ''' 編集されてないため、公式RTとして投稿します。よろしいですか？ に類似しているローカライズされた文字列を検索します。 + ''' 編集されてないため、公式RTとして投稿しまか？{0}[はい：公式RTで投稿]{0}[いいえ：非公式RTで投稿]{0}[キャンセル：投稿しない] に類似しているローカライズされた文字列を検索します。 ''' Friend ReadOnly Property PostButton_Click1() As String Get diff --git a/Tween/My Project/Resources.en.resx b/Tween/My Project/Resources.en.resx index a8f3ded8..23aa4676 100644 --- a/Tween/My Project/Resources.en.resx +++ b/Tween/My Project/Resources.en.resx @@ -757,6 +757,6 @@ Media sharing service - This tweet isn't changed. Post this tweet as Official Retweet? + This tweet isn't changed. Post this tweet as Official Retweet?{0}[Yes:Official Retweet]{0}[No:resume]{0}[Cancel:abort to post] \ No newline at end of file diff --git a/Tween/My Project/Resources.resx b/Tween/My Project/Resources.resx index e3aba347..a8d73cea 100644 --- a/Tween/My Project/Resources.resx +++ b/Tween/My Project/Resources.resx @@ -956,7 +956,7 @@ ..\Resources\MultiMediaImage.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - 編集されてないため、公式RTとして投稿します。よろしいですか？ + 編集されてないため、公式RTとして投稿しまか？{0}[はい：公式RTで投稿]{0}[いいえ：非公式RTで投稿]{0}[キャンセル：投稿しない] ..\resources\description.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8 diff --git a/Tween/Tween.vb b/Tween/Tween.vb index 3bcb1466..9e866cd8 100644 --- a/Tween/Tween.vb +++ b/Tween/Tween.vb @@ -1770,11 +1770,18 @@ Public Class TweenMain End If If _curPost IsNot Nothing AndAlso StatusText.Text.Trim() = String.Format("RT @{0}: {1}", _curPost.Name, _curPost.Data) Then - If MessageBox.Show(My.Resources.PostButton_Click1, "Retweet", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) = Windows.Forms.DialogResult.OK Then - doReTweetOriginal() - StatusText.Text = "" - Exit Sub - End If + Dim rtResult As DialogResult = MessageBox.Show(String.Format(My.Resources.PostButton_Click1, Environment.NewLine), + "Retweet", + MessageBoxButtons.YesNoCancel, + MessageBoxIcon.Question) + Select rtResult + Case Windows.Forms.DialogResult.Yes + doReTweetOriginal() + StatusText.Text = "" + Exit Sub + Case Windows.Forms.DialogResult.Cancel + Exit Sub + End Select End If _history(_history.Count - 1) = StatusText.Text.Trim -- 2.11.0