Solved

Scroll TRichEdit to last line.

Posted on 2000-04-30
2
210 Views
Last Modified: 2010-04-04
I have a TRichEdit and I wanna scroll it so the last line is visible using the OnChange event.

Anyone?
0
Comment
Question by:Psylord
2 Comments
 
LVL 3

Accepted Solution

by:
shenqw earned 10 total points
Comment Utility
procedure TForm1.RichEdit1Change(Sender: TObject);
begin
  RichEdit1.SelStart:=Length(RichEdit1.Lines.Text);
  RichEdit1.Perform(EM_ScrollCaret,0,0);
end;
0
 

Author Comment

by:Psylord
Comment Utility
Excellent. :)
0

Featured Post

Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

Join & Write a Comment

Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…
In this tutorial you'll learn about bandwidth monitoring with flows and packet sniffing with our network monitoring solution PRTG Network Monitor (https://www.paessler.com/prtg). If you're interested in additional methods for monitoring bandwidt…

763 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now