Dear Mr. Rao,
can you please tell me where I find function:
XEval( bSetUp, oBrw )
Can you please post some sample code how these codeblocks could look like:
bSetUp
bSelect
bValid
Best regards,
Otto
XBrowse( uData, cTitle, lAutoSort, bSetUp, aCols, bSelect, lExcel, lFastEdit, ;
bValid, cSerial, lNoModal, lAutoFit )
XEval( bSetUp, oBrw )
retval := XEval( bBlock, params, ... )if ValType( bBlock ) == "B"
retval := Eval( bBlock, params,...)
endifXBrowse( "STATES.DBF", "States in USA", .f. ;
{ |oBrw| oBrw:nMarqeeStyle := 1 } )cSelected := nil
XBrowse( "STATES.DBF", "States", .f., ;
nil, nil, ; // bSetup, aCols
{ |oBrw,oSelectedCol| cSelected := oSelectedCol:Value } )
if cSelected == nil
? "none selected"
else
? cSelected
endif[code]
<form class="row g-3 border p-3 shadow-lg">
$-> TEXTAREA : id=paste; label=paste; text=XBrowse( cAlias , "This is my title, subtitle , test neu", .F. , { |oBrw| oBrw:nMarqeeStyle := 1 }, {"Col1","Col2"},{ |oBrw,oSelectedCol| cSelected := oSelectedCol:Value } , lExcel, lFastEdit,{ |oBrw| IsValid }, cSerial, lNoModal, lAutoFit )
$-> INPUT : id=uData; label=Überschrift; value= <?prg return hb_jsonEncode( hTmp[ 'UDATA' ] , .T. )?>
$-> CHECKBOX : id=lAutoSort; label=lAutoSort
$-> TEXTAREA : id=bSetUp; label=bSetUp; text=<?prg return hb_jsonEncode( hTmp[ 'BSETUP' ] , .T. )?>
$-> TEXTAREA : id=aCols; label=aCols; text=<?prg return hb_jsonEncode( hTmp[ 'ACOLS' ] , .T. )?>
$-> TEXTAREA : id=bSelect; label=bSelect; text=<?prg return hb_jsonEncode( hTmp[ 'BSELECT' ] , .T. )?>
$-> CHECKBOX : id=lExcel; label=lExcel
$-> CHECKBOX : id=lFastEdit; label=lFastEdit
$-> TEXTAREA : id=bValid; label=bValid; text=<?prg return hb_jsonEncode( hTmp[ 'BVALID' ] , .T. )?>
$-> TEXTAREA : id=cSlNo; label=cSlNo; text=<?prg return hb_jsonEncode( hTmp[ 'CSLNO' ] , .T. )?>
$-> CHECKBOX : id=lNoModal; label=lNoModal
$-> CHECKBOX : id=lAutoFit; label=lAutoFit
<div class="col-md-12 py-3">
<button class="btn btn-lg btn-success me-2" onclick="save()" type="button">SAVE</button>
<button class="btn btn-lg btn-outline-secondary" onclick="alert('Abbruch')" type="button">CANCEL</button>
</div>
</form>
example TEXTAREA
[/code]
<div class="form-floating">
<textarea class="form-control" placeholder="Leave a comment here" id="|id|" style="height: 80px">|text|
</textarea>
<label for="|id|">|label|</label>
</div>
[code]
[/code]
[code=fw]
//lNoModal
cTmp := StrToken( cTmp2, 1, "," )
lNoModal := cTmp
nlencTmp := len( cTmp )
cTmp2 := ALLTRIM( SUBSTR( cTmp2, ( nlencTmp + 2 ) ) )
// lAutoFit
cTmp := StrToken( cTmp2, 1, "," )
cTmp := STRTRAN(cTmp, ")", "")
lAutoFit := cTmp
nlencTmp := len( cTmp )
cTmp2 := ALLTRIM( SUBSTR( cTmp2, ( nlencTmp + 2 ) ) )
hTmp[ 'uData' ] := uData
hTmp[ 'cTitle' ] := cTitle
hTmp[ 'lAutoSort' ] := lAutoSort
hTmp[ 'bSetUp' ] := bSetUp
hTmp[ 'aCols' ] := aCols
hTmp[ 'bSelect' ] := bSelect
hTmp[ 'lExcel' ] := lExcel
hTmp[ 'lFastEdit' ] := lFastEdit
hTmp[ 'bValid' ] := bValid
hTmp[ 'cSlNo' ] := cSlNo
hTmp[ 'lNoModal' ] := lNoModal
hTmp[ 'lAutoFit' ] := lAutoFit
