delphi - 如何获取 activepageindex

  显示原文与译文双语对照的内容

如何通过编程方式从页控件的动态创建的tabsheet获取 activepageindex 。

我在网上搜索了一段时间没有任何运气。

如果答案是明显的,我深表歉意。

时间: 作者:

这样?


var
 NewTabSheet: TTabSheet;
begin
 NewTabSheet := TTabSheet.Create(PageControl1);
 NewTabSheet.PageControl := PageControl1;
 PageControl1.ActivePageIndex := PageControl1.PageCount-1;

...