Delegate Sub SetStatusLabelApiDelegate()
Private Sub SetStatusLabelApiHandler(ByVal sender As Object, ByVal e As ApiInformationChangedEventArgs)
- If InvokeRequired AndAlso Not IsDisposed Then
- Invoke(New SetStatusLabelApiDelegate(AddressOf SetStatusLabelApi))
- Else
- SetStatusLabelApi()
- End If
+ Try
+ If InvokeRequired AndAlso Not IsDisposed Then
+ Invoke(New SetStatusLabelApiDelegate(AddressOf SetStatusLabelApi))
+ Else
+ SetStatusLabelApi()
+ End If
+ Catch ex As ObjectDisposedException
+ Exit Sub
+ Catch ex As InvalidOperationException
+ Exit Sub
+ End Try
End Sub
Private Sub SetStatusLabelApi()
End If
Catch ex As ObjectDisposedException
Exit Sub
+ Catch ex As InvalidOperationException
+ Exit Sub
End Try
End Sub
End If
Catch ex As ObjectDisposedException
Exit Sub
+ Catch ex As InvalidOperationException
+ Exit Sub
End Try
End Sub
Private Sub tw_UserStreamStarted()
Me._isActiveUserstream = True
- If InvokeRequired AndAlso Not IsDisposed Then
- Invoke(New MethodInvoker(AddressOf tw_UserStreamStarted))
+ Try
+ If InvokeRequired AndAlso Not IsDisposed Then
+ Invoke(New MethodInvoker(AddressOf tw_UserStreamStarted))
+ Exit Sub
+ End If
+ Catch ex As ObjectDisposedException
Exit Sub
- End If
-
+ Catch ex As InvalidOperationException
+ Exit Sub
+ End Try
MenuItemUserStream.Text = "&UserStream ▶"
MenuItemUserStream.Enabled = True
StopToolStripMenuItem.Text = "&Stop"
Private Sub tw_UserStreamStopped()
Me._isActiveUserstream = False
- If InvokeRequired AndAlso Not IsDisposed Then
- Invoke(New MethodInvoker(AddressOf tw_UserStreamStopped))
+ Try
+ If InvokeRequired AndAlso Not IsDisposed Then
+ Invoke(New MethodInvoker(AddressOf tw_UserStreamStopped))
+ Exit Sub
+ End If
+ Catch ex As ObjectDisposedException
Exit Sub
- End If
-
+ Catch ex As InvalidOperationException
+ Exit Sub
+ End Try
MenuItemUserStream.Text = "&UserStream ■"
MenuItemUserStream.Enabled = True
StopToolStripMenuItem.Text = "&Start"
End Sub
Private Sub tw_UserStreamEventArrived(ByVal ev As Twitter.FormattedEvent)
- If InvokeRequired AndAlso Not IsDisposed Then
- Invoke(New Action(Of Twitter.FormattedEvent)(AddressOf tw_UserStreamEventArrived), ev)
+ Try
+ If InvokeRequired AndAlso Not IsDisposed Then
+ Invoke(New Action(Of Twitter.FormattedEvent)(AddressOf tw_UserStreamEventArrived), ev)
+ Exit Sub
+ End If
+ Catch ex As ObjectDisposedException
Exit Sub
- End If
+ Catch ex As InvalidOperationException
+ Exit Sub
+ End Try
StatusLabel.Text = "Event: " + ev.Event
'If ev.Event = "favorite" Then
' NotifyFavorite(ev)