XBROWSE: Como activar/desactivar EDITABLE de una columna
Posted: Wed Nov 05, 2008 5:29 pm
Hola:
Tengo definido:
" REDEFINE XBROWSE oGrid2 ID 20 OF oFld:aDialogs[ 3 ] ;
ALIAS "tarcli" ;
AUTOSORT LINES CELL FASTEDIT
oGrid2:nMarqueeStyle:= MARQSTYLE_HIGHLCELL
ADD COLUMN TO oGrid2 HEADER OemToAnsi("C¢digo") ;
RIGHT EDITABLE ;
DATA iif(empre2->larttxt,tarcli->cref,tarcli->codart) ;
ON EDIT iif(nKey#VK_ESCAPE,;
iif(entrada->(CsLockRec()),;
eval({|xVal| entrada->ptstrans:=xVal, entrada->baseimpot:=entrada->ptstrans*entrada->netot },xVal),),),;
oGrid1:Refresh() } "
¿Cómo puedo hacer para activar/desativar la claúsula EDITABLE al igual que puedo hacer con FASTEDIT poniendo oGrid2:lFastEdit:=.T. o oGrid2:lFastEdit:=.F. ?
Saludos.
Ricardo Patón
Tengo definido:
" REDEFINE XBROWSE oGrid2 ID 20 OF oFld:aDialogs[ 3 ] ;
ALIAS "tarcli" ;
AUTOSORT LINES CELL FASTEDIT
oGrid2:nMarqueeStyle:= MARQSTYLE_HIGHLCELL
ADD COLUMN TO oGrid2 HEADER OemToAnsi("C¢digo") ;
RIGHT EDITABLE ;
DATA iif(empre2->larttxt,tarcli->cref,tarcli->codart) ;
ON EDIT iif(nKey#VK_ESCAPE,;
iif(entrada->(CsLockRec()),;
eval({|xVal| entrada->ptstrans:=xVal, entrada->baseimpot:=entrada->ptstrans*entrada->netot },xVal),),),;
oGrid1:Refresh() } "
¿Cómo puedo hacer para activar/desativar la claúsula EDITABLE al igual que puedo hacer con FASTEDIT poniendo oGrid2:lFastEdit:=.T. o oGrid2:lFastEdit:=.F. ?
Saludos.
Ricardo Patón