I'm trying to get a very basic horizontal Tee Chart working, but the Left Axis and label for the horizontal bars are the same.
I want the horizontal bar labels to either be hidden or display a numeric value like 10, 49, 100 etc.
The code to display the chart:
procedure TForm1.DrawHorzChart2( chart: TChart );
var
series: THorizBarSeries;
i: Integer;
s: String;
begin
series := THorizBarSeries.Create( chart );
series.ParentChart := chart;
for i := 1 to 10 do begin
s := 'item ' + IntToStr( i );
series.AddBar( i*i, s, clRed );
end;
// hide legend (box at right)
chart.Legend.Visible := False;
end;
I want the horizontal bar labels to either be hidden or display a numeric value like 10, 49, 100 etc.
The code to display the chart:
procedure TForm1.DrawHorzChart2( chart: TChart );
var
series: THorizBarSeries;
i: Integer;
s: String;
begin
series := THorizBarSeries.Create( chart );
series.ParentChart := chart;
for i := 1 to 10 do begin
s := 'item ' + IntToStr( i );
series.AddBar( i*i, s, clRed );
end;
// hide legend (box at right)
chart.Legend.Visible := False;
end;