Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как убрать заголовки страниц в TabControl?


nester ©   (2004-03-19 20:01:00) 

Как убрать заголовки страниц в TabControl? Чтобы сами страницы существовали, но юзер их переключать мышкой тыкая по закладкам не мог, чтобы закладок вообще в принципе не было? Чтобы переключаться программно.
А вообще мне нужно это для создания визарда, чтобы при нажатии некст/бэк показывалась соответствующая страница. Или посоветуйте другой способ как это сделать.
Только не придлагайте пожалуйста менять всем контролам висибл:)


nester   (2004-03-22 10:34:00) [1]

Скорее всего вы имели в виду TC_DisplayRect, а не TB_DisplayRect.
В итоге код у меня получился такой

r:= TabControl1.TC_Pages[0].TC_DisplayRect;
r.Left:= r.Left + 4;
r.Right:= r.Right + 4 ;
r.Bottom:= r.Bottom + 4;
r.Top:= r.Top + 4;
SetWindowRgn(TabControl1.Handle, CreateRectRgnIndirect(r), false);

+4 нужно для того, чтобы убрать смещение небольшое и спрятать остатки видимости 3D.
Я правильно понял ваш совет?


Владимир Кладов   (2004-03-20 09:13:00) [2]

SetWindowRgn. Для вычисления региона есть функция TB_DisplayRect. Заголовки лучше переместить вниз. В дизайне удобно переключаться, в ран-тайме их просто нет.


Наверх

Титульная страница Поиск, карта сайта Написать письмо