Коллеги, как убрать крыжик ()закладку, кнопку) в TabSheet ?

← →
Yozch1 (2006-02-13 15:14) [0]

Сабж.

← →
Style © (2006-02-13 15:27) [1]

Непонятен вопрос

Может имеется ввиду TabControl?
или PageControl? Из которого нужно убрать TabSheet?

← →
Yozch1 (2006-02-13 15:32) [2]

PageControl, на нем TabSheet""ы. "Уши" нужно убрать.

← →
Style © (2006-02-13 15:33) [3]

Если я угадал то:

Скрыть саму закладку в PageControl можно так..

MyTabSheet.PageControl := nil;
чтобы показать
MyTabSheet.PageControl := MyPageControl;

если это TTabControl то просто нужно работать со свойство Tabs
которое является наследником TStrings. Добваляя или удаляя строки в список мы меняем закладки на TabControl...

← →
begin...end © (2006-02-13 15:37) [4]

TTabSheet.TabVisible ?

← →
Yozch1 (2006-02-13 15:38) [5]

TTabSheet.TabVisible - сам таб пропадает ;-)

← →
begin...end © (2006-02-13 15:41) [6]

> Yozch1 (13.02.06 15:38) [5]

1. Скрывать закладки, устанавливая TabVisible в False.
2. Показывать нужную страницу, назначая ActivePageIndex.
3. Радоваться.

← →
Desdechado © (2006-02-13 15:43) [7]

а как ты без "ушей" будешь давать юзеру переключаться между закладками?

← →
аноним (2006-02-13 15:51) [8]

TNotebook тебе в помощь...

← →
McSimm © (2006-02-13 15:52) [9]

> а как ты без "ушей" будешь давать юзеру переключаться между
> закладками?

разные способы есть :)

Например, довольно распрастранненый пример - кнопки "Back" и "Next"

← →
Yozch1 (2006-02-13 16:07) [10]

аноним, Desdechado
Ну прям как дети. Надо именно так. Для тех кто в танке - переключаться можно программно.

begin...end - скрываем не таб, а только "уши", по которым мышкой кликают.

Реальное решение по-моему в установке првильных CreateParams , но я не могу найти доку по этой теме ;-(

← →
begin...end © (2006-02-13 16:14) [11]

> Yozch1 (13.02.06 16:07) [10]
> скрываем не таб, а только "уши", по которым мышкой кликают.

Что понимается под "табом"? Что понимается под "ушами"?

← →
Style © (2006-02-13 16:16) [12]

Блин ну так тебе же написали PageControl1.ActivePageIndex устанавливаеш и все..

TabSheet1.TabVisible := false;
TabSheet2.TabVisible := false;

PageControl1.ActivePageIndex := 1; //Ушей нет, а тело есть...

Со своей постановкой вопроса всех сам запутал :)))

← →
antonn © (2006-02-13 17:29) [13]

Удалено модератором

← →
Плохиш © (2006-02-13 17:38) [14]

Удалено модератором

← →
Desdechado © (2006-02-13 17:49) [15]

> кнопки "Back" и "Next"
а смысл тогда в TPageControl"е?
можно обычными панелями обойтись

Конечно можно :)

Делаем N панелей, размещаем на каждой нужные элементы (тут правда помучатся придется - мешают), создаем свойства ActivePanelIndex, Count, скрываем неактивные и показываем активную. И никаких проблем, а если их еще и на страницы TPageConrol положить - вообще все просто становится. Так что можно и панелями обойтись. Кстати, и сами панели можно вообще убрать.
:)

(шутка, не обижайтесь :)

Я так делаю:
// Спрятать табуляторы
for I:=0 to pcPages.PageCount-1 do
pcPages.Pages[I].TabVisible := false;
// Показать текущий
pcPages.ActivePage := winMain;

может style поменять? или стороннюю компоненту какую?

А может стоит изучить TPageManager из RxLib?

TTabSheet.TabVisible о котором уже несколько раз сказали является решением вопроса. Именно для этого это свойство и существует, о чем обсуждение ?

TNotebook, между прочим без "ушей". И чем он не угодил автору вопроса?

Коллеги, как убрать крыжик ()закладку, кнопку) в TabSheet ? Найти похожие ветки