TExtraLegendTool Title property

TeeChart VCL for Borland/CodeGear/Embarcadero RAD Studio, Delphi and C++ Builder.
Post Reply
Bert B.
Newbie
Newbie
Posts: 69
Joined: Fri Jun 15, 2007 12:00 am

TExtraLegendTool Title property

Post by Bert B. » Wed Sep 19, 2007 8:09 am

It looks like the Title property of TExtraLegendTool is not working in TeeChart 7.12.

In the demonstration program Tee7New I cannot make the title visible too.

What do I need to do to make the title of the extra legend visible?

Regards,
Bert

Narcís
Site Admin
Site Admin
Posts: 14730
Joined: Mon Jun 09, 2003 4:00 am
Location: Banyoles, Catalonia
Contact:

Post by Narcís » Wed Sep 19, 2007 9:11 am

Hi Bert,

Yes, you are right. This has been fixed in TeeChart Pro v8 VCL.
Best Regards,
Narcís Calvet / Development & Support
Steema Software
Avinguda Montilivi 33, 17003 Girona, Catalonia
Tel: 34 972 218 797
http://www.steema.com
Image Image Image Image Image Image
Instructions - How to post in this forum

Bert B.
Newbie
Newbie
Posts: 69
Joined: Fri Jun 15, 2007 12:00 am

Post by Bert B. » Wed Sep 19, 2007 9:27 am

Hello Narcís,

Nice that this has been fixed in TeeChart 8, but I ordered TeeChart 7 two months ago.
At this time I cannot tell my boss to purchase a new version for this single fix.

Can you post the relevant changes to the source so that I can make it work in version 7?

Best regards,
Bert

Bert B.
Newbie
Newbie
Posts: 69
Joined: Fri Jun 15, 2007 12:00 am

Post by Bert B. » Fri Sep 28, 2007 6:50 am

I'm still waiting for a solution.

Bert B.
Newbie
Newbie
Posts: 69
Joined: Fri Jun 15, 2007 12:00 am

Post by Bert B. » Wed Oct 10, 2007 8:00 am

And waiting ...

Pep
Site Admin
Site Admin
Posts: 3295
Joined: Fri Nov 14, 2003 5:00 am
Contact:

Post by Pep » Mon Oct 15, 2007 3:11 pm

Hi Bert,

sorry for delay !
in order to fix it you have to go to the line 4305 at Chart.pas and change the following lines :

Code: Select all

    with Legend do
    begin
      IDrawTitle:=Title.Visible and (Title.Text.Text<>'');
      if IDrawTitle then Title.CalcHeight;
    end;
by these :

Code: Select all

  IDrawTitle:=Self.Title.Visible and (Self.Title.Text.Text<>'');
  if IDrawTitle then
  begin
    Self.Title.CalcHeight;
    ParentChart.Canvas.AssignFont(Self.Font); // Reset font again
  end;
This should fix it for v7.

Bert B.
Newbie
Newbie
Posts: 69
Joined: Fri Jun 15, 2007 12:00 am

Post by Bert B. » Tue Oct 16, 2007 7:49 am

This should fix it for v7.
Yes it does!
Thank you for your support.

Bert

Post Reply