アイコン表示をNoneにしているときに発言詳細のアイコンを右クリックすると例外が発生していたのを修正

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

diff --git a/Tween/Tween.vb b/Tween/Tween.vb
index 70d1879..8642f17 100644 (file)
--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -7077,7 +7077,7 @@ RETRY:
         '発言詳細のアイコン右クリック時のメニュー制御
         If _curList.SelectedIndices.Count > 0 AndAlso _curPost IsNot Nothing Then
             Dim name As String = _curPost.ImageUrl
-            If name.Length > 0 Then
+            If name IsNot Nothing AndAlso name.Length > 0 Then
                 Dim idx As Integer = name.LastIndexOf("/"c)
                 If idx <> -1 Then
                     name = IO.Path.GetFileNameWithoutExtension(name.Substring(idx))