treeview as vertical menu - how to get name of associated menuitem with treeview in delphi

Question

I am working on changing TMainMenu to TTreeview i.e.vertical menu. I am able to create the TTreeview and by calling AddChildObject Ihave node.data. I was able to call onClic