TAdvToolBarPager not repainting Caption

[Koliasova_Eva (Martin Pesina)]

Hi,

Problem is for some reason here:

Ribbon.Caption.OnChange := CaptionChange;

procedure TForm1.CaptionChange(Sender: TObject);
begin
  ;
end;