Page 1 of 1

TBTNBMP no me funciona CANCEL

Posted: Wed Aug 24, 2011 2:11 am
by miragerr
Ola amigos

Tentei usar da seguite forma

REDEFINE BTNBMP oBtn1 ID 4009 OF oDlg ACTION( lSair := .T., oDlg:End() ) LEFT 2007 NOBORDER CANCEL

A clausula CANCEL nao funciona como fazer para funcionar

Fico no Aguardo

Re: TBTNBMP no me funciona CANCEL

Posted: Wed Aug 24, 2011 2:33 am
by Willi Quintana
Hola, hazlo asi:

Code: Select all

       REDEFINE BTNBMP oCance ;
                RESOURCE "CANCELAR" LEFT NOBORDER ;
                PROMPT "Cancelar" ;
                ACTION (lOK := .f., oDlg:End()) ;
                ID 131 OF oDlg
                oCance:lCancel := .t.
 

Re: TBTNBMP no me funciona CANCEL

Posted: Wed Aug 24, 2011 6:21 am
by miragerr
Gracias Willi, assim me funciona perfecto