2 bugs: Series.Clicked() & font rendering

[Bert B.]

Hello,

I discovered 2 bugs (going from version 7.12 to 2011.03.30407) that are demonstrated in the attachment:
1) Click a line and see what .Clicked() returns. Version 7.12 counts from 0 and version 2011 counts from 1.
2) In version 7.12 the fonts are rendered with ClearType, in version 2011 they are not.

Regards,
Bert

TeeChart7.12.png (19.17 KiB) Viewed 10237 times

TeeChart2011.png (21.63 KiB) Viewed 10232 times

[Bert B.]

Another weird thing you may notice here that if you don't explicitly set the color to clRed it will get another color at runtime.

[Yeray]

Hello Bert,

1) Click a line and see what .Clicked() returns. Version 7.12 counts from 0 and version 2011 counts from 1.

Yes, I see in v2010.01 it still worked as you want, taking the index of the left point. And I see from v2010.02 it takes the index of the right point.
I've added it to the wish list to be investigated for future releases (TV52015540).

2) In version 7.12 the fonts are rendered with ClearType, in version 2011 they are not.

I think this is relative to an existing item in the wish list (TV52015253).
In the meanwhile you can workaround this adding the TeCanvas unit t the uses clause and setting the TeeFontAntiAlias as follows:

Code: Select all

TeeFontAntiAlias:=DEFAULT_QUALITY;

Another weird thing you may notice here that if you don't explicitly set the color to clRed it will get another color at runtime.

This is by design. We changed the default color palette to be used in new series to the OperaPalette.

[Bert B.]

Thanks for your answers.
I have modified my code and applied the workaround.

[Yeray]

Hello Bert,

Regarding to the clicked problem [TV52015540]. We've just fixed it in the sources.
If you are source code customer, you can apply the fix yourself in the Series.pas. See bellow a portion of the ClickedPoint function (nested function in TCustomSeries.Clicked function):

Code: Select all

     if (Index>=tmpFirst) and ClickableLine then
       if CheckPointInLine or (FDrawArea and PointInArea(Index)) then
         if GetHorizAxis.Inverted then
            result:=Succ(Index)
         else
            result:=Index;

Chang the last line on it to have the following:

Code: Select all

     if (Index>=tmpFirst) and ClickableLine then
       if CheckPointInLine or (FDrawArea and PointInArea(Index)) then
         if GetHorizAxis.Inverted then
            result:=Succ(Index)
         else
            result:=Pred(Index);

[Bert B.]

Another weird thing you may notice here that if you don't explicitly set the color to clRed it will get another color at runtime.

This is by design. We changed the default color palette to be used in new series to the OperaPalette.

This design change causes problems in Delphi 2010 (and maybe other versions). Take the example program and set the color of the LineSerie to clRed.
Now switch the form to text view (Alt+F12) and notice that SeriesColor is set to clRed. Switch back to form view.
At this time the property is lost although the lineserie is still shown in red. (You can confirm this by switching to text view again.) When you run the application the lineserie is blue again.
The color clRed is still regarded as the default color and does not get stored in the DFM.

Bert

[Sandra]

Hello Bert,

It is a know problem for us(TV52015546), how we have explained in this post. I recommend you to be aware at the following channels for new release announcements and what's implemented on them:
- Support forum.
- RSS news feed
- Twitter
- Facebook