Scrollbar og color

Jeg har sidst oprettet smp: http://www.eksperten.dk/spm/156011
Hvor jeg manglede en kommando til at få markøren til at blive i tedit, selvom der skete noget i richedit..jeg fjernede så onchange koden, og så gad min scrollbar ikke at følge med teksten ned i richedit længere..
Hvordan får jeg den til at følge med, når der sker noget nyt i richedit?

Desuden vil jeg gerne vide hvordan jeg indsætter farve på min richedit..jeg har denne kode til at give teksten farve, men jeg kan ikke få farven fra tedit til richedit:

procedure TForm1.Button1Click(Sender: TObject);
begin
if colordialog1.Execute then
edit1.font.Color := colordialog1.Color;
end;
denne giver så farve til tedit teksten, men mangler at kunne smidde resultatet ud på richedit, nogen ide?

WIl/