DonutSeries

[n2n]

Hi,
I try to use DonutSeries with style like https://www.steema.com/uploads/products/Pie_Chart.png

but still ineffectual. Is it possible?

[Marc]

Hello,

Yes, use SliceHeight to vary heights.

Eg.
series1.FillSampleValues();
Series1.SliceHeight[0]:= 1000;

Regards,
Marc Meumann

[n2n]

Ok thanks and one question more. So we have Hover with redline, How I can change redColor to some else color

[n2n]

Hi,
When I pass data (2,1,1,15) to DonutSeries looks not expected. Here is example
How I can fix it?

[Yeray]

Hello,

So we have Hover with redline, How I can change redColor to some else color

You can change this property:

Code: Select all

Chart1.Legend.Selected.Hover.Font.Color:=clBlue;

When I pass data (2,1,1,15) to DonutSeries looks not expected.

I'm afraid I have to confirm this is a well known and difficult to solve problem with the TPieSeries in some situations.
It's not a trivial problem that would probably need a complete redesign of the series to be fixed.

The only workaround I can think on at the moment is to change the rotation of the pie:

Code: Select all

DonutSeries1.RotationAngle:=50;

http://bugs.teechart.net/show_bug.cgi?id=935
http://bugs.teechart.net/show_bug.cgi?id=939

[n2n]

1.png (5.14 KiB) Viewed 15764 times

hi Yeray

Code: Select all

DonutSeries1.RotationAngle:=50;

it is no solution in my case cause we have timer with

Code: Select all

DonutSeries1.Rotate(358);

anyway there are few pic with bags You should to fix them

thanks.

[Yeray]

Hello,

Note OpenGL gives a better result. Ie:

pie1.png (4.94 KiB) Viewed 15765 times

[n2n]

Ok thanks. Can you give some example please?

[Yeray]

Hello,

Can you give some example please?

I took your example form here.

Code: Select all

uses TeeGLCanvas;

procedure TForm1.FormCreate(Sender: TObject);
begin
  //Activate OpenGL
  Chart1.Canvas:=TGLCanvas.Create;
  Chart1.Aspect.Elevation:=40;

  //Show Pen to better see the slices
  DonutSeries1.Pen.Visible:=true;

  //Make the Pen thinner
  Chart1.Draw;
  DonutSeries1.PiePen.Width:=0;
end;

I also added this