TTabSheet(Page control) в Рантайм

← →
xobbit (2004-02-16 02:52) [0]

Мастера - подскажите:
Пытаюсь сделать, чтоб в рантайме создавалась новая страница в PageControl. Делаю так...
var New : TTabSheet; begin New:=TTabSheet.Create(Form1.PageControl); New.Name:="TabSheet2"; New.Parent:=PageControl;
...и ничего не получается :(. Как надо ?

← →
Defunct © (2004-02-16 03:11) [1]

.. New:=TTabSheet.Create(PageControl); New.PageControl:=PageControl; New.Caption:="Name"; PageControl.ActivePageIndex:= New.TabIndex; PageControl.ActivePage:=New; New.ImageIndex:= ImageIndex; // Если надо ..

← →
xobbit (2004-02-16 05:29) [2]

Вторая страница появляется., но она без корешка.. Что у меня опять нетак?

← →
dr Tr0jan © (2004-02-16 06:01) [3]

http://delphimaster.net/view/1-1076888911/

Babay © (16.02.04 05:13) [6]

Каждый TabSheet имеет свойство TabVisible поставте его в False. Думаю это поможет.

Поставь свойство TabVisible:=True тогда появятся корешки.

← →
xobbit (2004-02-16 17:03) [4]

Не, не помогает :(.. Всмысле TabVisible..

← →
KSergey © (2004-02-16 17:08) [5]

> [2] xobbit (16.02.04 05:29)
> Вторая страница появляется., но она без корешка.. Что у
> меня опять нетак?

Откуда же нам-то это знать???

← →
xobbit (2004-02-16 17:10) [6]

А, все - разобрался :) Надо было писать
New:=TTabSheet.Create(PageControl);

← →
xobbit (2004-02-16 17:11) [7]

В смысле вот так:New:=TTabSheet.Create(Self);

TTabSheet(Page control) в Рантайм Найти похожие ветки