How to do a Portfolio Chart with TChart?

TeeChart FireMonkey (Windows,OSX,iOS & Android) for Embarcadero RAD Studio, Delphi and C++ Builder (XE5+)
Post Reply
Roland
Newbie
Newbie
Posts: 20
Joined: Mon May 19, 2014 12:00 am

How to do a Portfolio Chart with TChart?

Post by Roland » Fri Apr 17, 2015 10:37 am

Hi,
I am trying to do a portfolio chart like http://ppmexecution.com/wp-content/uplo ... 24x747.jpg with TChart.
I thought the right charttype was Bubblechart, but when I use something like ...

Series1.AddBubble(1,1,0.2,'Portfoliobubble 1');
Series1.AddBubble(-1,-1,0.2,'Portfoliobubble 2');

... both bubbles are shown on top of each other and not - as I would have expected - in the bottom left and top right corners of the portfolio.

How can I achieve a portfoliochart with TChart?

Best regards

Roland

Yeray
Site Admin
Site Admin
Posts: 9514
Joined: Tue Dec 05, 2006 12:00 am
Location: Girona, Catalonia
Contact:

Re: How to do a Portfolio Chart with TChart?

Post by Yeray » Fri Apr 17, 2015 11:12 am

Hi Roland,

To put the Left and bottom axes in the middle of the chart:

Code: Select all

  Chart1.Axes.Left.PositionPercent:=50;
  Chart1.Axes.Bottom.PositionPercent:=50;
Best Regards,
ImageYeray Alonso
Development & Support
Steema Software
Av. Montilivi 33, 17003 Girona, Catalonia (SP)
Image Image Image Image Image Image Please read our Bug Fixing Policy

Roland
Newbie
Newbie
Posts: 20
Joined: Mon May 19, 2014 12:00 am

Re: How to do a Portfolio Chart with TChart?

Post by Roland » Fri Apr 17, 2015 1:17 pm

Hi Yeray,
thanks - I know that, but this does not solve my problem.
My problem is that the X value seems to be neglected when I use

Code: Select all

Series1.AddBubble(1,1,0.2,'test1');
Series1.AddBubble(-1,-1,0.2,'test2');
The bubbles are shown in the correct Y value position but in the same X value position.

What do I need to do to have them in different X positions?

Best regards and thanks for your effort

Roland

Yeray
Site Admin
Site Admin
Posts: 9514
Joined: Tue Dec 05, 2006 12:00 am
Location: Girona, Catalonia
Contact:

Re: How to do a Portfolio Chart with TChart?

Post by Yeray » Fri Apr 17, 2015 1:54 pm

Hi Roland,
Roland wrote: My problem is that the X value seems to be neglected when I use

Code: Select all

Series1.AddBubble(1,1,0.2,'test1');
Series1.AddBubble(-1,-1,0.2,'test2');
The bubbles are shown in the correct Y value position but in the same X value position.
I've added a chart to a new simple application using TeeChart v2015.14 and the following code:

Code: Select all

uses BubbleCh;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1.View3D:=false;

  with Chart1.AddSeries(TBubbleSeries) as TBubbleSeries do
  begin
    AddBubble(1,1,0.2,'test1');
    AddBubble(-1,-1,0.2,'test2');
  end;

  Chart1.Axes.Bottom.LabelStyle:=talValue;
end;
And this is what I get, that seems to be correct to me:
2015-04-17_1548.png
2015-04-17_1548.png (14.56 KiB) Viewed 15805 times
If this is not what you are getting please tell us what environment are you using (what exact TeeChart, IDE version and OS) and please arrange a simple example project we can run as-is to reproduce the problem here.

Thanks in advance.
Best Regards,
ImageYeray Alonso
Development & Support
Steema Software
Av. Montilivi 33, 17003 Girona, Catalonia (SP)
Image Image Image Image Image Image Please read our Bug Fixing Policy

Roland
Newbie
Newbie
Posts: 20
Joined: Mon May 19, 2014 12:00 am

Re: How to do a Portfolio Chart with TChart?

Post by Roland » Fri Apr 17, 2015 2:06 pm

Hi.
That works in the same way for me, but the problem is that I do not want digit values but simply good, neutral, bad labels on the axis and that on all sides of the chart ... (see attachment)

I had problems to get that.

Ok - I achieved what I wanted now, but I do not understand why I need to do it like that - imo it should be easier - perhabs it is and I simply use TChart not in a good way. But I guess a certain complexity cannot be prevented when a component is such mighty as TChart ...

I do it now as follows ...
I added four custom axises to the chart.

In the chart setup I do ...

Code: Select all

Chart.Axes.Left.Automatic := false;
Chart.Axes.Right.Automatic := false;
Chart.Axes.Bottom.Automatic := false;
Chart.Axes.Top.Automatic := false;
Chart.Axes.Left.Visible := false;
Chart.Axes.Right.Visible := false;
Chart.Axes.Bottom.Visible := false;
Chart.Axes.Top.Visible := false;
Series1.AddBubble(1,1,0.2,'test1');
Series1.AddBubble(-1,-1,0.2,'test2');
SetAxisLabelsGoodNeutralBad(0);
SetAxisLabelsGoodNeutralBad(1);
SetAxisLabelsGoodNeutralBad(2);
SetAxisLabelsGoodNeutralBad(3);
SetAxisLabelGoodNeutralBad contains ...

Code: Select all

  Chart.CustomAxes[AAxisId].Automatic := false;
  Chart.CustomAxes[AAxisId].Items.Clear;
  Chart.CustomAxes[AAxisId].Items.Add(1,'gut');
  Chart.CustomAxes[AAxisId].Items.Add(0,'neutral');
  Chart.CustomAxes[AAxisId].Items.Add(-1,'schlecht');
Please let me know if there is an easier way.

Thanks a lot again for your help.
Attachments
bubblechart-2015-04-17_160259.png
Chart I want to achieve as easy as possible
bubblechart-2015-04-17_160259.png (25.79 KiB) Viewed 15802 times

Yeray
Site Admin
Site Admin
Posts: 9514
Joined: Tue Dec 05, 2006 12:00 am
Location: Girona, Catalonia
Contact:

Re: How to do a Portfolio Chart with TChart?

Post by Yeray » Mon Apr 20, 2015 8:18 am

Hello,

You should be able to do the same using the default Left/Right/Top/Bottom axes instead of using Custom Axes:

Code: Select all

var Series1: TBubbleSeries;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart.View3D:=false;
  Series1:=Chart.AddSeries(TBubbleSeries) as TBubbleSeries;
  Series1.VertAxis:=aBothVertAxis;
  Series1.HorizAxis:=aBothHorizAxis;

  Series1.AddBubble(1,1,0.2,'test1');
  Series1.AddBubble(-1,-1,0.2,'test2');
  SetAxisLabelsGoodNeutralBad(Chart.Axes.Left);
  SetAxisLabelsGoodNeutralBad(Chart.Axes.Right);
  SetAxisLabelsGoodNeutralBad(Chart.Axes.Top);
  SetAxisLabelsGoodNeutralBad(Chart.Axes.Bottom);
end;

procedure TForm1.SetAxisLabelsGoodNeutralBad(AAxis: TChartAxis);
begin
  AAxis.Grid.Visible:=false;
  AAxis.Items.Clear;
  AAxis.Items.Add(1,'gut');
  AAxis.Items.Add(0,'neutral');
  AAxis.Items.Add(-1,'schlecht');
end;
I've seen InflateMargins doesn't work fine for the Top axis in the TBubbleSeries when HorizAxis=aBothHorizAxis, so I've added it to the public tracker (B1197), and I already fixed it for the next maintenance release.
Best Regards,
ImageYeray Alonso
Development & Support
Steema Software
Av. Montilivi 33, 17003 Girona, Catalonia (SP)
Image Image Image Image Image Image Please read our Bug Fixing Policy

Roland
Newbie
Newbie
Posts: 20
Joined: Mon May 19, 2014 12:00 am

Re: How to do a Portfolio Chart with TChart?

Post by Roland » Mon Apr 20, 2015 10:09 am

Super Support.
I will give your code a try. Thanks a lot.

Best regards

Roland

Roland
Newbie
Newbie
Posts: 20
Joined: Mon May 19, 2014 12:00 am

Re: How to do a Portfolio Chart with TChart?

Post by Roland » Wed Apr 22, 2015 3:36 pm

Works great.
Thanks.

Post Reply