FZ_FormBase.OpenTextData

Performs an open processing of a message data

Public Sub OpenTextData( _
   ByVal ident As String _
) As Object

Public Sub OpenTextData( _
   ByVal ident As String, _
   ByVal messageNo As Integer _
) As IntPtr

Parameters

ident	Identification name of the message data to be opened.	Input
messageNo	Message data number	Input

Return Value

Return the pointer to the string data.

Description

Opens the message data specified by the identification name.

Opening a message data by this method enables you to use the GetText() method (see

GetText ) to read the message data.

Example

   Private Sub Form_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim message As String
        Dim pf1 As IntPtr

        ' Open the message data
        pf1 = OpenTextData(FZ_SharedClass.IDENT_FZMAIN, 0)
        ' Get the message
        message = GetText(pf1, "Message0")

        Using pf2 As New FZ_PanDAForm.FZ_PanDAForm
                pf2.OpenTextData(FZ_SharedClass.IDENT_FZMAIN)
                message = GetText(pf2, "Message0")
        End Using

  End Sub