sPageControl1

[aesoem]

а мемо ещё нет

[Stilet]

Создать его мешает великий Ктулху?

[aesoem]

Тема создана для 2 вещей...
Узнать как создать страницу и каК там разместить (СОЗДАТЬ) srichedit1

[alexBlack]

Думать не хотим

Компоненты в run-time создаются одинаково:

procedure TForm1.FormCreate(Sender: TObject);
var p:TTabSheet;
    M:TMemo;
begin
   p:=TTabSheet.Create(PageControl1);
   p.Visible:=true;
   p.PageControl:=PageControl1;
   PageControl1.ActivePage := p;

   M := TMemo.Create(Self);
   M.Parent := p;
end;

[aesoem]

alexBlack, спасибо!
А как ограничить кол-во одновременно открытых вкладок

[alexBlack]

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

alexBlack, спасибо!
А как ограничить кол-во одновременно открытых вкладок

В смысле ? Ты же их сам создаешь. Создавай сколько нужно и не более.

[mutabor]

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

alexBlack, спасибо!
А как ограничить кол-во одновременно открытых вкладок

счетчик заведи