Fehler beim einfügen in RichEdit

[Nalincah]

1 RichEdit (RichEdit1) und ein Button (Button1):

Prozedure des Buttons:

Code:

procedure TForm1.Button5Click(Sender: TObject);
begin
  RichEdit1.Lines.Text := '{\rtf1\ansi\ansicpg1252\deff0\deflang1031{\fonttbl{\f0\fdecor\fprq2\fcharset0 Bauhaus 93;}{\f1\fswiss\fcharset0 Arial;}}';
  RichEdit1.Lines.Text := RichEdit1.Lines.Text + '{\*\generator Msftedit 5.41.15.1503;}\viewkind4\uc1\pard\ul\b\i\f0\fs28 Hallo\ulnone\b0\i0\f1\fs20\par';
  RichEdit1.Lines.Text := RichEdit1.Lines.Text + '}';
end;

Gibt diesen Fehler aus:

Zitat:

Fehler beim Einfügen von RichEdit-Zeile.

Woran liegt das?