Memo beim Setzen von SelStart mitscrollen lassen

[mirage228]

Hallo,

ich habe ein Memo, das einen längeren Text enhält, sodass dieser nicht mehr auf eine Seite passt. Nun setze ich SelStart auf eine nicht sichtbare Position (also irgendwo in den Text, der weiter "unten" ist).

Nun habe ich das Problem, dass der Caret auch dahin springt, aber das Memo nicht mitscrollt und man selbst zur der entsprechenden Zeile scrollen muss.

Meine Frage lautet nun :) :
Wie kann ich beim Setzen von SelStart das Memo an die entsprechende Text Position mitscrollen lassen?

mfG
mirage228

[jfheins]

Und wer hat's gefunden ?

...zu einer bestimmten Position in einem TRichEdit/ TMemo scrollen?
...ein TMemo automatisch scrollen lassen?

[mirage228]

Zitat:

Zitat von jfheins

Und wer hat's gefunden ?

...zu einer bestimmten Position in einem TRichEdit/ TMemo scrollen?
...ein TMemo automatisch scrollen lassen?

Hi,

danke sehr :) Hatte auch schon gesucht, aber habs nicht gefunden :gruebel:

Auf jeden Fall geht es nach dem Setzen von SelStart hiermit:

Delphi-Quellcode:

Memo1.Perform(EM_SCROLLCARET, 0, 0);

mfG
mirage228