Delphi中创建TRzTabSheet提示未声明标识符，TabSheet引用问题求助

API 探路者

2026-6-13

解决方案

1. 引入正确的组件单元

TRzTabSheet 属于Konopka组件库的RzTabs单元，你需要在TfrmDashboard所在的单元的uses子句中添加RzTabs——可放在interface或implementation部分，只要确保当前单元能识别TRzTabSheet类型即可。

2. 获取主窗体pgcMain的有效引用

按钮位于frmDashboard中，而frmDashboard的父容器是pgDashboard（隶属于主窗体的pgcMain），你可以通过两种方式获取pgcMain：

方式一：通过父容器层级定位

var
  pgcMain: TRzPageControl;
  newTab: TRzTabSheet;
  custForm: TfrmCustMain;
begin
  // 从当前窗体向上追溯找到TRzPageControl
  pgcMain := TRzPageControl(Self.Parent.Parent);
  // 创建新标签页
  newTab := TRzTabSheet.Create(pgcMain);
  newTab.PageControl := pgcMain;
  newTab.Caption := '客户管理';
  // 创建并宿主客户窗体
  custForm := TfrmCustMain.Create(pgcMain);
  custForm.Parent := newTab;
  custForm.Align := alClient;
  custForm.Visible := True;
  // 激活新标签页
  pgcMain.ActivePage := newTab;
end;

方式二：直接引用主窗体实例
如果主窗体是自动创建的，可直接使用frmMain.pgcMain，但要避免单元循环引用：将frmMain单元的引用放在TfrmDashboard单元的implementation部分的uses子句中（不要放在interface部分），之后代码里就能直接调用frmMain.pgcMain。