• Segue uma tabela com as cores mais usadas no Protheus:
• Estas podem ser usadas por exemplo, numa grid:
| Preto | CLR_BLACK | Azul Claro | CLR_HBLUE | |
| Azul | CLR_BLUE | Verde Claro | CLR_HGREEN | |
| Verde | CLR_GREEN | Ciano | CLR_HCYAN | |
| Ciano | CLR_CYAN | Vermelho Claro | CLR_HRED | |
| Vermellho | CLR_RED | Magenta Claro | CLR_HMAGENTA | |
| Magenta | CLR_MAGENTA | Amarelo | CLR_YELLOW | |
| Marrom | CLR_BROWN | Cinza Claro | CLR_HGRAY | |
| Cinza | CLR_GRAY | Branco | CLR_WHITE |
• Estas podem ser usadas por exemplo, numa grid:
| @ 0, 0 to 300,795 dialog oDlg01 title "Exemplo" |
| @ 1, 1 to 110,400 browse "TABTEMP" fields aCampos object _oBrowseCor |
| // COR DA FONTE |
| _oBrowseCor:obrowse:acolumns[1]:BCLRFORE := {|SETVAL| fTrocaCor(1)} |
| // COR DA LINHA |
| _oBrowseCor:obrowse:acolumns[1]:BCLRBACK := {|SETVAL| fTrocaCor(2)} |
| @ 125, 10 bmpbutton type 02 action close(oDlg01) |
| activate dialog oDlg01 centered |
| //----------------------------------------------------------------------- |
| static function fTrocaCor(nOpcao) |
| private cNovaCor := "" |
| cNovaCor := iif(nOpcao == 1, CLR_WHITE, CLR_HBLUE) // FONTE, FUNDO |
| return cNovaCor |
Excelente post. Ainda é possível utilizar a função RGB para mais cores na programação Advpl
ResponderExcluirOlá Erike,
ResponderExcluirAgradecemos o elogio, a dica e a participação. Obrigado!