通过标签页标题或标签页名称隐藏标签页

Question

Delphi中是否有任何解决方案可以在页面控件中隐藏/取消隐藏标签页，而不是使用此代码

procedure TForm1.BitBtnClick(Sender: TObject);
var
  i: Integer;
begin
  for i := 0 to PageControl1.PageCount - 1 do
  begin
     PageControl1.Pages[i].TabVisible := False; // true to make it visible...
  end;
end;

但在使用标签页名称或标签页标题时执行此任务

Answer 1

通过设置TabVisible属性来执行隐藏标签页。这是做到这一点的方法。

也许您要做的是通过其标题识别标签页。你可以这样做：

for i := 0 to PageControl1.PageCount - 1 do
  if PageControl1.Pages[i].Caption = TargetCaption then
    PageControl1.Pages[i].TabVisible := False;