codice:
 
procedure XXX.NewSheet();
  var NewTabSheet: TTabSheet;
begin
  NewTabSheet := TTabSheet.Create(Self);
  NewTabSheet.Caption := 'Nuova pagina';
  NewTabSheet.PageControl := APageControl;
end;
In questo caso la tua procedura é orfana.
Sostituisci al posto di XXX il nome della tua form.