topic-22233

Board index FiveWin para Harbour/xHarbour TBTNBMP no me funciona CANCEL

Posts: 140

Joined: Tue Oct 11, 2005 02:36 AM

TBTNBMP no me funciona CANCEL
Posted: Wed Aug 24, 2011 02:11 AM

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

Jackson Douglas C. Brito

Boa Vista - RR - Brasil

FWH 12.09 Last Build

xHarbour Free

UESTUDIO

SQLRDD

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Re: TBTNBMP no me funciona CANCEL
Posted: Wed Aug 24, 2011 02:33 AM

Hola, hazlo asi:

Code (fw): Select all Collapse

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

miragerr

Posts: 140

Joined: Tue Oct 11, 2005 02:36 AM

Re: TBTNBMP no me funciona CANCEL
Posted: Wed Aug 24, 2011 06:21 AM

Gracias Willi, assim me funciona perfecto

Jackson Douglas C. Brito

Boa Vista - RR - Brasil

FWH 12.09 Last Build

xHarbour Free

UESTUDIO

SQLRDD

FiveTech Support Forums

Continue the discussion