Diagramme in Delphi

[wireless]

Hallo Gemeinde,

ich erstelle ein Diagramm mit

with Series1 do
begin
Add( wert1, 'Stifte', clRed );
Add( wert2, 'Papier', clBlue );
Add( wert3, 'Farbbänder', clGreen );
Add ( wert4, 'Folien', clyellow);
end;

und löse die Sache über einen Button aus.
Wenn ich den Button mehrfach drücke, wird das Diagramm immer mehr mit den gleichen Daten gefüllt, also aus einen Balkendiagramm (oder Torte) mit 4 Daten wird dann immer mehr ---> 8, 12, 16 usw.

Wie kann mas das resetten???

Grüße und danke

wireless aus dem Vogtland