Leadtools.WinForms Namespace > RasterImageViewer Class : ZoomToRectangle Method |
'Usage Dim instance As RasterImageViewer Dim rc As Rectangle instance.ZoomToRectangle(rc)
function Leadtools.WinForms.RasterImageViewer.ZoomToRectangle( rc )
Public Sub RasterImageViewer_ZoomToRectangle(ByVal viewer As RasterImageViewer) Dim rectSize As Integer = 200 Dim left As Integer = (viewer.ClientRectangle.Right - viewer.ClientRectangle.Left - rectSize) \ 2 Dim top As Integer = (viewer.ClientRectangle.Bottom - viewer.ClientRectangle.Top - rectSize) \ 2 Dim rcZoom As Rectangle = New Rectangle(left, top, rectSize, rectSize) viewer.ZoomToRectangle(rcZoom) End Sub
public void RasterImageViewer_ZoomToRectangle(RasterImageViewer viewer) { int rectSize = 200; int left = (viewer.ClientRectangle.Right - viewer.ClientRectangle.Left - rectSize) / 2; int top = (viewer.ClientRectangle.Bottom - viewer.ClientRectangle.Top - rectSize) / 2; Rectangle rcZoom = new Rectangle(left, top, rectSize, rectSize); viewer.ZoomToRectangle(rcZoom); }
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2