我该怎么办?
procedure TMyForm.Button1Click(Sender: TObject); begin PageControl1.ActivePage := TabSheet1; end;