[Velia]

Hola
Estoy ingresando los nombres y los objetos de un MainMenu a un TreeView y por cada nodo que ingreso al treeView pongo esto

Código Delphi [-]
 for k:=0 to MenuPrincipal.Items.Count -1 do
  Begin

    Padre := TreeView1.Items.AddObject(nil, MenuPrincipal.Items[k].Caption, MenuPrincipal.Items[k]);
    Padre.StateIndex:= 1; //Muestra Chekbox bacio (Descactivado)

   //El que sigue es un procedimiento q me sigue cargando los hijos del nodo para que se complete el arbol correspondiente al MenuPrincipal
    CargarItemsTreeView(MenuPrincipal.Items[k], Padre);
  End;
  TreeView1.FullExpand;

Ahora mi problema es que luego necesito acceder al objeto que guarde en cada nodo para obtener el nombre del Item del MenuPrincipal. Intente castearlo de esta forma pero no resulta me devuelve ell titulo del Nodo.Se que con un ComboBox se puede asi

Código Delphi [-]

TMainMenu(combobox.Items.Objects[(combobox.ItemIndex)]);

pero en el TreeView no sé

Código Delphi [-]

  for k:=0 to TreeView1.Items.Count -1 do
  Begin
    TMainMenu(TreeView1.Items[k]).Name;
  End;

Por favor si alguien podria ayudarme les agradezco estoy trabajando contra reloj como todo programador y esto me esta desesperando un poco.
Saludos Velia