Wenn du einen leeren Chart hast, dann gibt es "Chart1.Series[0]" nicht. Frage in deinen Ereignisroutinen vorher ab, ob Chart1.SeriesCount > 0 ist. Also:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if Chart1.SeriesCount > 0 then Chart1.Series[0].Clear;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
if Chart1.SeriesCount > 0 then Chart1.Series[0].AddXY(Zeit, 100);
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
if Chart1.SeriesCount > 0 then Chart1.Series[0].AddXY(Zeit, 1825); // oder >
end;