usando GraphPlus()

[Ronaldo Geniais]

usando o recurso GraphPlus()

quando gero um grafico tipo barras horizontais,

ele gera o grafico com uma cor unica, mas apresenta as legendas

nas cores definidas.

se eu fizer o mesmo grafico usando pizza, o problema nao ocorre.

como esta o codigo :

   aCores := { RED,YELLOW,ORANGE,FUCHSIA,GREEN,BROWN, ;
                BLUE,PINK,PURPLE, BLACK, WHITE, GRAY, ;
                SILVER, TEAL, NAVY, AQUA, LGREEN, OLIVE, MAROON,CELESTE,AZUL,CAFE,VERDE}

      // BARRAS HORIZONTAIS  DESPESAS  
   oObj := GraphPlus():New()
   WITH OBJECT oObj
      :GraphData   := { aVDesp  }        
      :Legends     := aLegDes  //{ "Despesas"} //, "Serie 3" }
      :Categories  := aLegDes
      :GraphColors := acores
      :Title := "Periodo :"+Dtoc(Pridia)+" a "+Dtoc(Ultdia)
      :Picture := '@B@E 9,999,999'
      :BarGapRatio := -0.6
      :BarGapWidthRatio := 0.2      
      :GraphType := GT_BAR
      :nVDivision := 4
   ENDWITH
   AAdd( aGraphObjects, oObj )  
   
   // PIZZA  DESPESAS  
   oObj := GraphPlus():New()
   WITH OBJECT oObj
      :GraphData   := { aVDesp  }        
      :Legends     := aLegDes  //{ "Despesas"} //, "Serie 3" }
      :Categories  := aLegDes
      :GraphColors := acores
      :Title := "Periodo :"+Dtoc(Pridia)+" a "+Dtoc(Ultdia)
      :Picture := '@B@E 9,999,999'
      :BarGapRatio := -0.6
      :BarGapWidthRatio := 0.2      
      :GraphType := GT_PIE
      :nVDivision := 4
   ENDWITH
   AAdd( aGraphObjects, oObj )   

anexo imagens geradas

[Ronaldo Geniais]

Could someone help me with this question?  
Why doesn't the bar chart display multiple colors according to the legend, while it works in the pie chart?

[Grigory Filatov]

Dear Ronaldo,

Yes, sure.

Please compare the following images with the Bars implementation from advanced GraphPlus example.

Is the second image iacceptable for you?

This is what is displayed after clicking the "Switch Rows and Columns" button.

HTH,

Grigory

вторник, 2 июня 2026 г. в 18:46:12 UTC+2, Ronaldo Geniais: