VPF::Из TPageControl сделать аналог TNoteBook'a

Delphist

Дата 2.4.2007, 18:30 (ссылка)

(нет голосов)

Загрузка ...

Delphist Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3

Мне нужно использовать TPageControl в качестве контейнера на TabSheet'ax которого я размещал бы нужный компоненты, при этом мне необходимо спрятать вкладки. Вместо PageControl'овских я хотел бы использовать вкладки TTabSet'a. Как мне это сделать? Да я мог бы конечно использовать TNotebook, но о к сожалению не поддерживает наследование.

--------------------

ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...

Yanis

Дата 2.4.2007, 19:16 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 6
Всего: 111

Ну в чём проблема то?
В VCL уже всё есть smile

Пример:

Код

  // сначала прячем все вкладки
  for i := 0 to PageControl1.Pages.Count - 1 do
    PageControl1.Pages[i].TabVisible := False;

  // принудительно активируем, например 2 вкладку
  PageControl1.ActivePage := PageControl1.Pages[2];

Добавлено через 3 минуты и 8 секунд
Кстати, оказывается на «О Delphi» всё уже подробно описали smile

смотрим...

Это сообщение отредактировал(а) Yanis - 2.4.2007, 19:16

--------------------

*щёлк*

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »