como saltar un bValid de un get al presionar sobre un boton?

como saltar un bValid de un get al presionar sobre un boton?

Postby goosfancito » Tue Nov 23, 2010 11:11 am

Hola.

Tengo varios Get y 2 botones, uno de ellos es para cerrar el formulario,
necesito hacer que el bValid de los botones no sean tomados en cuenta
cuando hago click en el boton ¨Cerrar¨. como lo hago¨?

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: como saltar un bValid de un get al presionar sobre un boton?

Postby acuellar » Tue Nov 23, 2010 12:36 pm

goosfancito

colocando la clausular CANCEL en el GET
Code: Select all  Expand view  RUN

 @2.5,15 BUTTON "Cancelar" OF oDlg SIZE 40,10 ACTION (oDlg:End()) CANCEL UPDATE
 


Saludos,


Adhemar
Saludos,

Adhemar C.
User avatar
acuellar
 
Posts: 1644
Joined: Tue Oct 28, 2008 6:26 pm
Location: Santa Cruz-Bolivia

Re: como saltar un bValid de un get al presionar sobre un boton?

Postby goosfancito » Tue Nov 23, 2010 12:41 pm

gracias
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: como saltar un bValid de un get al presionar sobre un boton?

Postby acuellar » Tue Nov 23, 2010 12:45 pm

Perfecto
Saludos,

Adhemar C.
User avatar
acuellar
 
Posts: 1644
Joined: Tue Oct 28, 2008 6:26 pm
Location: Santa Cruz-Bolivia

Re: como saltar un bValid de un get al presionar sobre un boton?

Postby gdeteran » Tue Nov 23, 2010 2:21 pm

Con ButtonBar, la claúsula CANCEL no funciona, tienes que usarlo de este modo:

@ 00, 10 BUTTONBAR oBarList ;
               3DLOOK;
               BUTTONSIZE 25,25;
               SIZE 257, 27;
               OF oDlg

      DEFINE   BUTTON   oBtnFin   ;
               FILE     "..\bitmaps\EXIT2.BMP" OF oBarList NOBORDER;
               MESSAGE  "Salir Lista Productos"    ;
               ACTION   oDlg:End();
               TOOLTIP  "Terminar"

      oBtnFin:lCancel := .T.
Saludos,
Gonzalo
Puerto Montt - CHILE
FWH 22.12 - Harbour 3.2.0dev (r2008190002) - Borland/Embarcadero C++ 7.0(32-bit)
User avatar
gdeteran
 
Posts: 115
Joined: Fri Oct 14, 2005 7:10 pm
Location: Puerto Montt - CHILE


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 46 guests