[Stalker2-42]

Здравствуйте.

Создаю TreeView и заполняю его (Не ругайтесь, я не так давно начал изучать API):

Код:

var
   tvins : tagTVINSERTSTRUCT;
   htr : array of HTREEITEM;
   tvi : tagTVITEM;
   I : Integer;

..........

TV := CreateWindowEx(0 , WC_TREEVIEW, '1', WS_CHILD or WS_VISIBLE or TVS_SHOWSELALWAYS
                or TVS_HASBUTTONS or TVS_HASLINES or TVS_LINESATROOT , 0, 0, 250, 300,Wnd, TVID, HInstance, nil);

SendMessage(TV, TVM_SETEXTENDEDSTYLE, 0, TVS_EX_DOUBLEBUFFER{ or TVS_EX_FADEINOUTEXPANDOS});


tvi.mask := TVIF_IMAGE or TVIF_TEXT or TVIF_SELECTEDIMAGE;    //описание структуры смотри в MSDN

for I := 0 to 9 do
  begin
     tvi.pszText := PChar('Главный узел №   ' + IntToStr(I));
     tvins.item := tvi;
     tvins.hInsertAfter := TVI_LAST;
     tvins.hParent := TVI_ROOT;
     SetLength(htr, length(htr) + 1);
     htr[i] := TreeView_InsertItem(TV, tvins);
  end;
for I := 0 to 5 do
  begin
     tvi.pszText := PChar('Дочерний item №   ' + IntToStr(I));
     tvins.item := tvi;
          //  tvins.hInsertAfter := TVI_LAST;
      tvins.hParent := htr[5];
      TreeView_InsertItem(TV, tvins);
  end;

получилось вот что:
TreeView.png


Но я не пойму как добавить в тот или иной узел, как узнать HTREEITEM "Главного узла № любой" и добавить или удалить?

В справку MSDN не отправляйте, на основе этой справки и работаю, но что-то не пойму.