Como puedo hacer un popup en un bot贸n? En los data de la misma esta declarado pero no s茅 como utilizarlo.
Es posible con fwh 2.6 y de serlo un peque帽o ejemplo.
Gracias
Luis
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour tBTNBMP y popup
Bueno yo lo hab铆a hecho as铆
REDEFINE BTNBMP Nbut[9] id 116 of oDlg resource "BTNSINFAC","BTNSINFAC1" ACTION SHOWPOPUP(nbut[9],olbx) NOBORDER
//////
static function ShowPopup(odlg,olbx )
local oPopup
MENU oPopup POPUP
MENUITEM "Clientes" ACTION sinfac(olbx,.f.)
MENUITEM "Proveedores" ACTION sinfac(olbx,.t.)
ENDMENU
ACTIVATE MENU oPopup OF oDlg
return nil
Funciona bien saliendo el popup sobre el bot贸n, pero he visto que sobre el bot贸n a un costado (cuando necesito un menu en 茅l) aparece una flechita indicando el mismo. Lo v铆 en harbourminigui. Pensaba que se pod铆a hacer en fivewin.
Gracias
Luis
Luis:
Prueba declarandolo asi
REDEFINE BTNBMP Nbut[9] id 116 of oDlg resource "BTNSINFAC","BTNSINFAC1" ACTION SHOWPOPUP(nbut[9],olbx) ;
MENU SHOWPOPUP(nbut[9],olbx) NOBORDER
Saludos
Ruben Fernandez
Ruben al compilarlo me indica el siguiente error:
E:\fivehme\stogen.prg(56) Error E0022 Invalid lvalue: '()'
quiz谩s sea la version fwh 2.6 que no soporta esta opci贸n??
Me gustar铆a saber si es esto 贸 c贸mo se hace
Gracias
Luis
Luis:
Mirate en FW Samples el ejemplo testbtnm
Saludos
Ruben Fernandez
En la versi贸n que tengo de fw26, no viene el ejemplo, quiz谩s no est茅 soportado en esta.
Muchas gracias Ruben
Luis
Hoy descubr铆 que en la resoluci贸n 800x 600 con monitor 14" al presionar el bot贸n (ya que el mismo est谩 cerca del borde derecho de la pantalla, por lo tanto el popup se corre a la izquierda), se dibuja con la flechita al costado, y queda marcado as铆 hasta que hago un click en cualquier lugar del di谩logo.
Antes estaba trabajando con un monitor 17" y en otra resoluci贸n. Seguramente se solucion贸 en versiones posteriores
Muchas Gracias
Luis