"palcowanie" :D w TMemo

Witam!
Mam nastepujacy problem : robie cos takiego ze dopisuje po jednej literce do memo, kazda literka co 100ms (w timerze). I teraz jest problem jak tekst dochodzi do konca memo, i memo ma zaczac zjedzac w dol ;) Poniewaz tego nie robi.
Jedyne roziwazanie jakie mi sie udalo znaleŹĆ to takie cos po kazdzej literce.

 Memo1.SelStart := length(memo1.text)-1;
 Memo1.SelLength := 1;

Powoduje to zaznaczenie ostatniego znaku w memo i tym samym zjechanie "scrolla" na dol. Niestety... kiedy nastepny znak jest pisany suwak z powrotem wraca na gore. Tym samym tekst jest ciagle przewijany w gore i w dol przez co miga.
Moje pytanie brzmi - jak zrobic zeby suwak caly czas byl na dole? Zeby tekst nie migal. Pomocy.

http://4programmers.net/Forum/viewtopic.php?id=59369

http://4programmers.net/Forum/viewtopic.php?id=59369

sorry czy ty w ogole przeczytales moj post? przeciez ja doskonale wiem jak przescrollowac tekst do konca memo

memo2.Perform(WM_VSCROLL,SB_BOTTOM,0)

daje dokladnie ten sam efekt co:

Memo2.SelStart := length(memo2.text)-1;
Memo2.SelLength := 1; 

Mi chodzi oto jak zrobic zeby tekst nie migal bo ciagle jest scrollowany przeze mnie na dol - i automatycznie po dopisaniu litery na gore.. jak zrobic by tak nie bylo?

Mea culpa. W timerze dodawaj tak :

    Memo1.Lines[Memo1.Lines.Count - 1] := Memo1.Lines[Memo1.Lines.Count - 1] + literka;

w sumie nadal troche miga. Najbardziej kiedy zjedza linijke w dol.