Как заставить приложение Delphi отвечать на сообщения Windows?

Delphi , Программа и Интерфейс , Приложение своё

Используем WM_WININICHANGED в качестве примера :

Объявление метода в TForm позволит вам обрабатывать сообщение WM_WININICHANGED:

procedure WMWinIniChange(var Message: TMessage); message WM_WININICHANGE;

Код в implementation может выглядеть так:

Code:

procedure TForm1.WMWinIniChange(var Message: TMessage);

               begin

                 inherited;

               {  ... ваша реакция на событие ... }

               end;

Вызов inherited метода очень важен. Обратите внимание также на то, что для функций, объявленных с директивой message (обработчиков событий Windows) после inherited нет имени наследуемой процедуры, потому что она может быть неизвестна или вообще отсутствовать (в этом случае вы в действительности вызываете процедуру DefaultHandler).

Статья Как заставить приложение Delphi отвечать на сообщения Windows? раздела Программа и Интерфейс Приложение своё может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Приложение своё ::

19.04.2024 07:56:44/0.041920900344849/2