Текущий архив: 2002.11.14;
Скачать: CL | DM;

Вниз

используются ли XPStyles   Найти похожие ветки 

← →
d_oleg ©   (2002-11-05 10:53) [0]

Подскажите, можно ли как-нибудь определить, используется ли в данный момент пользователем под XP визуальные стили или установлен "классический" стиль?

---

← →
Ученик ©   (2002-11-05 11:22) [1]

{*******************************************************}
{ Borland Delphi Run-time Library }
{*******************************************************}

unit UxTheme;

...
IsThemeActive := GetProcAddress(ThemeLibrary, "IsThemeActive");
IsAppThemed := GetProcAddress(ThemeLibrary, "IsAppThemed");
...

function UseThemes: Boolean;
begin
if (ThemeLibrary > 0) then
Result := IsAppThemed and IsThemeActive
else
Result := False;
end;

---

← →
d_oleg ©   (2002-11-05 12:14) [2]

а что это за модуль такой? где взять?

---

← →
Ученик ©   (2002-11-05 12:25) [3]

>d_oleg © (05.11.02 12:14)
Модуль из Delphi 7, аналогичные есть в библиотеках, которые поддерживают XP-стиль.

Встречный вопрос: зачем узнавать используются или нет, если не использовать uxtheme.dll ?

---

← →
d_oleg ©   (2002-11-05 12:38) [4]

а можно его поиметь (по почте например)?

---

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

Текущий архив: 2002.11.14;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.017 c