paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 19:19:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart:

Browse Source 
- don't reset XChartXXX if AutoUpdateXXX is False
- correct loading component
(patch from Sileno Goedicke with modifications)

git-svn-id: trunk@14484 -
This commit is contained in:
paul 2008-03-10 11:27:20 +00:00
parent cadad3a03c
commit ac87b13fd2
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
components/tachart/tagraph.pas
View File

@ -336,10 +336,10 @@ type
published
{ Déclarations publiées }
procedure StyleChanged(Sender: TObject);
property AutoUpdateXMin:Boolean read FAutoUpdateXMin write SetAutoUpdateXMin;
property AutoUpdateXMax:Boolean read FAutoUpdateXMax write SetAutoUpdateXMax;
property AutoUpdateYMin:Boolean read FAutoUpdateYMin write SetAutoUpdateYMin;
property AutoUpdateYMax:Boolean read FAutoUpdateYMax write SetAutoUpdateYMax;
property AutoUpdateXMin:Boolean read FAutoUpdateXMin write SetAutoUpdateXMin default True;
property AutoUpdateXMax:Boolean read FAutoUpdateXMax write SetAutoUpdateXMax default True;
property AutoUpdateYMin:Boolean read FAutoUpdateYMin write SetAutoUpdateYMin default True;
property AutoUpdateYMax:Boolean read FAutoUpdateYMax write SetAutoUpdateYMax default True;
property XGraphMin:Double read FXGraphMin write SetXGraphMin;
property YGraphMin:Double read FYGraphMin write SetYGraphMin;
property XGraphMax:Double read FXGraphMax write SetXGraphMax;
@ -356,7 +356,7 @@ type
property Title: TChartTitle read FTitle write SetTitle;
property Foot: TChartTitle read FFoot write SetFoot;
property AllowZoom: Boolean read FAllowZoom write FAllowZoom;
property AllowZoom: Boolean read FAllowZoom write FAllowZoom default True;
property LeftAxis: TChartAxis read FLeftAxis write SetLeftAxis;
property BottomAxis: TChartAxis read FBottomAxis write SetBottomAxis;
@ -364,7 +364,7 @@ type
property BackColor: TColor read FBackColor write SetBackColor;
property AxisVisible: boolean read FAxisVisible write SetAxisVisible;
property AxisVisible: boolean read FAxisVisible write SetAxisVisible default True;
property Align;
property Color;
@ -1722,10 +1722,10 @@ begin
else
// 0 Points
begin
FXGraphMin:=0;
FXGraphMax:=0;
FYGraphMin:=0;
FYGraphMax:=0;
if FAutoUpdateXMin then FXGraphMin:=0;
if FAutoUpdateXMax then FXGraphMax:=0;
if FAutoUpdateYMin then FYGraphMin:=0;
if FAutoUpdateYMax then FYGraphMax:=0;
end;
end;
// Image <-> Graph coeff calculation