Imports Leadtools.Windows.Controls
Imports Leadtools.Windows.Annotations
Private Sub AnnAutomation_Cancel()
' subclass to the viewer mouse move event
' _automation is an AnnAutomation object
AddHandler _automation.Container.MouseMove, AddressOf Container_MouseMove
End Sub
Private Sub Container_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs)
' check if we have a draw designer currently selected
If Not _automation.CurrentDesigner Is Nothing AndAlso TypeOf _automation.CurrentDesigner Is AnnDrawDesigner Then
' check if we are over the rectangle 100,100 to 200,200
Dim rc As Rect = New Rect(100, 100, 100, 100)
If rc.Contains(e.GetPosition(_automation.Container)) Then
_automation.Cancel()
End If
End If
End Sub
using Leadtools.Windows.Controls;
using Leadtools.Windows.Annotations;
using Leadtools.Demos;
using Leadtools.Help;
private void AnnAutomation_Cancel()
{
// subclass to the viewer mouse move event
// _automation is an AnnAutomation object
_automation.Container.MouseMove += new MouseEventHandler(Container_MouseMove);
}
private void Container_MouseMove(object sender, MouseEventArgs e)
{
// check if we have a draw designer currently selected
if(_automation.CurrentDesigner != null && _automation.CurrentDesigner is AnnDrawDesigner)
{
// check if we are over the rectangle 100,100 to 200,200
Rect rc = new Rect(100, 100, 100, 100);
if(rc.Contains(e.GetPosition(_automation.Container)))
_automation.Cancel();
}
}
using Leadtools.Windows.Controls;
using Leadtools.Windows.Annotations;
using Leadtools.Examples;
using Leadtools.Silverlight.Demos;
private void AnnAutomation_Cancel()
{
// subclass to the viewer mouse move event
// _automation is an AnnAutomation object
_automation.Container.MouseMove += new MouseEventHandler(Container_MouseMove);
}
private void Container_MouseMove(object sender, MouseEventArgs e)
{
// check if we have a draw designer currently selected
if(_automation.CurrentDesigner != null && _automation.CurrentDesigner is AnnDrawDesigner)
{
// check if we are over the rectangle 100,100 to 200,200
Rect rc = new Rect(100, 100, 100, 100);
if(rc.Contains(e.GetPosition(_automation.Container)))
_automation.Cancel();
}
}
Imports Leadtools.Windows.Controls
Imports Leadtools.Windows.Annotations
Imports Leadtools.Silverlight.Demos
Private Sub AnnAutomation_Cancel()
' subclass to the viewer mouse move event
' _automation is an AnnAutomation object
AddHandler _automation.Container.MouseMove, AddressOf Container_MouseMove
End Sub
Private Sub Container_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs)
' check if we have a draw designer currently selected
If Not _automation.CurrentDesigner Is Nothing AndAlso TypeOf _automation.CurrentDesigner Is AnnDrawDesigner Then
' check if we are over the rectangle 100,100 to 200,200
Dim rc As Rect = New Rect(100, 100, 100, 100)
If rc.Contains(e.GetPosition(_automation.Container)) Then
_automation.Cancel()
End If
End If
End Sub