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;

[toms]

Hallo,

Ich verstehe nicht ganz,


1. jedem TreeView Item ein "'<a href=" zuweist
2. mit JvRichEdit1.Lines.Text := ... jedesmal den gesamten Text im RichEdit überschreibst.

Möchtest du so etwas in dieser Art?

Delphi-Quellcode:

var
  i: integer;
begin
  with JvTreeView1.Items do
     for i := 0 to Pred(Count) do
     begin
       JvRichEdit1.Lines.Add('[url="' + Item[i].Text + '"]' + Item[i].Text + '[/url]');
     end;
end;

[julchen]

Vielen Dank,

Deine Lösung ist sogar noch besser als mein Gedankengang!
Ich sehe im Moment aber noch nicht, wo bei mir der Fehler liegt und wo ich das RichEdit überschreibe

[toms]

Zitat von julchen:

Ich sehe im Moment aber noch nicht, wo bei mir der Fehler liegt und wo ich das RichEdit überschreibe

Siehe oben:

Zitat von toms:

2. mit JvRichEdit1.Lines.Text := ... jedesmal den gesamten Text im RichEdit überschreibst.