Спасибо Yeray за ваше решение, он работает хорошо.
Как и у меня, и нескольких диаграмм, и нескольких серий на одной диаграмме в моем первоначальном проекте, я закодировал следующую процедуру обхода. Я называю это для всех осей с автоматическим статусом, используемым хотя бы одной серией. Это решает проблему в любом случае.
procedure ChartBug2059_Workaround( AAxis : TChartAxis ;
AAxisMin, AAxisMax : double ) ;
begin
if IsAEqB( AxisMin, AxisMax ) then
begin
AAxis.Automatic:=False;
AAxis.SetMinMax(AxisMin-0.5, AxisMax+0.5);
end
else
AAxis.Automatic:=true;
end;