Public Sub SetInteractiveModeCursor( _
   ByVal interactiveMode As RasterViewerInteractiveMode, _
   ByVal idleCursor As Cursor, _
   ByVal workingCursor As Cursor _
) 

Dim instance As RasterImageViewer
Dim interactiveMode As RasterViewerInteractiveMode
Dim idleCursor As Cursor
Dim workingCursor As Cursor
 
instance.SetInteractiveModeCursor(interactiveMode, idleCursor, workingCursor)

public void SetInteractiveModeCursor( 
   RasterViewerInteractiveMode interactiveMode,
   Cursor idleCursor,
   Cursor workingCursor
)

public:
void SetInteractiveModeCursor( 
   RasterViewerInteractiveMode interactiveMode,
   Cursor^ idleCursor,
   Cursor^ workingCursor
) 

<StructLayout(LayoutKind.Sequential, Pack:=1)> _
Private Class ICONINFO
   Public fIcon As Boolean
   Public xHotspot As Integer
   Public yHotspot As Integer
   Public hbmMask As IntPtr
   Public hbmColor As IntPtr
End Class
<DllImport("user32.dll")> _
Private Shared Function CreateIconIndirect(ByVal piconinfo As ICONINFO) As IntPtr
End Function

<DllImport("user32.dll")> _
Private Shared Function GetIconInfo(ByVal hIcon As IntPtr, <Out()> ByRef piconinfo As ICONINFO) As Boolean
End Function

<DllImport("user32.dll")> _
Private Shared Function DestroyIcon(ByVal handle As IntPtr) As Boolean
End Function

Private Sub SetInteractiveModeCursorExample(ByVal viewer As RasterImageViewer)
   Dim idleCursor As Cursor = Cursors.Cross
   Dim workingCursor As Cursor = Nothing

   ' Create an empty cursor to use when the magnifying glass is on
   ' Use the same size as the Cross cursor

   Using btmp As New Bitmap(idleCursor.Size.Width, idleCursor.Size.Height)
      Using g As Graphics = Graphics.FromImage(btmp)
         g.Clear(Color.Transparent)
      End Using

      Dim iconInfo As New ICONINFO()
      Dim hIcon As IntPtr = btmp.GetHicon()
      GetIconInfo(hIcon, iconInfo)
      iconInfo.xHotspot = btmp.Width \ 2
      iconInfo.yHotspot = btmp.Height \ 2
      iconInfo.fIcon = False

      Dim hCursor As IntPtr = CreateIconIndirect(iconInfo)
      workingCursor = New Cursor(hCursor)

      DestroyIcon(hIcon)
   End Using

   viewer.SetInteractiveModeCursor(RasterViewerInteractiveMode.MagnifyGlass, idleCursor, workingCursor)

   ' Not set the interactive mode to magnify glass
   viewer.InteractiveMode = RasterViewerInteractiveMode.MagnifyGlass
End Sub

[StructLayout(LayoutKind.Sequential, Pack = 1)]
private class ICONINFO
{
   public bool fIcon;
   public int xHotspot;
   public int yHotspot;
   public IntPtr hbmMask;
   public IntPtr hbmColor;
}
[DllImport("user32.dll")]
private static extern IntPtr CreateIconIndirect([Out] ICONINFO piconinfo);

[DllImport("user32.dll")]
private static extern bool GetIconInfo(IntPtr hIcon, [In, Out] ICONINFO piconinfo);

[DllImport("user32.dll")]
private extern static bool DestroyIcon(IntPtr handle);

private void SetInteractiveModeCursorExample(RasterImageViewer viewer)
{
   Cursor idleCursor = Cursors.Cross;
   Cursor workingCursor = null;

   // Create an empty cursor to use when the magnifying glass is on
   // Use the same size as the Cross cursor

   using(Bitmap btmp = new Bitmap(idleCursor.Size.Width, idleCursor.Size.Height))
   {
      using(Graphics g = Graphics.FromImage(btmp))
      {
         g.Clear(Color.Transparent);
      }

      ICONINFO iconInfo = new ICONINFO();
      IntPtr hIcon = btmp.GetHicon();
      GetIconInfo(hIcon, iconInfo);
      iconInfo.xHotspot = btmp.Width / 2;
      iconInfo.yHotspot = btmp.Height / 2;
      iconInfo.fIcon = false;

      IntPtr hCursor = CreateIconIndirect(iconInfo);
      workingCursor = new Cursor(hCursor);

      DestroyIcon(hIcon);
   }

   viewer.SetInteractiveModeCursor(RasterViewerInteractiveMode.MagnifyGlass, idleCursor, workingCursor);

   // Not set the interactive mode to magnify glass
   viewer.InteractiveMode = RasterViewerInteractiveMode.MagnifyGlass;
}