Losing Increment value

[Blair]

I'm trying the following code.

Code: Select all

procedure TForm1.btnBuildClick(Sender: TObject);

Var tmpSeries : TCircularGauge;

begin
   tmpSeries := TCircularGauge.Create(Self);
   tmpSeries.Maximum  := 10;
   tmpSeries.Value    := 2.4;
    tmpSeries.ParentChart       := Chart1;
   Chart1.BottomAxis.Increment := 0.5       {<-------}
end;

procedure TForm1.btnSaveClick(Sender: TObject);
begin
 SaveChartToFile(TCustomChart(Chart1), 'Test.Tee', True, True);
end;

procedure TForm1.btnLoadClick(Sender: TObject);
begin
  LoadChartFromFile(TCustomChart(Chart1), 'Test.Tee');
end;

Checking the .tee file everything gets saved. But when I try reloading the increment doesn't load properly.

[Yeray]

Hello Blair,

I've checked it and I confirm it doesn't work well with TeeChart v2014.10. However, the gauges have been deeply redesigned so I've checked also with the actual sources we have here and it seem to work perfectly.
See the project attached, and the respective exe built with the actual sources:

testExportIncr.zip

(1.75 MiB) Downloaded 477 times

We expect to prepare new installers very soon.

[Blair]

Any chance for a hotfix?

[Yeray]

Hi Blair,

We should publish new installers soon. This would be the fix.