Estoy notando un detalle al querer asignar valires a un TArrayBrowse que sobrepasa la el area visible:
Los datos que se encuentran fuera del area de visualizacion no les asigna el valor, tengo en un alinea casi 17 columnas, y solo las visibles adquieren el valor asignado con SetValue(), si elimnino algunas para poder ver las mas lejanas, atrapan sus valores correctamente.
Que puede ser?
Saludos.
--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com
--
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Array:SetValue
-
- Mensajes: 1831
- Registrado: Mar Oct 11, 2005 9:53 am
Array:SetValue
Ramón Zea
Móvil: 01-993-231-62-29
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoftware/
Móvil: 01-993-231-62-29
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoftware/
-
- Mensajes: 1831
- Registrado: Mar Oct 11, 2005 9:53 am
Array:SetValue
Tengo que corregirlo para un cliente que tiene 7 tiendas, que tengo que hacer, por lo que he estudiado en los fuentes el error o detalle esta aqui:
METHOD SetValue( Col, x, nAt ) CLASS XArrayBrowse
LOCAL Oldvalue
LOCAL cType
LOCAL nIndex
DEFAULT nAt TO ::nArrayAt
cType := Valtype( Col )
DO CASE
CASE cType == "C"
nIndex := Ascan( ::aCols, {|v| Upper( v:cHeader ) == Upper( Col ) } )
IF nIndex > 0
nIndex := ::aCols[ nIndex ]:nIndex
ENDIF
CASE cType == "O"
nIndex := Ascan( ::aCols, {|v| v == Col } )
IF nIndex > 0
nIndex := ::aCols[ nIndex ]:nIndex
ENDIF
CASE cType == "N"
nIndex := Col
OTHERWISE
nIndex := 0
END CASE
IF nIndex > 0
IF ::nEditMode != beAPPEND .AND. nAt > 0
OldValue := ::FaArrayData[ nAt ][ nIndex ]
ENDIF
WITH OBJECT ::aCols[ nIndex ]
IF :oGridEdit:lVisible .AND. nAt == ::nArrayAt <--------Si no esta visible no le asigna el valor
:oGridEdit:Value := x
ENDIF
END WITH
IF ::nEditMode != beAPPEND .AND. nAt > 0
::FaArrayData[ nAt ][ nIndex ] := x
ENDIF
::RefreshCurrent()
ENDIF
RETURN OldValue
Algun parche que pueda aplicar?
Saludos.
--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com
--
METHOD SetValue( Col, x, nAt ) CLASS XArrayBrowse
LOCAL Oldvalue
LOCAL cType
LOCAL nIndex
DEFAULT nAt TO ::nArrayAt
cType := Valtype( Col )
DO CASE
CASE cType == "C"
nIndex := Ascan( ::aCols, {|v| Upper( v:cHeader ) == Upper( Col ) } )
IF nIndex > 0
nIndex := ::aCols[ nIndex ]:nIndex
ENDIF
CASE cType == "O"
nIndex := Ascan( ::aCols, {|v| v == Col } )
IF nIndex > 0
nIndex := ::aCols[ nIndex ]:nIndex
ENDIF
CASE cType == "N"
nIndex := Col
OTHERWISE
nIndex := 0
END CASE
IF nIndex > 0
IF ::nEditMode != beAPPEND .AND. nAt > 0
OldValue := ::FaArrayData[ nAt ][ nIndex ]
ENDIF
WITH OBJECT ::aCols[ nIndex ]
IF :oGridEdit:lVisible .AND. nAt == ::nArrayAt <--------Si no esta visible no le asigna el valor
:oGridEdit:Value := x
ENDIF
END WITH
IF ::nEditMode != beAPPEND .AND. nAt > 0
::FaArrayData[ nAt ][ nIndex ] := x
ENDIF
::RefreshCurrent()
ENDIF
RETURN OldValue
Algun parche que pueda aplicar?
Saludos.
--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com
--
Ramón Zea
Móvil: 01-993-231-62-29
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoftware/
Móvil: 01-993-231-62-29
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoftware/