Вниз
Скачать: CL | DM;

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);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.017 c
1-93927
Настенька
2004-02-15 08:40
2004.02.29
инсталляция нового компонента


1-93944
Mr. Chel
2004-02-17 13:07
2004.02.29
Delphi in Design-time


9-93746
TGrigory
2003-08-16 11:05
2004.02.29
Вывод текста на поверхность DXDraw


6-94060
BlackSun
2003-12-21 20:59
2004.02.29
Как скачать файл в поток?


1-93926
Sour
2004-02-15 12:39
2004.02.29
Координаты, точки в которой щелкнули мышью




   Наверх