Pular para o conteúdo principal

Cores usadas no Protheus

Segue uma tabela com as cores mais usadas no Protheus:

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

Comentários

  1. Excelente post. Ainda é possível utilizar a função RGB para mais cores na programação Advpl

    ResponderExcluir
  2. Olá Erike,
    Agradecemos o elogio, a dica e a participação. Obrigado!

    ResponderExcluir

Postar um comentário