TabSheet en tiempo de ejecucion

[chechu]

Desde ya gracias por la ayuda que me puedan dar......................

Estoy trabajando con un PageControl en el cual las paginas(TabSheet) se crean en tiempo de ejecucion . Lo que hice son dos botones (externos al PageControl...) para poder desplazarme por dichas paginas en los cuales el codigo que utilize:

Procedure TForm.ToolButton1Click......
Begin
PageControl1.SelectNextPage(false);
end;

este es para el boton para ir a la pagina anterior.....Pero no hace nada cuando lo ejecuto ....que sera?