Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Ans Textende scrollen
Autor: skymaster
Datum: 25.11.05 16:48
Hallo Leute ich brauch nochmal Eure Hilfe, leider klapptdiese Variante nicht liegt es vielleicht daran das ich eine RichTextBox verwende? Option Explicit Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByRef lParam As Any) As Long Private Const WM_GETTEXTLENGTH As Long = &HE Private Const EM_SETSEL As Long = &HB1 Private Sub Command1_Click() Dim lLen As Long lLen = SendMessage(RichTextBox1.hwnd, WM_GETTEXTLENGTH, 0, ByVal 0&) SendMessage RichTextBox1.hwnd, EM_SETSEL, lLen, ByVal lLen RichTextBox1.SetFocus End Sub Vielen Dank!

Ans Textende scrollen	1.316	skymaster	02.11.05 23:34
Re: Ans Textende scrollen	1.152	OldMan	03.11.05 10:03
Re: Ans Textende scrollen	1.172	Wolf mit Schnul...	03.11.05 10:18
Re: Ans Textende scrollen	1.131	skymaster	03.11.05 15:30
Re: Ans Textende scrollen	1.250	skymaster	25.11.05 16:48

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen