delphi 如何知道 Treeview,Listview 当前最上面显示的节点

如何知道 Treeview,的节点是根节点

 

 

 

procedure TForm1.TreeView1ContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
    if TreeView1.Selected.IsFirstNode then
       mni_delete.Enabled:=false
    else
    mni_delete.Enabled:=True;
 
end;

来自为知笔记(Wiz)

转载于:https://www.cnblogs.com/xe2011/p/3884356.html