OSDN Git Service

リソースへの追い出し漏れ修正
authorsyo68k <syo68k@users.sourceforge.jp>
Mon, 31 Jan 2011 11:35:38 +0000 (11:35 +0000)
committerKimura Youichi <kim.upsilon@bucyou.net>
Sat, 18 Feb 2012 14:18:56 +0000 (23:18 +0900)
git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@1434 e39ad16e-3079-482e-bb30-4b4d378143b6

Tween/FilterDialog.vb
Tween/My Project/Resources.Designer.vb
Tween/My Project/Resources.resx
Tween/ShowUserInfo.vb
Tween/Tween.vb
Tween/Twitter.vb

index 69913bb..250f2bd 100644 (file)
@@ -567,7 +567,8 @@ Public Class FilterDialog
             Dim expr As LambdaExpression
             expr = ParseLambda(Of PostClass, Boolean)(text, New PostClass)
         Catch ex As ParseException
-            MessageBox.Show("構文エラー:" + ex.Message, "ラムダ式構文チェック", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
+            MessageBox.Show(My.Resources.IsValidLambdaExpText1 + ex.Message,
+                            My.Resources.IsValidLambdaExpText2, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
             Return False
         End Try
         Return True
index 8b44ea9..57743ee 100644 (file)
@@ -539,6 +539,15 @@ Namespace My.Resources
         End Property
         
         '''<summary>
+        '''  ユーザーアイコンとして使用できないファイルです に類似しているローカライズされた文字列を検索します。
+        '''</summary>
+        Friend ReadOnly Property ChangeIconToolStripMenuItem_ClickText6() As String
+            Get
+                Return ResourceManager.GetString("ChangeIconToolStripMenuItem_ClickText6", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
         '''  更新履歴
         '''
         '''==== Ver 0.9.7.1(****/**/**)
@@ -1335,6 +1344,24 @@ Namespace My.Resources
         End Property
         
         '''<summary>
+        '''  構文エラー: に類似しているローカライズされた文字列を検索します。
+        '''</summary>
+        Friend ReadOnly Property IsValidLambdaExpText1() As String
+            Get
+                Return ResourceManager.GetString("IsValidLambdaExpText1", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  ラムダ式構文チェック に類似しているローカライズされた文字列を検索します。
+        '''</summary>
+        Friend ReadOnly Property IsValidLambdaExpText2() As String
+            Get
+                Return ResourceManager.GetString("IsValidLambdaExpText2", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
         '''  &lt;a href=&quot;http://twitter.com/&quot; rel=&quot;nofollow&quot;&gt;Keitai Mail&lt;/a&gt; に類似しているローカライズされた文字列を検索します。
         '''</summary>
         Friend ReadOnly Property KeitaiMailSourceString() As String
@@ -2631,6 +2658,15 @@ Namespace My.Resources
         End Property
         
         '''<summary>
+        '''  タブ作成エラー に類似しているローカライズされた文字列を検索します。
+        '''</summary>
+        Friend ReadOnly Property TweenMain_LoadText1() As String
+            Get
+                Return ResourceManager.GetString("TweenMain_LoadText1", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
         '''  **** エラー ログ: {0} **** に類似しているローカライズされた文字列を検索します。
         '''</summary>
         Friend ReadOnly Property UnhandledExceptionText1() As String
index fea617b..79fa585 100644 (file)
   <data name="Enable" xml:space="preserve">
     <value>有効</value>
   </data>
+  <data name="ChangeIconToolStripMenuItem_ClickText6" xml:space="preserve">
+    <value>ユーザーアイコンとして使用できないファイルです</value>
+  </data>
+  <data name="IsValidLambdaExpText1" xml:space="preserve">
+    <value>構文エラー:</value>
+  </data>
+  <data name="IsValidLambdaExpText2" xml:space="preserve">
+    <value>ラムダ式構文チェック</value>
+  </data>
+  <data name="TweenMain_LoadText1" xml:space="preserve">
+    <value>タブ作成エラー</value>
+  </data>
 </root>
\ No newline at end of file
index c54aeeb..ed5dbcc 100644 (file)
@@ -614,7 +614,6 @@ Public Class ShowUserInfo
         End Using
     End Sub
 
-
     Private Sub ChangeIconToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ChangeIconToolStripMenuItem.Click
         OpenFileDialogIcon.Filter = My.Resources.ChangeIconToolStripMenuItem_ClickText1
         OpenFileDialogIcon.Title = My.Resources.ChangeIconToolStripMenuItem_ClickText2
@@ -630,7 +629,7 @@ Public Class ShowUserInfo
         If isValidIconFile(New FileInfo(fn)) Then
             doChangeIcon(fn)
         Else
-            MessageBox.Show("ユーザーアイコンとして使用できないファイルです")
+            MessageBox.Show(My.Resources.ChangeIconToolStripMenuItem_ClickText6)
         End If
     End Sub
 
index 5bd8720..0521f1d 100644 (file)
@@ -1066,7 +1066,7 @@ Public Class TweenMain
             If _statuses.Tabs(tn).TabType = TabUsageType.Undefined Then
                 _statuses.Tabs(tn).TabType = TabUsageType.UserDefined
             End If
-            If Not AddNewTab(tn, True, _statuses.Tabs(tn).TabType, _statuses.Tabs(tn).ListInfo) Then Throw New Exception("タブ作成エラー")
+            If Not AddNewTab(tn, True, _statuses.Tabs(tn).TabType, _statuses.Tabs(tn).ListInfo) Then Throw New Exception(My.Resources.TweenMain_LoadText1)
         Next
 
         Me.JumpReadOpMenuItem.ShortcutKeyDisplayString = "Space"
index 24d8e5e..af37957 100644 (file)
@@ -1195,20 +1195,6 @@ Public Class Twitter
         End Set
     End Property
 
-    'Public WriteOnly Property CountApi() As Integer
-    '    'API時の取得件数
-    '    Set(ByVal value As Integer)
-    '        _countApi = value
-    '    End Set
-    'End Property
-
-    'Public WriteOnly Property CountApiReply() As Integer
-    '    'API時のMentions取得件数
-    '    Set(ByVal value As Integer)
-    '        _countApiReply = value
-    '    End Set
-    'End Property
-
     Public Property ReadOwnPost() As Boolean
         Get
             Return _readOwnPost