Como hago un Menu desplegable dinamico?

[CamiloVI]

Hola gente que tal?

Tengo un dilema que me esta costando horas....
Tengo que hacer un menu desplegable dinamico, en el cual tiene que tener submenus etc... ya que consultara un par de tablas......

Hay alguna herramienta para poder tratar mi dilema o como lo puedo hacer?



Gracias.

[epuigdef]

Debes tener montado el componente TMainMenu y después añadir los elementos de la siguiente manera;

Código Delphi [-]
var a : TMenuItem;
begin
a := TMenuItem.Create(self);
a.Caption := 'dinamico';
a.OnClick := ....
MainMenu1.Items.Insert(0, a);

Edu

[CamiloVI]

Creo que en su dia intente algo semejante, pero no me funciono muy correctamente, de todas maneras probare con tu planteamiento.

[CamiloVI]

Lo que estoy intentando hacer es que segun clique en una determinada zona del formulario me mostrara x datos en forma de menu desplegable, el menu sera creado a partir de una select que me devolvera maestro y detalle.

Una vez desplegado el menu... donde clique en el mismo me devolvera unos datos.


Se complica la cosa.

[epuigdef]

No acabo de entender la problemática. Me puedes postear el código para var lo que ocurre y explicarlo más detalladamente?


Gracias

Edu

[CamiloVI]

intentare explicarme mejor.

Torax
*fractura de tal
*fractura de pascual
paralisis -> *Restriccion tipo i
*Restriccion TIpo II
*problema cardio bla bla
funcion respiratoria -> *Respiracion Tipo i
*Respiracion Tipo ii

Esto seria el popupMenu que agarraria los datos de una sentencia SQL
esta es la idea que llevo que los datos son de la BD y crea un popupMenu que se desplegara cuando clique en un sector de la form.
Con ello quiero decir que añadire tantos campos o submenus que quiera en la BD y el popup los mostrara tal cual esten en la BD.

Gracias.