Вниз
Скачать: 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.014 c
14-94113
ИМХО
2004-02-09 00:39
2004.02.29
Абрамович заарканил Роналдо и Роберто Карлоса


1-93882
atmospheric
2004-02-16 11:36
2004.02.29
public для function


4-94234
Gilk
2003-12-19 11:01
2004.02.29
Drop файлов


1-93956
Alex_x
2004-02-17 15:20
2004.02.29
Работа с ресурсами


1-93940
heady
2004-02-18 17:39
2004.02.29
Сменить иконку приложения




   Наверх