一个小问题，请教！

Question

我要在一个确认按钮下（Button1)，判断如果是A那么就创建PagesControls中的一个新页面，如果是B就不创建。新的页面为TabSheetNew，上面的控件已设计好。如何做？请用代码示例，刚学DELPHI，请多指教。

Answer 1

功能实现为把已经设计好的另一个窗体放入新建的TabSheet页,你要的就是这个吧？判断自己写加了...procedure TForm1.Button1Click(Sender: TObject);
var
   TS:TTabSheet;
   PS:TPageScroller;
begin
  TS:=TTabSheet.Create(Application);
  with TS do
  begin
    PageControl := PageControl1;
    Caption:= 'MyTabTest';
  end;
  Form2 := TForm2.Create(Application);
  Form2.Parent := TS;
  Form2.Align := alClient;
  Form2.Show;
end;

Answer 2

不是的，我已在PagesControl 上设计了一个新的页面TabSheetNew，现在就是我点一个按钮后，判断如果符合某个条件，我才创建，否则不创建。

Answer 3

不用这么复杂吧,直接设置好
用TabVisible控制可见不可见不更好?