toolbar

[Patricio Avalos Aguirre]

Hola

Consulta como puedo enviar el mensaje que cuando se presiona el boton del toolbar se active el menu

Code: Select all

DEFINE TBMENU OF aToolBar[1]			;
      ACTION  ListArtCli(.t.)   				;//aqui al presionar que active el popup
      TOOLTIP ansitooem("Mantención·Clientes")	;
      PROMPT  "Clientes"                      	;
		WHEN .F.                                	;
		MENU ShowPopup( )

...

function showpopu()
local oPopup

MENU oPopup POPUP
  MENUITEM "opcion1" ACTION fAccion1() 
  MENUITEM "opcion1" ACTION fAccion2() 
ENDMENU
return( oPopup )

Saludos
Patricio