DesktopTextControl.AddText

Method

DesktopTextControl.AddText(text as String)

New in 2021r3

Supported for all project types and targets.

Adds the passed text to the current Text. Call AddText rather than using the + operator to add text to existing text.

Example

This example reads a text field in blocks of 1000 characters using Read.

Var f As FolderItem
Var dlg As OpenDialog
Var t As TextInputStream

// create a new openDialog
dlg = New OpenFileDialog
// set what type of file it looks for
dlg.Filter = "text/plain"

// run the dialog
f = dlg.ShowModal

// check to make sure the user didn't click cancel
If f <> Nil Then
Try
t = TextInputStream.Open(f)
// Read all of the text, 1000 characters at a time
// into the TextField
While Not t.EndOfFile
myTextArea.AddText(t.Read(1000, Encodings.UTF8))
Wend
t.Close
Catch error As IOException
// the file could not be a read as a text file
MessageBox("The selected file is not a text file. Error: " + error.Message)
End If
Else
// the user clicked cancel... just ignore it
End If