Delphi 7 и Windows 7 (XP Manifest)

@SunRain · Регистрация: 03.09.2012

Author24 — интернет-сервис помощи студентам

Недавно столкнулся с оной, известной многим проблемой: у программ, написанных на Delphi 7 с использованием XP Manifest в Windows 7 визуально пропадают кнопки.
В качестве решения, многие предлагают привязать метод Repaint к событию KeyUp, но мне не помогло.

Delphi

begin
  for i:=0 to (ComponentCount - 1) do
  begin
    if(Components[i].ClassType = TButton) then
      TButton(Components[i]).Repaint;
  end;
end;

P.S.Аналогичное решение с Repaint предлагают вешать на событие OnTimer, но это тоже не вариант - программа начинает виснуть.

Посоветуйте, как с этим бороться!

Добавлено через 1 час 55 минут
Up! Гуру, ответьте, please..

@Alex_pac · 11.10.2012, 21:16

перекомпилируй под Delphi 2007 без XPmanifest

там вроде по дефолту контролы как XP рисуются

@SunRain · 11.10.2012, 23:06 **[ТС]**

Один в один не компилируется, а долго копаться в коде не слишком хочется: первый серьезный проект хотелось бы полностью сделать под 7, а уже потом переходить на "взрослую" XE..(

@Alex_pac · 11.10.2012, 23:37

Delphi 2007 это не XE. Самая старшая из ANSI версий delphi (не юникод). Проект из Delphi 7 должен под ней скомпилироваться без значительных изменений.

Могу намекнуть что проще поставить Lite версию.

@SunRain · 12.10.2012, 11:38 **[ТС]**

Я знаю, что это не XE..)

Просто интересно знать, есть ли в 7 какое-то адекватное решение этой проблемы, или его не существует в принципе..?

@adidas7 · 12.10.2012, 18:04

можешь полностью прогу скинуть????+ решение есть всегда!!!!!!! просто надо его найти))) возможно xpmanifest не хочет принимать win7 у меня такое было)) страшная штука)) попробуй удалить имеющиеся на кнопке формы и по новой их закинь туда, пропиши код и потом уже кидай xpmanifest,должно помоч(мне помогло)

01.06.2013, 15:06

Можно ли исправить такой косяк XP Manifest, так же при наведении на 2-й DBCheckBox становиться как первый

@Alex_pac 1302 / 708 / 107 Регистрация: 25.05.2011 Сообщений: 2,158 Записей в блоге: 51
	11.10.2012, 21:16	2
	перекомпилируй под Delphi 2007 без XPmanifest там вроде по дефолту контролы как XP рисуются 0

@SunRain 13 / 13 / 2 Регистрация: 03.09.2012 Сообщений: 133
	11.10.2012, 23:06 [ТС]	3
	Один в один не компилируется, а долго копаться в коде не слишком хочется: первый серьезный проект хотелось бы полностью сделать под 7, а уже потом переходить на "взрослую" XE..( 0

@Alex_pac 1302 / 708 / 107 Регистрация: 25.05.2011 Сообщений: 2,158 Записей в блоге: 51
	11.10.2012, 23:37	4
	Delphi 2007 это не XE. Самая старшая из ANSI версий delphi (не юникод). Проект из Delphi 7 должен под ней скомпилироваться без значительных изменений. Могу намекнуть что проще поставить Lite версию. 1

@SunRain 13 / 13 / 2 Регистрация: 03.09.2012 Сообщений: 133
	12.10.2012, 11:38 [ТС]	5
	Я знаю, что это не XE..) Просто интересно знать, есть ли в 7 какое-то адекватное решение этой проблемы, или его не существует в принципе..? 0

@adidas7 4 / 4 / 1 Регистрация: 09.02.2012 Сообщений: 65
	12.10.2012, 18:04	6
	можешь полностью прогу скинуть????+ решение есть всегда!!!!!!! просто надо его найти))) возможно xpmanifest не хочет принимать win7 у меня такое было)) страшная штука)) попробуй удалить имеющиеся на кнопке формы и по новой их закинь туда, пропиши код и потом уже кидай xpmanifest,должно помоч(мне помогло) 0

Idea804
	01.06.2013, 15:06	7
	Можно ли исправить такой косяк XP Manifest, так же при наведении на 2-й DBCheckBox становиться как первый Миниатюры