B4J Question How can I programmatically scroll text

[TomA]

I have been trying to find a way to scroll text automatically so info appended to the end is always shown without the user having to intervene so that when a line is added, the text scrolls to show it (think computer terminal). Can someone tell me how this might be done?

 

[stari]

With a timer, i think.

 

[Erel]

Method that adds text to a TextArea and scrolls it:

Sub lg(msg As String)
   txtLogs.Text = txtLogs.Text & CRLF & msg
   txtLogs.SetSelection(txtLogs.Text.Length, txtLogs.Text.Length)
End Sub

 

[TomA]

Thanks Erel - works perfectly!

 

[wonder]

txtStatsBox.Text = txtStatsBox.Text & CRLF & ">> Status: Ready." & CRLF  
txtStatsBox.SetSelection(txtStatsBox.Text.Length, txtStatsBox.Text.Length)

This doesn't work for me... Even with Request Focus.
Any solution?

 

[saunwin]

Ummm .. funny Not working for me either

Sub lg(msg As String)
monitor.Text = monitor.Text & CRLF & msg
monitor.SetSelection(monitor.Text.Length, monitor.Text.Length)
End Sub

Do you get to the bottom of this ?

 

[saunwin]

Got it working now. I think it's because I was also writing to the text area from outside this subroutine. Do all text area writes using the subroutine works.

 

[jmon]

You can also use the scrolltop method with Javaobject https://docs.oracle.com/javase/8/javafx/api/javafx/scene/control/TextArea.html#scrollTopProperty so that way no need to chnage the caret position