[icWasya]

> А как потом её вывести ?

Код:

procedure TForm1.NextButtonClick(Sender:TObject);
begin
  PageControl1.ActivePageIndex := PageControl1.ActivePageIndex+1;
end;