[Pavel_Aleksandrovich]

1) есть форма
2) на ней pagecontrol
3) во время создания формы я создаю неободимое число вкладок tabsheet
4) теперь надо на страницу вкладки поместить stringgrid, как эт сделать, есть следующие нюансы размеры stringgrid в каждой вкладке должны быть разными?

Код:

procedure TZadachiWindow.FormCreate(Sender: TObject);
begin
     if Form4.ComboBox1.ItemIndex<5
       then
           begin
                for i:=0 to 12 do
                   begin
                        if (i=2) or (i=4) or (i=10)
                          then continue
                          else
                              begin
                                   vkladki[i]:=ttabsheet.Create(self);
                                   vkladki[i].Caption:=namevkladok[i];
                                   vkladki[i].PageControl:=pagecontrol1;
                                   sg[i]:=tstringgrid.Create(self);
                              end;
                   end;
           end;

[poli-smen]

Сообщение от Pavel_Aleksandrovich

1) есть форма
2) на ней pagecontrol
3) во время создания формы я создаю неободимое число вкладок tabsheet
4) теперь надо на страницу вкладки поместить stringgrid, как эт сделать, есть следующие нюансы размеры stringgrid в каждой вкладке должны быть разными?

Код:

procedure TZadachiWindow.FormCreate(Sender: TObject);
begin
     if Form4.ComboBox1.ItemIndex<5
       then
           begin
                for i:=0 to 12 do
                   begin
                        if (i=2) or (i=4) or (i=10)
                          then continue
                          else
                              begin
                                   vkladki[i]:=ttabsheet.Create(self);
                                   vkladki[i].Caption:=namevkladok[i];
                                   vkladki[i].PageControl:=pagecontrol1;
                                   sg[i]:=tstringgrid.Create(self);
                              end;
                   end;
           end;

Код:

  sg[i].Parent := vkladki[i]; // Поместить StringGrid на вкладку
  sg[i].Width := ww[i]; // Задать ширину StringGrid'а
  sg[i].Height := hh[i]; // Задать высоту StringGrid'а