Mudar cor da linha do grid?

[pena]

Boa noite pessoal, to com a seguinte situação, atualmente, quando o estoque do produto for inferior a 1, ele mostra apenas a coluna da quantidade em vermelho, porem vi um outro exemplo que muda toda linha, a cor do fundo, so que nao consegui fazer funcionar de jeito algum, poderiam me dar uma dica, segue o codigo

Código: Selecionar todos

                    cbColor1 :={ || IIf ( This.CellValue <=0 , {255,200,200} , ) }
                    aItems :=ARRAY(12)
                    AEVAL(aItems ,{|x,y| aItems[y]:={STRZERO(y,2),,RANDOM(),y,} })
                    AEVAL({4,5,8},{|x,y| aItems[x,4] :=0})
                    @ 060,010 GRID Grid_Cons_Produtos		;
                              WIDTH  567			;
                              HEIGHT 350			;
                              HEADERS {"Código","Descrição","Preço","Estoque","Custo"}	;
                              WIDTHS  {55,325,90,80,80};
                              FONT "Arial" SIZE 09;
                              JUSTIFY { BROWSE_JTFY_RIGHT , BROWSE_JTFY_LEFT ,  BROWSE_JTFY_RIGHT ,  BROWSE_JTFY_RIGHT,BROWSE_JTFY_RIGHT };
                              COLUMNCONTROLS   {,,{"TEXTBOX","NUMERIC"},{"TEXTBOX","NUMERIC"},}  ;
                              DYNAMICFORECOLOR {,,,cbColor1, } ;
                              ITEMS aItems;
                              ON DBLCLICK selecionaregistro('S');
                              ON CHANGE Lis_conversoes()

       

[Daniel]

E so mudar esta linha

Código: Selecionar todos

DYNAMICFORECOLOR {cbColor1,cbColor1,cbColor1,cbColor1,cbColor1 } ;

[pena]

valeu Daniel mas da o seguinte erro, '<=' invalid

fiz o seguinte, dae funcionou

Código: Selecionar todos

                  CbColor1  := { |val| IF( val[4] <= 0, RED, ) }
                  cbColor4 :={ || IIf ( This.CellValue <=0 , RED, ) }
                  DYNAMICFORECOLOR {CbColor1 ,CbColor1,CbColor1,cbColor4,CbColor1 }