x += columns.Width
End If
Next
- e.Graphics.DrawImage(tw.DetailIcon(e.Item.ImageKey), New Rectangle(x, e.Bounds.Top, Math.Min(_iconSz, e.Bounds.Width), _iconSz))
+ If tw.DetailIcon.ContainsKey(e.Item.ImageKey) Then
+ e.Graphics.DrawImage(tw.DetailIcon(e.Item.ImageKey), New Rectangle(x, e.Bounds.Top, Math.Min(_iconSz, e.Bounds.Width), _iconSz))
+ End If
End If
End If
End If
Dim httpVar As New HttpVarious
img = httpVar.GetImage(post.ImageUrl, 10000)
If img Is Nothing Then
- post.ImageUrl = Nothing
+ 'post.ImageUrl = Nothing
TabInformations.GetInstance.AddPost(post)
Exit Sub
End If
_dIcon.Add(post.ImageUrl, img)
Catch ex As InvalidOperationException
'タイミングにより追加できない場合がある?(キー重複ではない)
- post.ImageUrl = Nothing
+ 'post.ImageUrl = Nothing
Catch ex As System.OverflowException
'不正なアイコン?DrawImageに失敗する場合あり
- post.ImageUrl = Nothing
+ 'post.ImageUrl = Nothing
Catch ex As OutOfMemoryException
'DrawImageで発生
- post.ImageUrl = Nothing
+ 'post.ImageUrl = Nothing
End Try
End If
End SyncLock