Autor Téma: TreeView  (Přečteno 124 krát)

Offline AlienStar

  • Plnoletý
  • ***
  • Příspěvků: 101
  • Karma: 2
TreeView
« kdy: 06-07-2019, 13:09:55 »
Ahoj.

Mám strukturu

Adresa1
  |
   -- pol1
   -- pol2
Adresa2
  |
   -- pol1
   
Adresa3
  |
   -- pol1
   -- pol2

Jak mám udělat, když chci přidat další položku pod "Adresa2"

TreeView1.Items.AddChild(  ???? jak odkázat na položku 'Adresa2' ???  , 'pol2');

... a můj druhý dotaz.
Jak to zadám aby byla na prvním místě:

Adresa2
  |
   -- pol2
   -- pol1

díky
« Poslední změna: 06-07-2019, 13:13:25 od AlienStar »

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2329
  • Karma: 102
    • Verze Delphi: D5,D2007, DXE, DXE2 + 2 poslední (Tokyo)
    • O Delphi v češtině
Re:TreeView
« Odpověď #1 kdy: 06-07-2019, 22:40:10 »
Kód: Delphi [Vybrat]
  1. var
  2.   tn, tn2, tn3: TTreeNode;
  3. begin
  4.   tn := TreeView1.Items.AddChild(nil, 'Adresa1');
  5.   tn2 := TreeView1.Items.AddChild(tn, 'pol1');
  6.    TreeView1.Items.AddChild(tn, 'pol2');
  7.   tn3 := TreeView1.Items.AddChild(tn2, 'pol1_1');
  8.    TreeView1.Items.AddChildFirst(tn, 'pol0');
  9.  
Embarcadero MVP - Czech republic