Inicio > Delphi, Ejemplos > Convertir un Menu en un TreeView

Convertir un Menu en un TreeView

Domingo, 24 de Febrero de 2008 Dejar un comentario Ir a comentarios
Share Button

En este ejemplo se muestra de forma sencilla cómo “pasar” o convertir un Menu existente (componente TMainMenu) en un TTreeView; Conservando la jerarquía de los elementos y asignando las imágenes que ya existan en el ejemplo.

Imagen del ejemplo

Download Descargar ejemplo

Share Button
Categories: Delphi, Ejemplos Tags: , ,
  1. defcon1_es
    Martes, 23 de Febrero de 2010 a las 18:10 | #1

    Muy buen ejemplo para explicar la recursividad.

    Ahora faltaría (a modo de ejercicio) hacer el proceso inverso, es decir, dado un TreeView, cargar un Mainmenu.

  2. Neftalí
    Miércoles, 24 de Febrero de 2010 a las 08:37 | #2

    Hola.
    En esta otra entrada tienes cómo crear un menú a partir de un texto almacenado en un Memo:
    http://neftali.clubdelphi.com/?p=182

    El proceso de creación es el mismo si usas un Treeview que si usas un memo, así que con unos cambios mínimos puedes adaptarlo para lo que comentas.

    Un saludo.

  3. defcon1_es
    Miércoles, 24 de Febrero de 2010 a las 13:12 | #3

    Tenías razón, con unos pocos cambios he conseguido cargar un Mainmenu a partir de un Treeview.

    La pega es que la clase TTreeNode tiene pocas propiedades/métodos/eventos comparada con la clase TMenuItem, como por ejemplo las propiedades Hint, y Action, y el evento OnClick.

    Creo que para resolver esto último, puedo usar la idea de las Clases interpuestas de Ian Marteens para engañar a Delphi.

  1. Sin trackbacks aún.
What is 16 + 18 ?
Please leave these two fields as-is:
IMPORTANTE! Para continuar, debes contestar la pregunta anterior (para evitar SPAM) :-)