Modify height of legend

[Calou]

Hello,

I want to modify the height of a legend but if i do chart.legend.height:=newvalue nothing occur.

Is it possible to do it?

Thanks

Regards

[Yeray]

Hi Calou,

You could do as follows using OnGetLegendRect event:

Code: Select all

procedure TForm1.Chart1GetLegendRect(Sender: TCustomChart;
  var Rect: TRect);
begin
  Rect.Bottom := Chart1.Legend.Top + Chart1.Legend.Height + 50;
end;