Função: ColorToRGB
A partir do valor numérico que representa uma cor, retorna uma lista dos números que representam o RGB.
ColorToRGB ( < nColor > ) --> aRet
| Nome | Tipo | Descrição | Obrigatório | Referência |
| nColor | Numérico | Cor representada por um único valor numérico, por exemplo CLR_HRED definida no arquivo colors.ch. | X |
aRet
- Vetor com quatro posições indicando o vermelho, o verde, o azul e a transparência, sendo cada uma delas representadas por um valor numérico na escala de 0 a 255.
#include "TOTVS.ch"
#include "colors.ch"
User Function color2RGB()
aRGBA := ColorToRGB(CLR_HBLUE)
cMsg := "Red: " + STR(aRGBA[1]) + CRLF
cMsg += "Green: " + STR(aRGBA[2]) + CRLF
cMsg += "Blue: " + STR(aRGBA[3]) + CRLF
cMsg += "Alpha: " + STR(aRGBA[4])
MessageBox( cMsg, "RBGA", 64 )
Return
Exemplo da função ColorToRGB
TOTVS Application Server 10 , TOTVS Application Server 11
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas