Mudando a cor de um Gráfico (DWGraph) dinamicamente

Por padrão o PowerBuilder quando cria um gráfico de barras, caso o gráfico tenha somente uma barra, coloca a cor default como vermelha, mas é possível mudar esta cor usando o método SetSeriesStyle da DWGraph.

O código abaixo faz essa mudança para verde.

integer Retorno
long QtdeSeries, Cor, i
string NomeGrafico, NomeSerie

NomeGrafico = 'gr_1'
QtdeSeries = dw_Graph.SeriesCount(NomeGrafico)
Cor = RGB(0,255,0) // Seta cor Verde

FOR i = 1 TO QtdeSeries
	NomeSerie = dw_Graph.SeriesName(NomeGrafico, i)
	Retorno = dw_Graph.SetSeriesStyle(NomeGrafico, NomeSerie, Foreground!, Cor)
	Retorno = dw_Graph.SetSeriesStyle(NomeGrafico, NomeSerie, Shade!, Cor)
NEXT

Return

Essa rotina é um exemplo de troca de cores para gráficos que tenham somente 1 barra, para várias barras são necessários alguns ajustes.

Deve-se ficar atento que neste exemplo não foi modificado o nome padrão do gráfico (gr_1).

Post enviado por: Armando Jr.

The following two tabs change content below.
Arquiteto de Software e Desenvolvedor Backend (quase Fullstack), geralmente trabalho com C#, PowerShell, Python, Golang, bash e Unity (esse é mais por hobby). Estou sempre buscando algo novo para aprender, adicionando novas ferramentas ao meu cinto de utilidades.
Posted in Dev, PowerBuilder and tagged , , , , .