Насчет visible не проканает потомучто останется кусок который мне будет ненужен, но все равно спасибо за совет

Может кто нить подкинет идейку )
Щас пробую насчет визибл я совсем новичек я хочу примерно такое:
Код:
procedure TForm1.Button6Click(Sender: TObject);
begin
PageControl1.Visible:=False;
if Button1.Click then
PageControl1.Visible:=True;
end;
end.