[Neftali [Germán.Estévez]]

Empezado por karocs

...como puedo crear y destruir popupmenu en tiempo de ejecución es que estoy intentando lo siguiente...colocar en el evento OnClick de una imagen el codigo para crearlo...

Puedes utilizar un código similar a éste que crea el componente y le alñade cuatro opciones...

Código Delphi [-]
  // Crear el componente
  popup := TPopupMenu.Create(nil);
  popup.Name := 'pMenu1';
  // Creamos 4 elementos (la 1ª cadena es el caption, la del final el nombre)
  popup.Items.Add(NewItem('aaaaaaaaaaaaaaaaa',0,False,True,nil,0,'item1'));
  popup.Items.Add(NewItem('bbbbbbbbbbbbbb',0,False,True,nil,0,'item2'));
  popup.Items.Add(NewItem('-',0,False,True,nil,0,'item3'));
  popup.Items.Add(NewItem('dddddddddddddddd',0,False,True,nil,0,'item4'));
  // Visualizar el popup en la posición 100,100
  popup.Popup(100, 100);