关于他TreeView选中其中的item,执行一段代码,应该怎么写?

Question

关于他TreeView选中其中的item,执行一段代码,应该怎么写?

Answer 1

关于他TreeView选中其中的item,执行一段代码,应该怎么写? 
什么意思？？

Answer 2

把需要执行的代码定义在ONChange事件中.
当他选中其中的Item时就会执行这段代码..
或者
将需要执行的代码定义ListView的OnClick事件中,并且在OnClick事件中先判断ListView.Item.Selected属性是否为Nil,如果不为Nil则选中了一个Itme,定义选中Item后要执行的代码就行了.

Answer 3

procedure TfrmUnitSel.UnitTreeChange(Sender: TObject; Node: TTreeNode);
begin
  if Node.Level=0 then BitBtn1.Enabled :=False
  else  BitBtn1.Enabled :=True;
end;免费送图标变化代码
procedure TfrmUnitSel.UnitTreeGetImageIndex(Sender: TObject;
  Node: TTreeNode);
begin
  if Node.HasChildren then
    if Node.Expanded then
      Node.ImageIndex := 2
    else
      Node.ImageIndex := 0
  else
    Node.ImageIndex := 1;
end;procedure TfrmUnitSel.UnitTreeGetSelectedIndex(Sender: TObject;
  Node: TTreeNode);
begin
  Node.SelectedIndex := Node.ImageIndex;
end;