Quote Originally Posted by Edgard View Post
Leonel,

Se for dinamicamente entendo, que o seu método está correto.

Se não for dinamicamente entendo, que o melhor seria:
Click image for larger version. 

Name:	colorcj.JPG 
Views:	60 
Size:	88.0 KB 
ID:	13536

Particularmente, prefiro a troca da cor no texto, que controlo via propriedades.

Em complemento de seu código:

Code:
                                Function piFocusCellForeColor Returns Integer
                                    Handle  hoDataSource hoColumn
                                    Integer iQtdSin iRow
                                    
                                    Get phoDataSource to hoDataSource
                                    Get SelectedRow   of hoDataSource;
                                                      to iRow

                                    Get RowValue      of oAPOLICE_SINISTRO;
                                                 iRow to iQtdSin
                                    Get SelectedColumnObject to hoColumn

                                    Set piHighlightForeColor   to (If( (iQtdSin>0), (piMyTextColorWarning(Self)) , clNone))
                                    Set piSelectedRowForeColor to (If( (iQtdSin>0), (piMyTextColorWarning(Self)) , (piMySelectedRowForeColor(Self)) ))                                    

                                    
                                    Function_Return (If( (iQtdSin>0), (piMyTextColorWarning(Self)) , (piMyFocusCellForeColor(Self)) ))
                                End_Function
At.;

Edgard
Edgard,

Testei com a Function piFocusCellForeColor, mas ela estava colorindo apenas quando o foco era células que ficam habilitadas para selecionar (normalmente as que fazem parte de índice).
Coloquei o mesmo código na OnComFocusChanging e agora sim ela estava colorindo independentemente da célula/coluna selecionada.
No entanto, eu queria que todas as linhas tivessem a cor aplicada sem precisar selecionar.

Click image for larger version. 

Name:	Sample.png 
Views:	55 
Size:	5.8 KB 
ID:	13538

No caso da imagem acima, queria que a linha 1, 2 e 4 também estivessem colorida, independentemente de terem o foco.

Click image for larger version. 

Name:	OldGrid.png 
Views:	53 
Size:	4.7 KB 
ID:	13539

Não tem problema se der para fazer apenas com o ForeColor (cor do texto), pois a única coisa que quero evitar é colocar OnSetDisplayMetrics em todas as colunas que for para ter cor.