FiveTech Support Forums

Agradecido de antemanos...

Como puedo bypasear las cláusulas VALID y cancelar un Dialog ?

Sé que con BUTTON se puede hacer pero, como puedo simular lo mismo con Button de un ButtonBar?

Hola gdeteran: quizas esto te ayude, yo lo hago asi.

DEFINE BUTTON boton4 OF oBtnBar1 RESNAME "SALE" ;
MESSAGE "Salir" ;
ACTION( SalirTbx:=.T.,xDlg1:END() ) ;
PROMPT "Salir" Font oFontBarra
RETURN(.F.)

SalirTbx:=.T. esta variable la pongo como condicion para cerrar el díalogo, si la declaro local hay que pasarla como referencia

Saludos

Gracias Rubén, la verdad es que lo solucioné así:

  @ 00, 11 BUTTONBAR oBar1 OF oDlg

  DEFINE   BUTTON   oBtnTermina OF  oBar1 NOBORDER;
           FILE     "..\bitmaps\EXIT2.BMP" ;
           MESSAGE  "Terminar"      ;
           ACTION   oDlg:End()

  oBtnTermina:lCancel := .T.