Fehler in TPageScroller? (Er verliert Scroll-pfeile)

[toms]

Hallo

Folgendes Workaround funktioniert bei mir:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  Panel2.Width := 700;
  Button3.Width := 690;
  PageScroller1.AutoScroll := True;  //<---hinzufügen
  PageScroller1.AutoScroll := False; //<---hinzufügen
end;