TPageControl

← →
nap<> (2006-02-20 12:29) [0]

Можно ли убрать закладки?

← →
stone © (2006-02-20 12:30) [1]

TabVisible = False

← →
nap<> (2006-02-20 12:32) [2]

A нету...

← →
Ega23 © (2006-02-20 12:33) [3]

> TabVisible = False

TTabSheet.TabVisible:=False;

← →
Ega23 © (2006-02-20 12:36) [4]

Вот, в общем случае как-то так:
procedure SetTabVisible(aPageControl:TPageControl; const aVisible:Boolean=False); var i:Integer; begin With aPageControl do begin for i:=0 to PageCount-1 do TTabSheet(Pages[i]).TabVisible:=aVisible; end; end;

← →
nap<> (2006-02-20 12:39) [5]

Вопрос неправильно задал.
Можно убрать видимую часть которая сверху.
Тоесть не сами tabSheet а просто на самом TPageControl

← →
Ega23 © (2006-02-20 12:47) [6]

> Вопрос неправильно задал.
> Можно убрать видимую часть которая сверху.
> Тоесть не сами tabSheet а просто на самом TPageControl

[4] чем не устраивает?

← →
Lexer © (2006-02-20 12:50) [7]

Убираем
TabSheet2.PageControl := nil;
Показываем
TabSheet2.PageControl := PageControl1; TabSheet2.PageIndex := TabSheet2.Tag;

В Tag прописываем позицию на PageControl.
Вместо Tag можно использовать доп. массив.

← →
Lexer © (2006-02-20 12:55) [8]

Сорри, неправильно понял вопрос, если убрать верхнюю часть, то действительно лучше использовать [4].

Где-то я совсем недавно такую ветку видел, там были точно такие же посты, только даты другие. И даже, вроде, ник вопрашающего совпадал.

← →
nap<> (2006-02-20 13:52) [10]

сорри я не догнал сразу
а переключатся как теперь межу закладками

TPageControl.ActivePageIndex

← →
nap<> (2006-02-20 14:00) [12]

дошло простите не проснулся

TPageControl Найти похожие ветки