Обращение ко вкладке в PageControl

[Think_cleaR]

В общем идея какая? Есть PageСontrol. Вкладки создаются динамически. На каждую вкалдку нужно добавить таблицу, с разными значениями. У меня получается так, что таблица появляется только в первой вкладке. В чём проблема, подскажите пожалуйста?

j=0;
j++;
TTabSheet *crl1=new TTabSheet(this);
 crl1->Parent=this;
 crl1->PageControl=PageControl1;
 crl1->Caption="Открытка!";
 crl1->Align=taCenter;
 crl1->BorderWidth=10;
 crl1->Enabled=false;
TStringGrid *str=new TStringGrid(this);
 str->Parent=crl1;
 str->Left=50;
 str->Top=30;
 str->ColCount=2;
 str->RowCount=2;
 str->DefaultColWidth=30;
 str->Width=65;
 str->Height=53;
 str->FixedCols=0;
 str->FixedRows=0;
 str->Cells[1][1]=j;
 j++;

а если

 str->Parent=PageControl1;

то добавляется на все кроме первой одна и таже таблица. Значение в ней не меняется, почему-то.