EnsureVisible

' Gambas class file

'by postapase

Public Sub Form_Open()
 Me.Center
End

Public Sub btnEnviar_Click()
  If RadioButton1ActivarEnsureVisible.Value = True Then
     TextArea1.Text &= "EnsureVisible activado" & gb.NewLine
     TextArea1.EnsureVisible ' se ve siempre el último  mensaje del textArea
  Else 
     TextArea1.Text &= "EnsureVisible desactivado" & gb.NewLine
     ' aqui como no se usa el metodo EnsureVisible de TextArea1 no se vera
     ' el último o últimos mensajes escritos.
  Endif
End

Nota: gracias a jguardon aprendí este detalle importante y lo comparto con ustedes con un simple ejemplo gráfico.

Descargar código fuente: ensurevisible-0.0.1.tar.gz