delphi - 通过选项卡标题或选项卡名称隐藏选项卡

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;