Tal vez no sea a lo que te refieres, pero en Delphi 7 sería así:
Código Delphi
[-]type
TForm1 = class(TForm)
Chart1: TChart;
Series1: TPieSeries;
...
procedure TForm1.Button1Click(Sender: TObject);
begin
Series1.CustomXRadius := 80;
Series1.CustomYRadius := 90;
Quizá necesites explicar mejor tu requerimiento.
Saludos.
