[Booo]

Да создать это не проблема..почему у меня не создаеться вкладка вот так?:

Код:

for i:=0 to pagecontrol.pagecount -1 do
if pagecontrol.pages [i].caption <> '1' then
  begin
  tabsheet:=ttabsheet.Create(self);
  tabsheet.caption:='1';
  tabsheet.PageControl:=pagecontrol;
  end;