• 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!