VPF::Не применять стили ХР - Форум программистов

Манкуни@нец

Дата 10.12.2005, 20:05 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 42
Регистрация: 26.4.2005
Где: Spb

Репутация: нет
Всего: нет

Как можно сделать, чтобы прога вообше не использовала стили ХР, то есть при всех темах выглядела одинакого.
А то я использую АльфаКонтролс , а ХР всё время цепляет мне свою полосу прокрутки, а я хочу чтобы бы она всегда была такой какой она должна быть в АльфаКонтролс. У меня Дельфи 7.

Voyager

Дата 10.12.2005, 22:06 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 532
Регистрация: 8.2.2005

Репутация: 2
Всего: 18

Не подключать манифест.

Манкуни@нец

Дата 11.12.2005, 13:41 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 42
Регистрация: 26.4.2005
Где: Spb

Репутация: нет
Всего: нет

А можно по подробней? smile

Slayers

Дата 12.12.2005, 00:07 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 100
Регистрация: 17.7.2005
Где: Харьков

Репутация: нет
Всего: 1

Манкуни@нец, а у тебя кнопки тоже становятся в стиле XP ? . Например Button1 , если да то это манифест.

Манкуни@нец

Дата 12.12.2005, 11:02 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 42
Регистрация: 26.4.2005
Где: Spb

Репутация: нет
Всего: нет

Нет кнопки остаются альфаконтролс, а прокрутка он всё время хочет свою вставить

Тьма

Дата 12.12.2005, 16:24 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 339
Регистрация: 22.1.2005
Где: Украина, Винница

Репутация: 1
Всего: 4

Цитата

Нет кнопки остаются альфаконтролс, а прокрутка он всё время хочет свою вставить

значить глюк в альфаконтолс

--------------------

Vir magni ingenii

Tror

Дата 12.12.2005, 18:06 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 193
Регистрация: 29.4.2005
Где: Кишинёв

Репутация: нет
Всего: 4

дело в том что некоторые элементы окна, такие как заголовок окна, рамка и стандарные
скролбары, даже если ты не используешь манифест имеют стиль ХР.
попробуй вместо умолчальных скролбаров использовать явно созданные тобой.
тогда всё должно быть в порядке.

--------------------

Не говори всегда что знаешь, но знай всегда что говоришь. /Клавдий/============================================Кто может -- тот делает. Кто не может... тот получает сертификат MCSE ;)

Girder

Дата 12.12.2005, 19:01 (ссылка)

(нет голосов)

Загрузка ...

Лентяй 2

Профиль
Группа: Участник Клуба
Сообщений: 1993
Регистрация: 12.5.2004

Репутация: 31
Всего: 155

Код

uses UxTheme;

procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
 for i:=0 to ComponentCount-1 do
  if (Components[i] is TWinControl) then SetWindowTheme(TWinControl(Components[i]).Handle,'','');
 SetWindowTheme(TWinControl(Sender).Handle,'','');
end;

--------------------

Как слышим, так и пишим.
Истина где-то там...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »