Treeview in RichEdit kopieren

[julchen]

Hallo,

ich möchte den Inhalt einer TreeView an ein RichEdit übergeben.
Doch das funktioniert so nicht und ich weiss nicht, warum?

Delphi-Quellcode:

var
        i: integer;
begin
     For i := 0 to JvTreeView1.Items.Count - 1 do
     begin
       JvTreeView1.Items[i].Text := '[url="' + JvTreeView1.Items.Item[i].Text + '"]' + JvTreeView1.Items.Item[i].Text + '[/url]';
       JvRichEdit1.Lines.Text := JvTreeView1.Items[i].Text;
     end;
end;