![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
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; |