Beschriftung von TChart (PieSeries)

[marabu]

Meinst du sowas?

Delphi-Quellcode:

var
  ps: TPieSeries;
begin
  ps := TPieSeries.Create(myChart);
  myChart.AddSeries(ps);
  with ps do begin
    Circled := true;
    Add(40, 'labelA', clRed);
    Add(50, 'labelB', clGreen);
    Add(70, 'labelC', clBlue);
    Add(30, 'labelD', clYellow);
  end;
end;