TextCursor in RichTextBox

[Richard]

When you give focus to a RichTextBox, then it goes to the textCursor, but i
don't want to give the richtextbox focus, cause there is being written a lot
in it, and I have to do something else at the same time, then if I don't
give it focus, and I add some text to it, then it don't automaticly scrolls
down to the textcursor, is there a way to make the RichTextBox scroll down
to the textcursor, without giving it focus??

Richard

[Jared]

use the scrolltocaret method

"Richard" <s@b.k> wrote in message
news:uy******** ******@TK2MSFTN GP12.phx.gbl...

When you give focus to a RichTextBox, then it goes to the textCursor, but
i
don't want to give the richtextbox focus, cause there is being written a
lot
in it, and I have to do something else at the same time, then if I don't
give it focus, and I add some text to it, then it don't automaticly
scrolls
down to the textcursor, is there a way to make the RichTextBox scroll down
to the textcursor, without giving it focus??

Richard

[Richard]

"Jared" <VB***********@ email.com> skrev i en meddelelse
news:10******** *****@corp.supe rnews.com...

use the scrolltocaret method

It doesn't help, if it doesn't have focus, then it won't scroll down,

Richard

[Jared]

Richard, I don't think that is true
Add a new form
1 place a textbox, a button and a richtextbox on the form and add the
following code.
Now, examine the output window.

My Output:
Got Focus

'My button control was pressed

Lost Focus

Got Focus

'Reset the focus to the textbox to make a point

Line Number 1

Line Number 2

Line Number 3

Line Number 4

Line Number 5

'Occurred when I incpected the output window and moved focus to the DevEnv

Lost Focus
Private Sub Button1_Click(B yVal sender As System.Object, ByVal e As
System.EventArg s) Handles Button1.Click

Me.TextBox1.Foc us()

For counter As Integer = 1 To 5

Me.RichTextBox1 .AppendText("Li ne Number " & counter & vbCrLf)

Console.WriteLi ne("Line Number " & counter)

Me.RichTextBox1 .ScrollToCaret( )

Next

End Sub

Private Sub TextBox1_LostFo cus(ByVal sender As Object, ByVal e As
System.EventArg s) Handles TextBox1.LostFo cus

Console.WriteLi ne("Lost Focus")

End Sub

Private Sub Textbox1_GotFoc us(ByVal sender As Object, ByVal e As
System.EventArg s) Handles TextBox1.GotFoc us

Console.WriteLi ne("Got Focus")

End Sub
"Richard" <s@b.k> wrote in message
news:%2******** ********@TK2MSF TNGP10.phx.gbl. ..

"Jared" <VB***********@ email.com> skrev i en meddelelse
news:10******** *****@corp.supe rnews.com...

use the scrolltocaret method

It doesn't help, if it doesn't have focus, then it won't scroll down,

Richard

[Herfried K. Wagner [MVP]]

* "Richard" <s@b.k> scripsit:

When you give focus to a RichTextBox, then it goes to the textCursor, but i
don't want to give the richtextbox focus, cause there is being written a lot
in it, and I have to do something else at the same time, then if I don't
give it focus, and I add some text to it, then it don't automaticly scrolls
down to the textcursor, is there a way to make the RichTextBox scroll down
to the textcursor, without giving it focus??

If you want to scroll to the end of the text:

From my FAQ:

When using a RichTextBox control for displaying logging information, it is
useful to scroll the recently added line into view. There are two ways to
accomplish this:

\\\
Private Const WM_VSCROLL As Int32 = &H115
Private Const SB_BOTTOM As Int32 = 7

Private Declare Auto Function SendMessage Lib "user32.dll " ( _
ByVal hwnd As IntPtr, _
ByVal wMsg As Int32, _
ByVal wParam As Int32, _
ByVal lParam As Int32 _
) As Int32

Private Sub AddLine(ByVal Destination As RichTextBox, ByVal Text As String)
With Destination
.AppendText(Tex t & ControlChars.Ne wLine)
SendMessage(Des tination.Handle , WM_VSCROLL, SB_BOTTOM, 0)
End With
End Sub
///

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Richard]

Thank you SO much, that was just what I was searching for.

QUOTE: "From my FAQ:"

Where Can I find your FAQ??
Yet again, thank you for the help.

Richard

[Herfried K. Wagner [MVP]]

* "Richard" <s@b.k> scripsit:

Thank you SO much, that was just what I was searching for.

QUOTE: "From my FAQ:"

Where Can I find your FAQ??

<URL:http://dotnet.mvps.org/dotnet/faqs/>

Notice that the index of the FAQ is currently in German, the articles
linked by the index are written in English :-).

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Richard]

> Notice that the index of the FAQ is currently in German, the articles

linked by the index are written in English :-).

ok, that's not the easiest to read (The german headlines), but thanks
anyway,