Creating a Pie Chart : I've tried the following...

Thu, 24 Dec 2015 12:33:46 +0000

Author: bob
Subject: 3234
Posted: 24 Dec 15 at 12:33PM

I've tried the following code using DrawArc to create to slices of a pie chart.

  DIM iInstanceID AS LONG,  dXPos AS DOUBLE,  dYPos AS DOUBLE
  DIM dRadius AS DOUBLE,  dStartAngle AS DOUBLE
  DIM dEndAngle AS DOUBLE,  iPie AS LONG
  DIM iDrawOptions AS LONG, dRed AS DOUBLE, dgreen AS DOUBLE, dblue AS DOUBLE
  dXPos = 6
  dYPos = 6
  dRadius = 1
  dStartAngle = 0
  dEndAngle = 90
  iPie = 1
  iDrawOptions = 1
  dRed = 255
  dGreen = 0
  dBlue  = 128
  Result& = DPLSetFillColor(LibInstance&, BYVAL dRed, BYVAL dGreen, BYVAL dBlue)
  Result& = DPLDrawArc(LibInstance&,BYVAL dXPos,BYVAL dYPos,BYVAL dRadius,BYVAL dStartAngle,BYVAL dEndAngle,BYVAL iPie,BYVAL iDrawOptions)
  Result& = DPLClosePath(LibInstance&)
  dRed = 255
  dGreen = 0
  dBlue = 0
  Result& = DPLSetFillColor(LibInstance&,BYVAL dRed,BYVAL dGreen,BYVAL dBlue)
  Result& = DPLDrawArc(LibInstance&,BYVAL dXPos,BYVAL dYPos,BYVAL dRadius,BYVAL dStartAngle,BYVAL dEndAngle,BYVAL iPie,BYVAL iDrawOptions)
  Result& = DPLClosePath(LibInstance&)
  dStartAngle = 90
  dEndAngle = 270
  Result& = DPLDrawArc(LibInstance&,BYVAL dXPos,BYVAL dYPos,BYVAL dRadius,BYVAL dStartAngle,BYVAL dEndAngle,BYVAL iPie,BYVAL iDrawOptions)

The entire pie chart ends up red instead of purple and red. Hope someone can help.

Bob

Creating a Pie Chart : I've tried using the Search...

Mon, 21 Dec 2015 18:40:52 +0000

Author: bob
Subject: 3234
Posted: 21 Dec 15 at 6:40PM

I've tried using the Search to find code to produce a pie chart. I'm a trial user trying to see if this is the right tool for me.

I've completed the Hello-World example in VB6 and PowerBasic without issues. Also, I've played with lines, loading graphics, bar codes and text (although TrueType fonts were ignored).

Thanks

Bob

Debenu Quick PDF Library - PDF SDK Community Forum : Creating a Pie Chart

Creating a Pie Chart : I've tried the following...

Creating a Pie Chart : I've tried using the Search...