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;
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