Показать сообщение отдельно
  #1  
Старый 09.09.2012, 13:27
Pavel_Aleksandrovich Pavel_Aleksandrovich вне форума
Прохожий
 
Регистрация: 02.09.2012
Сообщения: 31
Репутация: 9
По умолчанию Создание stringgrid прграммно

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;
Ответить с цитированием