Saludos a todos y Feliz Año Nuevo

Estoy intentando la creación de controles en runtime y soy incapaz de
hacerlo.

Pruebo con este ejemplo que está extraído de la Ayuda de Delphi:

procedure TForm1.FormCreate(Sender: TObject);

const
TabTitles: array[0..3] of ShortString = ('Customer', 'Orders', 'Items',
'Parts' );
var
i: Integer;
PageControl1: TPageControl;
begin
PageControl1 := TPageControl.Create(Self);
PageControl1.Parent := Self;
PageControl1.Align := alClient;
for i := Low(TabTitles) to High(TabTitles) do
with TTabSheet.Create(PageControl1) do
begin
PageControl := PageControl1;
Name := 'ts' + TabTitles[i];
Caption := TabTitles[i];
end;
end;

Hasta aquí todo bien, el problema viene cuando quiero crear un TEdit y un
TListBox, en cada una de las pestañas creadas, soy incapaz.
Muchas gracias anticipadas.