Ttabsheet в Tpagecontrol

Question

Когда использую Tpagecontrol в delphi и создаю TTabsheet, событие click кнопки на Ttabsheet не работает.

procedure TForm1.Demostration_ButtonClick(Sender: TObject);
begin
  MainMenuPage.TabVisible:=False;
  DemonstrationPage.TabVisible:=True;
end;

Создал несколько кнопок на одной Ttabsheet и записал событие click, но при запуске программы кнопки не работают.