TPageControl en tiempo de ejecución

[Rowerto]

Muchisimas gracias jachguate, ha sido una aclaracion diafana y cristalina.
Como cada tabsheet solo tiene un control (que es la stringgrid) lo unico que pongo es:

Código Delphi [-]
stri := Tstringgrid(pagecontrol1.Pages[z].Controls[0]);

y va todo como un tiro.

La verdad, que se me cayo la cara de vergüenza al ver lo simple y facil que era. Yo me estaba rompiendo los cuernos con Controls, Parents y este tipo de cosas... por lo que solo puedo repetir : GRACIAS POR LA AYUDA!!!!