What exactly doesn't work?
I tested it before posting my answer!
This is what I get without
TextArea1.SetSelection(TextArea1.Text.Length, TextArea1.Text.Length)
View attachment 88898
and this is with
TextArea1.SetSelection(TextArea1.Text.Length, TextArea1.Text.Length)
View attachment 88901
That's what I get in my tests, te cursor is at the end and the scrollbar is down!
So where and what is your problem?