Amigos buenas noches desde aquí para todos,
Como dice el en encabezado, requiero hacer la edición directo sobre un registro en xbrowse, lo raro es que en columna de tipo carácter funciona, pero si la edición la hago sobre un campo numérico no funciona, alguien sane en que estoy fallando.
De antemano gracielas
Como dice el en encabezado, requiero hacer la edición directo sobre un registro en xbrowse, lo raro es que en columna de tipo carácter funciona, pero si la edición la hago sobre un campo numérico no funciona, alguien sane en que estoy fallando.
....
oCol = oBrwItno:AddCol()
oCol:bStrData := {|| if(Len( aDevolu ) > 0 , aDevolu[oBrwItno:nArrayAt]["nombreproducto"] ,"" ) }
oCol:cHeader = "Descripción"
oCol:nWidth = 180
oCol:nHeadStrAlign = AL_LEFT
oCol:nDataStrAlign = AL_LEFT
oCol:oHeaderFont = oFont
oCol:cFooter = "TOTALES ------>"
oCol:oFooterFont = oFont3
oCol:nEditType = EDIT_GET
oCol:bOnPostEdit = { | oCol, xVal, nKey | If( nKey == VK_RETURN, aDevolu[oBrwItno:nArrayAt]["nombreproducto"]:=xVal,) }
oCol = oBrwItno:AddCol()
oCol:bStrData := {|| if(Len( aDevolu ) > 0 , aDevolu[oBrwItno:nArrayAt]["cantidad"] ,0 ) }
oCol:cHeader = "Cantidad"
oCol:nWidth = 55
oCol:nHeadStrAlign = AL_RIGHT
oCol:nDataStrAlign = AL_RIGHT
oCol:oHeaderFont = oFont
oCol:nEditType = EDIT_GET
oCol:bOnPostEdit = { | oCol, xVal, nKey | If( nKey == VK_RETURN, aDevolu[oBrwItno:nArrayAt]["cantidad"]:=xVal,) }
....De antemano gracielas
Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com
[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com
[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]