Perguntas Classe TColorTriangle()

Boa tarde !

Alguém saberia informar como pego no retorno da Classe tColorTriangle, após a definição da cor,o valor de retorno convertido para Hexadecimal ou RGB ?
Explico : Quando se usa esta classe, e o usuário escolhe a cor através dela, o retorno da cor escolhida é um numero inteiro, que nem é hexadecimal nem é padrão RGB(xxx,xxx,xxx), daí não consigo converte-lo para o padrão que necessito, daí pergunto :

Existe alguma forma de conversão deste numero inteiro para Hexadecimal ou RG(xxx,xxx,xxx) ?
Ou então Consigo pegar os paramentros de (R)(G)( contidos na classe mostrada na tela ?

Se alguém puder dar uma luz, fico agradecido desde já.

Abs.

Raul

Bom dia Raul,
Utilize a função ColorToRGB(nColor)

Abraços!!

Bom dia Kanaãm,

Esta função só funciona para as cores que estão inseridas no arquivo COLORS.CH. ( CLR_HRED, CLR_BLUE, CLR_GREEN, etc )
Para converter o valor de retorno da classe TColorTriangle() eu usei as funções abaixo :

xColor := oColorTr1:retColor() // numero de retorno da cor escolhida na classe
xcolor1 := substr((ntoc(xcolor,16,6)),5,2)+substr((ntoc(xcolor,16,6)),3,2)+substr((ntoc(xcolor,16,6)),1,2) // conversão para Hexadecimal

Daí posso utilizar tanto o xcolor para alterar as propriedades de cor dos objetos em tempo de execução quanto converter par Hexadecimal e utilizar
nos gráficos do Google, que estou utilizando.

Mas valeu, obrigado !

Abs.

Raul.

Opa!
Valeu por compartilhar a solução Raul!
Abraços!!