Tab Control в XP

← →
lm (2005-11-20 01:20) [0]

Здравствуйте!
Помогите с проблемой:
У Tab Control-а в XP картинки в tab-ах перекрывают первую букву кэпшена tab-а.
Delphi 5. Картинки 16х16. Для поддержки XP тем используется TThemeManager, toSubclassTabSheet := true.
Можно, конечно, определять какая OC и для XP добивать слева кэпшены tab-ов пробелами, но, может кто знает более прямой способ?

← →
kami © (2005-11-20 02:23) [1]

Могу посоветовать использовать XPControls,(только что посмотрел - работает нормально) только там нужно будет подправить использование функции DrawThemeParentBackground везде, где найдешь, иначе полезут ошибки :).
http://www.torry.net/vcl/packs/interfacelite/xpcontrols.zip

Tab Control в XP Найти похожие ветки