' 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
