How do I change the increment size in this TGauge?
I have tried but it doesn't work:
Code: Select all
Chart1.Axes.Left.Increment := 50;
Code: Select all
Chart1.Axes.Left.Increment := 50;
Code: Select all
uses TeeCircularGauge;
procedure TForm1.FormCreate(Sender: TObject);
begin
with Chart1.AddSeries(TCircularGauge) as TCircularGauge do
begin
Axis.Increment:=5;
EndPoint.Color:=clRed;
GreenLine.Gradient.Visible:=false;
GreenLine.Color:=clYellow;
RedLine.Gradient.StartColor:=clYellow;
RedLine.Gradient.EndColor:=clMaroon;
end;
end;
Yeray Alonso Development & Support Steema Software Av. Montilivi 33, 17003 Girona, Catalonia (SP) | |
Please read our Bug Fixing Policy |