Listenindex überschreitet das Maximum

[Lucky83]

Hat leider nicht geholfen..
Also ich erzeuge meinen Button folgenderweise:

Delphi-Quellcode:

procedure TFrmCRMMain.addJvOutlookButton(page:Integer;BtnIndex:Integer;Caption:Str15;ImgIndex:Integer;tag:Integer);
begin
  jvoutlookbar1.Pages[page].Buttons.Insert(BtnIndex);
  jvoutlookbar1.Pages[page].Buttons[BtnIndex].ImageIndex:=imgIndex;
  jvoutlookbar1.Pages[page].Buttons[BtnIndex].Caption:=caption;
  jvoutlookbar1.Pages[page].Buttons[BtnIndex].tag:=Tag;
end;

danach öffne ich das Formular und aktuallisiere die "Caption" über einen Timer wie oben beschrieben.
Das komische ist ja, dass die Fehlermeldung nicht immer kommt und ich konnte keinen Unterschied festetllen. Er durchläuft jedesmal einmal die for-Schleife....