boa noite galera, estou desenvolvendo uma epc para um determinado browse, preciso validar cadas registro do browse e realizar uma determinada validação, até ai tudo bem, o problema é que preciso mudar a cor (bgcolor) da linha de acordo com a validação que estou fazendo. Não estou conseguindo mudar a cor das linhas, alguém já fez algo parecido? Muito obrigado.
Na UPC depois de verificado o handle do browse crie o evento abaixo para o browse: Código: def var iFgcolor as integer no-undo. def var iBgcolor as integer no-undo. on 'row-display':U of <handle do browse> do: if <situacao> then assign iFgcolor = <cor da fonte> iBgcolor = <cor do fundo>. else assign iFgcolor = <cor da fonte> iBgcolor = <cor do fundo>. assign <coluna do browser>:fgcolor = iFgcolor <coluna do browser>:bgcolor = iBgcolor. end. Se não der certo com o código do evento, provavelmente deverá criar uma procedure persistent para tratar o conteudo do evento. Código: on 'row-display':U of <handle do browse> persistent run c:\temp\p-row-display.p /************** conteudo arquivo c:\temp\p-row-display.p ***************/ def var iFgcolor as integer no-undo. def var iBgcolor as integer no-undo. if <situacao> then assign iFgcolor = <cor da fonte> iBgcolor = <cor do fundo>. else assign iFgcolor = <cor da fonte> iBgcolor = <cor do fundo>. assign <coluna do browser>:fgcolor = iFgcolor <coluna do browser>:bgcolor = iBgcolor.
Se eu coloco no evento row-display ele da erros: NUM-ITERATIONS nao pode ser lido dentro de um trigger de ROW-DISPLAY para BROWSE br-table Será q tem algo de errado, ou o programa não aceita o evento row-display?