怎样为TPageControl动态添加标签页

编号：QA003804
建立日期: 2001年1月27日 最后修改日期：2001年1月27日
所属类别：

Delphi - Windows 9x控件

Andy:
    操作系统: windows2000 professional
    编程工具: delphi5.0
    问题: 怎样为TPageControl动态添加标签页？
    水平: 中级

回答:

    {动态创建页面}
    var NewTab:TTabSheet;
    begin
     NewTab:=TTabSheet.Create(self);
     NewTab.PageControl:= PageControl1;
     NewTab.Caption := '';
     PageControl1.ActivePage:=NewTab;
     NewTab.Name:='TabSheet';
    end;

此问题由房客/Jason回答。

把这个问题推荐给朋友         您的意见类别 更好的答案 希望得到进一步解释 我有有关代码可以提供给网友 链接错误 文字错误 其他 您的名字 您的电子邮件 您的建议(请尽可能详细)