Page 1 of 1

toolbar

PostPosted: Wed Nov 15, 2006 6:43 pm
by 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  Expand view
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