[true]

Код:

procedure TForm1.Button6Click(Sender: TObject);
begin
if PageControl1.Visible=False

then
PageControl1.Visible:=True

else
PageControl1.Visible:=False;

end;

Вот так получилось, а вот как сделать чтобы и кэпшен у кнопки менялся?