neu eingefügter Text anzeigen

[Thomas Hopf]

Hallo,

wie kann ich in einem RichEdit Feld den neu eingefügten Text anzeigen lassen wenn er über die Fensterhöhe des RichEdit Textfelds hinausragt? Der Scrollbalken bleibt oben stehen und wird nicht wie bei einem MemoFeld automatisch nach unten gezogen. Wie bekomme ich diesen Automatismus in mein RichEdit?

Gruß

Thomas

[dschensky]

Thomas,

<pre>
RichEdit1->SelStart = SendMessage(RichEdit1->Handle, EM_LINEINDEX,
RichEdit1->Lines->Count - 1, 0);
SendMessage(RichEdit1->Handle, EM_SCROLLCARET, 0, 0);
</pre>

(quelle: borland.public.cppbuilder.vcl.components.using)

Gruß,<br>
Ja

[Thomas Hopf]

Hi,

in welcher Funktion solll ich das einfügen? OnPaint, OnShow, OnChange,.....

Thoma

[Jochen Reichenberg]

Wenn Du nicht sehr viel Text reinschreibst, kannst Du vor dem Schreiben in das TRichEdit folgende Zeile eingeben:
<PRE>
if (RichEdit1->CanFocus())
RichEdit1->SetFocus();
</PRE>
Wenn das RichEdit den Fokus hat, wird automatisch gescrollt. Dazu muß (glaube ich) die Eigenschaft ScrollBars = ssBoth, mindestens aber auf ssVertical stehen. Der Befehl SetFocus() sollte auch nur EINMAL aufgerufen werden (nicht permanent in einer Schleife...).

Aber Vorsicht, wenn dort sehr viel Text, sehr schnell hintereinander eingegeben wird (z.B. in einer Schleife), ist das sehr langsam...

Joche

[Thomas Hopf]

Danke! Es hat geklappt!

Gruß

Thoma