Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Вниз

Цвет текста заголовка TTabSheet в TPageControl   Найти похожие ветки 

← →
Provodnick ©   (2007-04-09 14:40) [0]

Туплю. Помогите. Надо менять цвет текста заголовка TTabSheet по таймеру (мигание оного). Такой код не работает:


if PageControl.Pages[i].Font.Color = clWindowText then
 PageControl.Pages[i].Font.Color:=clRed
else
 PageControl.Pages[i].Font.Color:=clWindowText;


Никакие repaint`ы и updat`ы не помагают. Мож сообщение какое есть специальное?

---

← →
Johnmen ©   (2007-04-09 22:38) [1]

Такой код работает. Меняет цвет фонта визуальных контролов (у которых ПарентФонт=Тру) на указанной странице.
А тебе м.б. подойдёт PageControl.Pages[i].Highlighted:=True/False;

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.287 c