Creacion de menus dinamicos desde una base de datos firebird
Hola a todos
Ya se que es un tema hablado muchas veces , pero tengo solo una duda Tengo un menu que obviamente tiene las opciones de mi sistema , quiero personalisar ese menu con los llamados accesos directos , pues bien hasta ahi todo esta bien , lo grabo en una tabla de la base de datos y cuando salgo del menu tengo que volver a recuperar esos datos para volver a armar el menu de accesos directos , lo consigo bien , pero en su opcion de onclik tengo un error que espero ustedes me ayuden con sus conocientos Ejemplo procedure PopupMenuItemsClick(Sender: TObject); // defino
MI pregunta es Como puedo realizar en tiempo de ejecucion asignarle el evento onclik para que se ejecute cada opcion correctamente Gracias por su tiempo Nota: ahora lo que hago es Pero claro no es lo correpto pero funciona :confused: |
Echale un vistazo a esta entrada y al ejemplo correspondiente a ver si te sirve de ayuda.
¿Has probado a asignar la Action correspondiente? CReo que ya lo tienes todo. Si tienes ya programadas las acciones que necesitas ejecutar, en el evento PopupMenuItemsClick, sólo debes ejecutar la acción que necesitas según el ítem que te han seleccionado (pare eso tienes el Sender). |
Gracias por responder
Te comento que si ya probe con sender , pero me sale un error de stack overflow , como si me deja usar la opcion de name queria poner en sender(nombre del menu) , pero no me deja pues me dice que debe ser un objeto no un objetonombre y es ahi donde me quede truncado |
Debo indicarte algo , que cuando estoy en el sistema y doy a crear acceso directo este se ejecuta sin problemas , el problema radica cuando salgo del programa y quiero crear el menu desde la tabla ahi si me da el problema que te comento
Te indico que es lo que hago desde el principio // con el click derecho del mouse creo la accion
//El proceso de creacion del menu y insercion en la tabla
Ahi se ejecuta perfecto , porque estoy dentro del sistema , pero cuando salgo la idea es cargar el menu que esta grabado en la base y es ahi donde me da el error Te agradesco por tu tiempo , espero me puedas dar una mano |
Hola nuevamente
lo probe asi
Me sale un error de AV |
Cita:
En lugar de asignar eventos, asigna la Action. Crea un ActionList en tu formulario. Crea la Action que necesites y programa en ellas el código para cada una. En el procedimiento donde creas los items de menú deberás asignar a cada ítem su action correspondiente. ¿Cómo saber qué action va con cada ítem? Pues por ejemplo, guardando en la Base de Datos junto a cada elemento de menú el nombre de la Action que le corresponde (como haces con el Caption o con el Name). Cuando creas el elemento de menú, busca la action por el nombre que tienes almacenado y se la asignas. De esta forma te olvidas de los OnClick. |
La franja horaria es GMT +2. Ahora son las 21:10:44. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi