Steema Issues Database

Note: This database is for bugs and wishes only. For technical support help, if you are a customer please visit our online forums;
otherwise you can use StackOverflow.
Before using this bug-tracker we recommend a look at this document, Steema Bug Fixing Policy.

Bug 1300

Summary:	Axis Texts.Position not persistent
Product:	VCL TeeChart	Reporter:	Bert Kreisel <bert.kreisel>
Component:	Axis	Assignee:	Steema Issue Manager <issuemanager>
Status:	CONFIRMED ---
Severity:	normal	CC:	sandra
Priority:	Normal
Version:	150420
Target Milestone:	---
Hardware:	PC
OS:	Windows
Chart Series:	---	Delphi / C++ Builder RAD IDE Version:	RAD XE5

Description Bert Kreisel 2015-09-11 07:16:47 EDT

Value of Axis.Texts.Position is not saved to tee file

Comment 1 sandra pazos 2015-09-18 07:07:59 EDT

Hello Bert Kreisel, 

Using the code below with latest TeeChart Pro VCL/FMX build number 2015.16.150901, the problem you are experiencing doesn't occur. 

uses TeeExport,TeeStore,TeCanvas; 
var Series1:TLineSeries;
procedure TForm1.FormCreate(Sender: TObject);
begin
Series1 :=TLineSeries.Create(self);
Chart1.AddSeries(Series1);
Series1.FillSampleValues(10);
Chart1.Axes.Left.Title.Visible := true;
Chart1.Axes.Left.Title.Text := 'Axis Left';
Chart1.Axes.Left.Title.TextAlignment := taLeftJustify;
Chart1.Axes.Left.Title.Position := tpCenter;
SaveChartToFile(TCustomChart(Chart1),ExtractFilePath(ParamStr(0))+'\ChartAxisPosition.tee');
Chart1.ClearChart;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
LoadChartfromFile(TCustomChart(Chart1),ExtractFilePath(ParamStr(0))+'\ChartAxisPosition.tee');
end;

I would like suggest you update your TeeChart Pro version to latest and check again if the problem you are experiencing appears for you. If the problem appears, please change the code above, so, we can reproduce it here.

Thanks in advance
Regards.

Comment 2 Bert Kreisel 2015-09-18 07:55:56 EDT

Hello Sandra,

please use texts.position and not title! 

procedure TForm1.FormCreate(Sender: TObject);
var Series1:TLineSeries;
begin
  Series1 :=TLineSeries.Create(self);
Chart1.AddSeries(Series1);
Series1.FillSampleValues(10);

Chart1.Axes.Left.Texts.Position := lpBeforeTick;

SaveChartToFile(TCustomChart(Chart1),ExtractFilePath(ParamStr(0))+'\ChartAxisPosition.tee');
Chart1.ClearChart;
end;

Thanks in advance
Regards.

Comment 3 sandra pazos 2015-09-18 09:21:31 EDT

Hello Bert,

Sorry! I have checked it again and I confirm it is a bug. 

Thanks.