Description

This event runs when a text is made current.

Syntax

Code

This code is available in the PageDesignerAddIn Class in the Page.Vb file within FredSystemAddInExpress project.

  Public Sub OnSelectCurrentTxtDlg() Implements IFredEvent.OnSelectCurrentTxtDlg

    Dim res As Integer = Utils.OpenTextDlgBase(FredApp.AppBase.Windows.Item(0), My.Resources.IDS_SELTEXT, False)(0)

    If res > 0 Then

      Fred.TxtSelect(res)

    End If

  End Sub

Context

Fred application dispatcher events