Outlookbar hierarchisch mit Daten füllen

[needatip]

Ich möchte eine JVOutlookbar mit den Werten aus einer Datenbank füllen.
Und zwar soll diese nach Jahreszahlen geordnet erscheinen.
Die Jahreszahlen sollen dabei die Pages darstellen und das Feld Name die untergeordneten Buttons.

Die Tabelle hat in etwa folgenden Aufbau:

Code:

JAHR | NAME
1999 | Name1
1999 | Name2
2000 | Name3
2000 | Name4
2000 | Name5
2000 | Name6
2001 | Name7
2002 | Name8
2002 | Name9
2002 | Name10

d. h. ich bestimme zuerst die Jahreszahlen per SQL Script.
SELECT DISTINCT JAHR FROM TABELLE1 Diese ordne ich dann den einzelnen 'Pages' zu:

Delphi-Quellcode:

procedure TfmMain.FormCreate(Sender: TObject);
var NewBarPage : TJVOutlookBarPage;
begin
  with MyQuery do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT DISTINCT JAHR AS ADATUM, NAME FROM TABELLE1');
    Open;
    First;
    while not EOF do
    begin
      NewBarPage := JvOutlookBar1.Pages.Add;
      NewBarPage.Caption := FieldByName('ADATUM').Text;
      Next;
    end;
  end;
end;

so weit so gut, jetzt hab ich bereits die einzelnen Pages mit den Jahreszahlen.
wie kann ich nun für die einzelnen 'Pages' die untergeordneten Buttons mit den entsprechenden Namen erzeugen?

Aussehen soll das ganze dann in etwa so:

Code:

1999
  Name1
  Name2
2000
  Name3
  Name4
  Name5
  Name6
2001
  Name7
2002
  Name8
  Name9
  Name10

usw.

wer kann mir weiterhelfen, wie ich die Outlookbar richtig fülle?