TpolarSeries and graduation

[Calou]

Hello,

On a TPolarSeries is it possible to change the place of the angle 0° and to increment the angle in clock wise instead of anticlockwise?

Thanks for help

Regards

[Yeray]

Hi Calou,

If you use AddPolar method to populate your series, you could specify your angles, for example:

Code: Select all

procedure TForm1.FormCreate(Sender: TObject);
var alfa: integer;
begin
  alfa := 45;

  Series1.AddPolar(0-alfa,100);
  Series1.AddPolar(-45-alfa,200);
  Series1.AddPolar(-90-alfa,150);
end;

[Calou]

Hello here is my code with a TRoseSeries
Series1.AddXY(0,20);
Series1.AddXY(30,20);
Series1.AddXY(30,0);
Series1.AddXY(30,40);
Series1.AddXY(60,40);
Series1.AddXY(60,0);
It works good
Now if i do the code below the draw is not correct (i want the same that above but in clockwise)
Series1.AddXY(0,20);
Series1.AddXY(-30,20);
Series1.AddXY(-30,0);
Series1.AddXY(-30,40);
Series1.AddXY(-60,40);
Series1.AddXY(-60,0);

Thanks for help

[Yeray]

Hi Calou,

Try disabling the X order default:

Code: Select all

Series1.XValues.Order := loNone;

[Calou]

Thank you, it works good,

I have an other question. On a Tpolar how could i do to begin the graduation 0° at top instead of on the right?

Thanks

[Calou]

I find the solution with property rotation

Many thanks for help

[Yeray]

Hi Calou,

I'm glad to hear that!