delphi - Delphi：向右滚动PageControl选项卡区域

Question

在运行时创建新选项卡后，我看到最后一个选项卡与选项卡标题区域中的系统 [<] 和 [>] 按钮重叠。如何将此区域滚动到最右边的位置？来自一个与我的应用程序相同的 c++ 应用程序的 Img。德尔福 7.

Answer 1

如果您不选择新创建的 TabSheet，您可以使用ScrollTabs，例如 PageCount 作为 delta，因为如果 delta 超出可能的范围，PageControl 将尽可能滚动。

   PageControl.ScrollTabs(PageControl.PageCount);

如果要选择创建的 TabSheet 并滚动到最右边的位置，您只需要设置 ActivePageIndex：

   PageControl.ActivePageIndex :=  PageControl.PageCount - 1;