Which property do I have to set to get rid of the space between bars and Y-as (or X-axis if you like). I have tried many options but all failed. The code used is listed below the picture.
Chart3.BeginUpdate;
Chart3.Panes[0].Series.Clear;
with Chart3.Panes[0] do
begin
XScaleOffset := True;
Options := [poHorzScroll];
Title.Text := 'Verdeling over gemeenschappen';
Title.Font.Color := clBlue;
Title.Font.Style := [fsBold];
series.ChartMode := dmHorizontal;
Range.RangeFrom := 0;
Range.RangeTo := 13; //couples.Count - 1;
YAxis.Position := yRight;
XAxis.Text := IIFString(cmxSyntaxLevel.ItemIndex = 1, 'verbonden', 'assocaties');
end;
with Chart3.Panes[0].Series.Add do
begin
ClearPoints;
ChartType := ctBar;
ValueWidth := 15;
ValueWidthType := wtPixels;
Color := RGB(255, 120, 120);
ColorTo := RGB(255, 175, 175);
BorderColor := clRed;
BorderWidth := 0;
ShowValue := False;
GradientType := gtHorizontal;
AutoRange := arEnabledZeroBased;
YScale := 10;
YAxis.Position := yRight;
Maximum := 100;
Minimum := 0;
for k := 0 to couples.Count - 1 do
AddSinglePoint(couples[k].Y, couples[k].X);
end;
Chart3.EndUpdate;