Cambio de color de la célula (TArrayBrowse)

[ALINE]

Me gustarí­a saber una manera de cambiar el color de muchas células diferentes.
Por ejemplo, en una columna de cinco lí­neas, la necesidad de cambiar el color de las lí­neas 1, 3 y 5.
Estoy utilizando el OnDrawCell caso, pero cambia el color o la columna completa o cambiar el color de una sola célula.
gracias

[jlalin]

Aline,
> Estoy utilizando el OnDrawCell caso, pero cambia el color o
> la columna completa o cambiar el color de una sola célula.
METHOD ArrayBrowse1Column1DrawCell( oSender, cText, nClrText, nClrPane,
lHighLite, hDC, aRect ) CLASS TForm1
LOCAL nAt := ::oArrayBrowse1:nArrayAt
IF nAt == 1 .OR. nAt == 3 .OR. nAt == 5
nClrPane := clRed
ENDIF
RETURN Nil
Saludos,
José Lalí­n

[ALINE]

¡Muchas Gracias! Funcionó