Bruno

Hola, tengo una duda al trabajar con la clase Tpopupmenu, trato de hacer que al presionar la tecla enter en un control Tedit, poder mostrar un popup Justo bajo un control Tedit (en el que presione Enter) usando el método popup del control Tpopupmenu

el codigo es asi:

METHOD Edit1OnKeyDown( oSender, nKey ) CLASS TForm2

if nKey==13
MostrarPOPUP()
endif

return

function MostrarPOPUP()
form2:mnuiPOP := Tpopupmenu():create(form2:mnuiPOP)

form2:mnuiPOP:beginmenu()
form2:mnuiPOP:menuitem("Opción 1","")
form2:mnuiPOP:menuitem("Opción 2","")
form2:mnuiPOP:endmenu()

form2:mnuiPOP:popup(10,10)
return (0)

Ahora en la línea ( form2:mnuiPOP:popup(10,10) ) he colocado constantes para probar, pero aun asi el popup aparece en puntos distintos de la pantalla y en ocasiones no aparece la pregunta es ¿como puedo controlar el lugar exacto donde mostrar el popup?

A ver si me ayudas por favor

saludos
MAURICIO

Adjunto el proyecto (mueve la ventana form2 a lo largo de la pantalla, presiona enter en el Tedit10 y veras como no aparece el popupmenu)

Mauricio,

Ya lo he solucionado, el problema es que las coordenadas que le pasas las interpreta como coordenadas de pantalla, ahora son relativas al formulario.

_________________
Un saludo,
Bruno Cantero
www.c3compiler.com

Bruno yo tengo el mismo problema para mostrar un popup en un lugar especifico, se puede saber la posicion de un componente con relacion a la pantalla, sin tener en cuenta el Propietario

No os rompáis la cabeza, esperad a la actualización que ya sale bien.

_________________
Un saludo,
Bruno Cantero
www.c3compiler.com

Ok, Bruno Gracias

Bruno,
Se puede borrar un MenuItem en un PopupMenu en tiempo de ejecucion?.