Description

Returns the source view object.

Syntax

designer

Page designer, defined by Dim designer = TryCast(idesigner, IPageDesigner) or by Protected Designer As IPageDesigner (in page.vb)

Example

 <ShellCommand(CanExecute:="Ena_IsEditingText")> _

Public Sub MouseWheel()

  If (PageDesigner.TextScroll = False) Then

    Dim shell As IShellApp = PageDesigner.App

    Dim page As IPageDisp = PageDesigner.PageDisp

    FredUtils.MouseWheel(shell, page)

  Else

    PageDesigner.SrcView.ScrollWnd(TedApp.ClientApp().MouseWheelDelta)

  End If

End Sub