PROBLEMA ARRAYBROWSE
Publicado: Jue May 19, 2005 12:38 pm
Vamos a ver si me explico. Un arraybrowse de 3 columnas, cuya primera
columna es un valor numerico que puede vales 1 o 2. En el mismo formulario
hay un timage. El arraybrowse tiene un timagelist con 2 imagenes para que en
funcion de ese campo cargue en la primera columna una imagen u otra. Hasta
ahi Bien. Como ya he comentado en el mismo formulario, hay a parte un
timage, el cual tiene que ser igual a la imagen del elemento del array
seleccionado. Lo hago de la siguiente forma en el evento onchange del
arraybrowse :
METHOD ArrayBrowse_avisosChange( oSender, lBookMarkChanged ) CLASS
TFrm_prueba
local nImage
WITH OBJECT ::oArrayBrowse
nImage := :aArrayData[ ::oArrayBROWSE_Avisos:nArrayAt, 1 ]
WITH OBJECT ::oImage
:oPicture := ::aImagenes[nImage]
:Refresh()
END WITH
END WITH
RETURN Nil
TEngo una data que hace 2 Tpicture() para las 2 imagenes que son las mismas
que las del imagelist del arraybrowse, si pudiese referrirme directamente a
las imagenes del t imagelist me ahorraria tener una data con 2
tPicture():...... Y por otro lado, cuando pinta el formulario, bien el
arraybrowse bien, la imagen, doy flecha abajo a la siguiente linea del
arraybrowse que tiene asiganada la 2ª imagen en cuestion, y bien, en el
TIMAGE suelto me cambia la imagen, pero..... vuelvo a darle flecha hacia
arriba para volver a la linea anterior, y el arraybrowse bien, en este como
es una columna se ven las imagenes correctamente, pero el TIMAGE no vuelve a
cambiar ya. ¿Que estoy haciendo mal?
Atentamente : Francisco Sanchez GERENTE GRUPO ST - Software TOTAL
columna es un valor numerico que puede vales 1 o 2. En el mismo formulario
hay un timage. El arraybrowse tiene un timagelist con 2 imagenes para que en
funcion de ese campo cargue en la primera columna una imagen u otra. Hasta
ahi Bien. Como ya he comentado en el mismo formulario, hay a parte un
timage, el cual tiene que ser igual a la imagen del elemento del array
seleccionado. Lo hago de la siguiente forma en el evento onchange del
arraybrowse :
METHOD ArrayBrowse_avisosChange( oSender, lBookMarkChanged ) CLASS
TFrm_prueba
local nImage
WITH OBJECT ::oArrayBrowse
nImage := :aArrayData[ ::oArrayBROWSE_Avisos:nArrayAt, 1 ]
WITH OBJECT ::oImage
:oPicture := ::aImagenes[nImage]
:Refresh()
END WITH
END WITH
RETURN Nil
TEngo una data que hace 2 Tpicture() para las 2 imagenes que son las mismas
que las del imagelist del arraybrowse, si pudiese referrirme directamente a
las imagenes del t imagelist me ahorraria tener una data con 2
tPicture():...... Y por otro lado, cuando pinta el formulario, bien el
arraybrowse bien, la imagen, doy flecha abajo a la siguiente linea del
arraybrowse que tiene asiganada la 2ª imagen en cuestion, y bien, en el
TIMAGE suelto me cambia la imagen, pero..... vuelvo a darle flecha hacia
arriba para volver a la linea anterior, y el arraybrowse bien, en este como
es una columna se ven las imagenes correctamente, pero el TIMAGE no vuelve a
cambiar ya. ¿Que estoy haciendo mal?
Atentamente : Francisco Sanchez GERENTE GRUPO ST - Software TOTAL