RichEdit: neue farbige Zeile vorne einfügen?

[Helmi]

Hallo,

danke für eure Hilfe!

jetzt gehts!

Meine Procedure schaut jetzt so aus:

Delphi-Quellcode:

procedure TForm1.Meldung_anzeigen(Meldungstext: String; Farbe: TColor); 
begin 
  with RichEdit1 do 
    begin 
      Lines.Insert(0, Meldungstext);
      SelStart            := 0;
      SelLength           := length(Meldungstext);
      SelAttributes.Color := Farbe;
      SelStart            := 0;
    end; 
end;

Ach ja, ich hab nach "SelAttributes.Color" noch ein "SelStart := 0" eingefügt, weil sonst der Text markiert war