TTreeview Выберите пункт и уровень? - PullRequest
Новая
       21

TTreeview Выберите пункт и уровень?

0 голосов
/ 03 января 2011

У меня есть TTreeView

Я добавляю два уровня предметов к 

Test 1 Parent  
  Test 1 Child  
Test 2 Parent  
  Test 2 Child A  
  Test 2 Child B  
  Test 2 Child C

Я пытаюсь включить и отключить кнопки «Добавить», «Редактировать» и «Удалить» в зависимости от выбранного уровня

Пример: 

procedure TfrmMain.UpdateBtns;  
begin  
btnEditParent.Enabled:= (treeview.Focused ) AND (treeview.Selected <> nil);     btnDeleteParent.Enabled:= (treeview.Focused ) AND (treeview.Selected <> nil);  
btnAddChild.Enabled:= (treeview.Focused ) AND (treeview.Selected <> nil);  
btnEditChild.Enabled:= (treeview.Focused ) AND (treeview.Selected <> nil);  
btnDeleteChild.Enabled:= (treeview.Focused ) AND (treeview.Selected <> nil);  
end;

как мне принять во внимание уровни?

1 Ответ

4 голосов
/ 03 января 2011

объект TTreeNode имеет свойство Level 

var
 Node : TTreeNode;
begin
 Node:=TreeView1.Selected;
 //Node.Level //The first Level is 0

end;

, которое вы можете переписать таким образом:

...