FiveTech Support Forums

saludos al foro.

Una ayuda por favor, como podre pasar el foco al botton "cancelar" para que en una edicion de gets, se salga por completo y que no valide la captura obligatoria de los gets,, p.ej.

DEFINE DIALOG oDlg FROM nSup,nIzq TO nInf,nDer;
TITLE Ota(cTit);
FONT aDlgFont[nDialogo]

@ 1,2 say 'Dato 1' of oDlg
@ 1,20 get cDato1 picture '@!' valid {||validaDatos(cDato1)} // valida que necesariamente el get tenga informacion
@ 2,2 say 'Dato 2' of oDlg
@ 2,20 get cDato2 picture '@!' valid {||validaDatos(cDato2)}
@ 3,2 say 'Dato 3' of oDlg
@ 3,20 get cDato3 picture '@!' valid {||validaDatos(cDato3)}

@ nAncho,nCentro-nJ BUTTON oBtn1 PROMPT ' &Aceptar' OF oDlg SIZE 38, 14 ;
ACTION AfectaDbf(.t.)
@ nAncho,nCentro+8 BUTTON oBtn2 PROMPT ' &Cancelar' OF oDlg SIZE 38, 14 ;
ACTION AfectaDbf(.f.) CANCEL

ACTIVATE DIALOG oDlg CENTERED VALID uValid

Gracias.

Hola.
Creo que debes poner CANCEL ACTION AfectaDbf(.f.) en lugar de ACTION AfectaDbf(.f.) CANCEL. Debería funcionar.

el codigo esta bien.
la clausula CANCEL en el boton permite saltar la validacion de cada get, pero no asi a la del valid del dialogo.
el cual solo permitira cerrar el dialogo en base al resiltado de uValid

salu2

Hola.
Pues entonces, el código debería ser algo así como CANCEL ACTION (uValid := .t., AfectaDbf(.f.)).