Fórum Chart #234600

Olá Pessoal,
Bom, criei uma aplicação, q eh a seguinte:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, TeEngine, Series, ExtCtrls, TeeProcs, Chart;

type
TFormPrincipal = class(TForm)
Chart1: TChart;
GroupBox1: TGroupBox;
Series1: TPieSeries;
EditFerrari: TEdit;
EditWilliams: TEdit;
EditMcLaren: TEdit;
EditRenault: TEdit;
EditSauber: TEdit;
ButtonPlotar: TButton;
ButtonFechar: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
procedure ButtonPlotarClick(Sender: TObject);
procedure ButtonFecharClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
FormPrincipal: TFormPrincipal;

implementation

{$R *.DFM}

procedure TFormPrincipal.ButtonPlotarClick(Sender: TObject);
//type
//Tconj = set of (clRed, clBlue, clGray, clGreen, clYellow);
var
//C:TColor;
F,W,M,R,S: Integer;
begin
F:=StrToint(EditFerrari.text);
W:=Strtoint(editwilliams.text);
M:=strtoint(editmclaren.text);
R:=Strtoint(editrenault.text);
S:=Strtoint(editsauber.text);
with Series1 do
begin
add(F, ´Ferrari´, clRed);
add(W, ´Williams´, clBlue);
add(M, ´McLaren´, clGray);
add(R, ´Renault´, clGreen);
add(S, ´Sauber´, clYellow);
end;
end;


procedure TFormPrincipal.ButtonFecharClick(Sender: TObject);
begin
close;
end;

end.


soh que quando eu clico em plotar de novo....
ele nao apaga os dados , ele vai dividindo mais ainda o grafico...
como faço pra ele zerar o grafico e começar ele desde o zero, soh o grafigo...
Valew