Hello All,
I have few Redefine Get with Valid clause on a Dialog. User can directly click on Ok button and skip all the valid clause ?
How can I prevent this ?
TIA
Milan.
Board index FiveWin for Harbour/xHarbour How to enforce all Validations
Hi Mr.Mehta
Do not use CANCEL clause with the BUTTON if you want all gets to be validated and vice-versa in case GETs are not be validated, when any
BUTTON is pressed/clicked.
- Ramesh Babu P
You can make a construction as :
LOKAL lok := .T.
Aeval(oDlg:aControls,{|j|lok := lok .AND. EVAL(j:bValid)})
IF lOk is .F. , at least one valid clausule hes returned .F.
Frank
Frank Demont wrote:You can make a construction as :
LOKAL lok := .T.
Aeval(oDlg:aControls,{|j|lok := lok .AND. EVAL(j:bValid)})
IF lOk is .F. , at least one valid clausule hes returned .F.
Frank
Dear Frank,
No it does not work. It gives me error at Eval().
Can you guide me further. I am using Nov-05 build.
Witb best regards,
Milan.
local lOk := .t.
AEval( oDlg:aControls, {| j | lOk := lOk .and. If( j:bValid == nil, .t., Eval( j:bValid ) ) } )