Texto en richtextbox

[Adrylek]

Hola, tengo una pregunta un poco estúpida pero bastante molesta.
Tengo un richtextbox donde aparece mucha información rápidamente, pero el problema es que la barra para subir y bajar siempre se queda arriba, y la nueva información se queda abajo.
Es muy molesto siempre que quieres cojer algo tener que mover la barra hacia abajo, así que la pregunta es cómo podría hacer para que se quedara sola abajo.

[engel lex]

no se nada de .net, pero según google esto podría servir

Código [Seleccionar] Expandir

richTextBox.ScrollToEnd();

Código [Seleccionar] Expandir

richTextBox.SelectionStart = richTextBox.Text.Length;

Código [Seleccionar] Expandir

richTextBox.ScrollToCaret();

según leo la ultima es la mejor opción... prueba esas y si no te sirven espera a ver si alguien más se pasa por aquí

[Adrylek]

Gracias, la última opción me ha funcionado.

[engel lex]

debido a que solo copié texto y no se de lo que hablo, recomiendo que pruebes tu programa viendo el administrador de tareas de windows asegurandote que no consuma demasiado procesador si lo hace, podrías usar un timer o algo así que a 100ms sería suficiente para el ojo humano

[El Benjo]

El código que te ha dado Lex colócalo dentro del evento 'TextChanged' del RichTextBox en vez de usar el timer. De esta manera te aseguras de que se ejecute el código sólo cuando haya información nueva.

[Eleкtro]

Hay que tener en cuenta que el método sugerido por @engel lex, "ScrollToCaret", como su propio nombre indica lo único que hace es deslizar el ScrollBar hasta la posición del Caret (el Caret es el cursor de texto) así que usarlo por si solo no sería una solución viable según que caso, ya que si no modificas la posición del Caret, siempre va a escrollear a la misma posición

Si estás usando el método "AppendText" para adjuntar texto:

Código (vbnet) [Seleccionar] Expandir

RichTextBox1.AppendText("Texto")
Entonces una llamada a "ScrollToCaret" será suficiente, porque el método "AppendText", además de adjuntar texto, pone la posición del Caret al final del texto adjuntado.

Por otro lado, si estás adjuntando texto de esta manera:

Código (vbnet) [Seleccionar] Expandir

RichTextBox1.Text &= "Texto"
Entonces necesitas modificar manualmente la posición del Caret, para poder Scrollear hacia abajo.

Por eso, según el caso, te sugiero una de las siguientes soluciones, aunque de todas formas la última solución deberías evitarla siempre que puedas, ya que lo correcto es usar el método "AppendText":

· .AppendText:

Código (vbnet) [Seleccionar] Expandir

   Private Sub RichTextBox_AutoScroll(ByVal sender As Object, ByVal e As EventArgs) _
   Handles RichTextBox1.TextChanged

       If CBool(sender.TextLength) Then
           sender.ScrollToCaret()
       End If

   End Sub

· .Text &=

Código (vbnet) [Seleccionar] Expandir

   Private Sub RichTextBox_AutoScroll(ByVal sender As Object, ByVal e As EventArgs) _
   Handles RichTextBox1.TextChanged

       Dim _TextLength As Integer = sender.TextLength

       With sender

           If CBool(_TextLength) Then

               .SelectionStart = _TextLength
               .ScrollToCaret()

           End If

       End With

   End Sub

Nota: Obviamente, si piensas escribir manualmente en el Control, entonces la solución con el método ".Text &=" de poco sirve. ya que estoy enviando el Caret al final del texto, siempre.

Saludos