Определить, что пользователь изменить схему оформления XPDelphi , ОС и Железо , WindowsОпределить, что пользователь изменить схему оформления XP
Оформил: DeeCo const WM_THEMECHANGED = $031A; type TForm1 = class(TForm) {...} private public procedure WMTHEMECHANGED(var Msg: TMessage); message WM_THEMECHANGED; end; {...} implementation {...} procedure TForm1.WMTHEMECHANGED(var Msg: TMessage); begin Label1.Caption := 'Theme changed'; Msg.Result := 0; end; Перевод текста на русский язык: Код Delphi обрабатывает сообщение Чтобы изменить схему XP, вам нужно модифицировать процедуру
Вот пример, как вы можете обновить шрифт метки:
В этом примере мы делаем текст метки жирным. Вы можете модифицировать этот код, чтобы он соответствовал вашим потребностям. Альтернативное решение: если вам нужно изменить схему XP, вам может потребоваться более сложный подход, например, использование тем или шкур. Delphi обеспечивает поддержку тем через компонент Обратите внимание, что этот код специфичен для Windows XP и может не работать на других платформах. Если вы планируете запускать приложение на нескольких версиях Windows, вам нужно будет адаптировать свой код соответствующим образом. В статье описывается пример программирования на Delphi, который позволяет изменять схему оформления Windows XP в приложении. Комментарии и вопросыМатериалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.
|
||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |