Можно ли обратиться к закладке в Pagecontrol по ее имени?

function GetTabByName(PageControl: TdbPageControl; TabCaption: string): TTabSheet;
var
    i: integer;
begin
    result := nil;
    for i := 0 to PageControl.PageCount-1 do
    begin
        if PageControl.Pages[i].Caption = TabCaption then
        begin
            result := PageControl.Pages[i];
            break;
        end;
    end;
end;


// как использовать функцию GetTabByName
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var
    tab: TTabSheet;
begin
    tab := GetTabByName(Form1.PageControl1, 'Вкладка 2');
    if tab <> nil then tab.TabVisible := False;
end;