Código Delphi [-] var p:Tpoint; begin p:= panel1.clienttoscreen(Point(boton.left,boton.top)); // pasamos coordenadas relativas a pantalla. popupmenu1.popup(p.x,p.y); end;
var p:Tpoint; begin p:= panel1.clienttoscreen(Point(boton.left,boton.top)); // pasamos coordenadas relativas a pantalla. popupmenu1.popup(p.x,p.y); end;