Удаление в tree

[Черничный]

Ребята, не получается ничего! Две кнопки, по нажатию на одну удаляется выбранная только родительская ветка со всеми детьми, по нажатию на другую только выбранное дитё. Дерево двухуровневое.
A
|_b
C
|_d
E
|_f

[AlexandrSid]

А если при нажатии на первую кнопку выбран подчиненный элемент тогда удалять его родителя, если да тогда

if TreeView.selected<>nil then begin
with TreeView1.Selected do begin
  if Parent <> nil then
    Parent.Delete
  else
    Delete;

end;
end;

Для удаления только подчиненного элемента необходимо что бы он был выбран, т.е. проверяешь сначала выбранный элемент. т.к. дерево двухуровное то можно сделать так.

if TreeView1.selected<>nil then begin
with TreeView1.Selected do begin 
 if Level = 1 then
   Delete;
end;
end;

[Ulagay700]

Верно. Нужно очень внимательно selected проверять и контролировать.