TChart mit mehreren Bars

[VkPenguin]

Ich meinte einfach den Programmstart mit Quelltexthaltepunkten (F9). Ja, das wirds dann wohl sein, ok. Entschuldigt dann bitte die dumme Frage, ich hab mein XE7 ganz neu und war mir dessen nicht bewusst.

Also aber zurück zum eigentlichen Thema: Ja, es gibt ein Problem. Ich schicke euch mal den Quelltext meines Testprogramms:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, VclTee.TeeGDIPlus, VCLTee.TeEngine,
  VCLTee.Series, Vcl.StdCtrls, Vcl.ExtCtrls, VCLTee.TeeProcs, VCLTee.Chart;

type
  TForm1 = class(TForm)
    Chart1: TChart;
    Button1: TButton;
    Series1: THorizBarSeries;
    Series2: THorizBarSeries;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
With Series1 do
begin
  Add (5, 'Pears', clRed);
  Add (4, 'Apples', clRed);
  Add (4, 'Oranges', clRed);
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
With Series2 do
begin
  Add (5, 'Pears', clBlue);
  Add (6, 'Apples', clBlue);
  Add (16, 'Oranges', clBlue);
end;
end;

end.

Was ich erwartet hätte/möchte:
Programmstart - leerer Chart (funktioniert)
Button1Click - Drei rote Balken, alle über die volle Länge, da es ja noch keine anderen Daten gibt, die Werte also jeweils 100% entsprechen (funktioniert)
Button2Click - Die drei Balken sollen jetzt 50/50,40/60,20/80 Verhältnisse anzeigen (stattdessen überlagern sich die Balken scheinbar, nur die Achsenskalierung ändert sich, aber der Balken bleibt 100% rot).

Wo liegt der Fehler? Es scheint jedenfalls immer so zu sein, dass die Rote Serie die Blaue überlagert, anstatt sich zu ergänzen...

Danke!