Sería muy complicado que en un TdBrowse hubiera algunas celdas que tuvieran
distinto color según su valor? Ojo, no la columna.
¿Se podria hacer?
Paco V
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.
Color en celda
-
ignacio
- Site Admin
- Mensajes: 9463
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Color en celda
Paco,
Echale un vistazo al evento OnDrawCell del objeto TBrwColumn.
Saludos,
"Paco V" <ssi@ono.com> escribió en el mensaje
news:43cf831e$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Sería muy complicado que en un TdBrowse hubiera algunas celdas que
> tuvieran
> distinto color según su valor? Ojo, no la columna.
> ¿Se podria hacer?
>
> Paco V
Echale un vistazo al evento OnDrawCell del objeto TBrwColumn.
Saludos,
"Paco V" <ssi@ono.com> escribió en el mensaje
news:43cf831e$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Sería muy complicado que en un TdBrowse hubiera algunas celdas que
> tuvieran
> distinto color según su valor? Ojo, no la columna.
> ¿Se podria hacer?
>
> Paco V
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
-
jasm.nospam
- Mensajes: 203
- Registrado: Vie Abr 01, 2005 9:05 am
Color en celda
Paco:
Este método cambia el color de cada celda en la columna 7 de un
ArrayBrowse. Supongo que para los demas browses basados en columnas
tambien vale.
METHOD ArrayBrowse1Column7DrawCell( oSender, cText, nClrText, nClrPane,
lHighLite, hDC, aRect ) CLASS TForm28
IF ::oArrayBrowse1:aArrayData[ ::oArrayBrowse1:nArrayAt
][oSender:nIndex] < 0
IF lHighLite .AND. nClrPane = 12937777
nClrText = CLR_WHITE
ELSE
nClrText = CLR_HRED
ENDIF
ELSE
IF lHighLite .AND. nClrPane = 12937777
nClrText = CLR_WHITE
ELSE
nClrText = CLR_BLUE
ENDIF
ENDIF
RETURN Nil
Saludos,
Jose A. Suarez
Paco V escribió:
> Sería muy complicado que en un TdBrowse hubiera algunas celdas que tuvieran
> distinto color según su valor? Ojo, no la columna.
> ¿Se podria hacer?
>
> Paco V
Este método cambia el color de cada celda en la columna 7 de un
ArrayBrowse. Supongo que para los demas browses basados en columnas
tambien vale.
METHOD ArrayBrowse1Column7DrawCell( oSender, cText, nClrText, nClrPane,
lHighLite, hDC, aRect ) CLASS TForm28
IF ::oArrayBrowse1:aArrayData[ ::oArrayBrowse1:nArrayAt
][oSender:nIndex] < 0
IF lHighLite .AND. nClrPane = 12937777
nClrText = CLR_WHITE
ELSE
nClrText = CLR_HRED
ENDIF
ELSE
IF lHighLite .AND. nClrPane = 12937777
nClrText = CLR_WHITE
ELSE
nClrText = CLR_BLUE
ENDIF
ENDIF
RETURN Nil
Saludos,
Jose A. Suarez
Paco V escribió:
> Sería muy complicado que en un TdBrowse hubiera algunas celdas que tuvieran
> distinto color según su valor? Ojo, no la columna.
> ¿Se podria hacer?
>
> Paco V