Глючит TPageControl

← →
@!!ex © (2010-02-03 16:17) [0]

Выставил Tab Position tpLeft
К проекту подключен XPMan
Получается вот такая гадость:
http://develop.sol-online.org/bug.JPG

C отключенным XPMan все норм, но тогда прога в целом выглядит страшненько... не хочется отказываться от XPMan.

← →
@!!ex © (2010-02-03 16:18) [1]

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

← →
@!!ex © (2010-02-03 16:20) [2]

Если кто не понял по поводу гадости:
отсутствует текст.
Сами закладки выглядят как-то неестественно

← →
Anatoly Podgoretsky © (2010-02-03 16:28) [3]

> @!!ex (03.02.2010 16:20:02) [2]

Судя по рисунку формы темы отключены. Окна с подключеными темами выглядят иначе.

← →
Eraser © (2010-02-03 16:28) [4]

какая версия Делфи, у меня в 2010 все нормально.

← →
@!!ex © (2010-02-03 16:48) [5]

Вот так выглядит если XPMan отключить.
http://develop.sol-online.org/noxpman.JPG
В целом меня устраивает... но только если б ыможно было отключить использование XPMan только для этого конкретного контрола.

> [4] Eraser © (03.02.10 16:28)

Turbo Delphi Explorer

← →
Anatoly Podgoretsky © (2010-02-03 16:54) [6]

> @!!ex (03.02.2010 16:48:05) [5]

Это тоже окно с отключеными темами.

← →
@!!ex © (2010-02-03 16:55) [7]

> [6] Anatoly Podgoretsky © (03.02.10 16:54)

О каких темах речь? и как с ними связана проблема?

← →
Anatoly Podgoretsky © (2010-02-03 17:01) [8]

> @!!ex (03.02.2010 16:55:07) [7]

Это такая служба в ХР отвечающая за управление темами, называется "Темы". Когда темы используются то у окна верхнии углы круглые, у тебя же прямые. Управление через свойства рабочего стола и через апплет Службы.

← →
Вася (2010-02-03 18:30) [10]

> Судя по рисунку формы темы отключены. Окна с подключеными темами выглядят иначе.

да не.там как раз с темами всё...

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

это не ресурсы,это встроенная dll рисует на контроле сама из текущей темы оформления(тож в системе)...
вот так можно сделать:

uses UxTheme; procedure TForm1.FormCreate(Sender: TObject); begin UxTheme.SetWindowTheme(PageControl1.Handle, "", ""); end;

> [10] Вася (03.02.10 18:30)
> UxTheme.SetWindowTheme(PageControl1.Handle, "", "");

О! Помогло! Спасибо!!

Глючит TPageControl Найти похожие ветки