Оконная процедура определяется следующим образом:

integer function MainWndProc (hWnd, mesg, wParam, lParam).

Первым параметром является hW n d, дескриптор получающего сообщение окна. Второй параметр – число, которое идентифицирует сообщение. Параметры wParam и lParam содержат дополнительную информацию о сообщении и называются «параметрами сообщения». Конкретное значение этих параметров определяется типом сообщения.

Обработка сообщений

Оконная процедура получает сообщения от Windows. Это могут быть сообщения о вводе, переданные функцией WinMain (например, WM_KEYDOWN, WM_KEYUP, WM_MOUSEMOVE, WM_TIMER), или сообщения системы управления окнами, поступающие непосредственно от Windows в обход очереди прикладной программы или цикла обработки сообщений (например, WM_CREATE, WM_DESTROY, WM_PAINT). Каждое получаемое окном сообщение идентифицируется номером, который содержится в параметре mesg оконной процедуры. В модуле MSFWINTY.F90 Fortran PowerStation 4.0 определены именованные константы, начинающиеся с префикса WМ для каждого типа сообщений.

Обычно используется конструкция select case для определения того, какое сообщение получила оконная процедура и как его обрабатывать. Если оконная процедура обрабатывает сообщение, то ее возвращаемым значением должен быть 0. Все сообщения, не обрабатываемые оконной процедурой, должны передаваться функции Windows, которая называется DefWindowProc. Значение, возвращаемое этой функцией, должно быть возвращаемым значением оконной процедуры.

Первое сообщение, которое получает оконная процедура – это WМ_СRЕАТЕ. Когда Windows обрабатывает функцию СreateWindow Ex в WinMain, она вызывает MainWndProc с дескриптором окна в качестве первого параметра и с W М_СRЕАТЕ в качестве второго. MainWndProc обрабатывает сообщение WМ_СRЕАТЕ и передает управление обратно в Windows, которая, в свою очередь, возвращается обратно в Win Ma in.

Следующим обрабатывается сообщение WM _ SIZE. Определяются размеры рабочей области, панели инструментов и панели состояния. Windows посылает в оконную процедуру сообщение WM _ SIZE при любом изменении размеров окна. Переменная lParam, переданная в оконную процедуру, содержит ширину рабочей области в младшем слове и высоту в старшем слове.

Сообщения WM _ PARENTNOTIFY и WM _ RBUTTONDOWN обрабатывают сообщения, поступающие соответственно от панели инструментов и всплывающего меню.

В программе необходимо обрабатывать символы клавиатуры, поэтому она должна обрабатывать сообщения WM _ CHAR. Параметр lParam, передаваемый в оконную процедуру как часть символьного сообщения, является таким же, как параметр lParam аппаратного сообщения клавиатуры, из которого сгенерировано символьное сообщение. Параметр wParam – это код символа ASCII. Особым образом обрабатываются клавиши <Backspace>, <Tab> и <Enter>. Все остальные символы обрабатываются похожим образом.

Сообщение WM _ KEYDOWN используется для определения нажатой клавиши или комбинации клавиш.

При щелчке мыши на разрешенном пункте меню генерируется сообщение WM _ COMMAND (при выборе недоступного или запрещенного пункта меню данное сообщение не генерируется).

Сообщение WМ_РАINТ сообщает программе, что часть или вся рабочая область окна недействительна, и ее следует перерисовать.

При создании окна недействительна вся рабочая зона, поскольку программа еще ничего в окне не нарисовала. При изменении размера окна рабочая область также становится недействительной и содержимое рабочей области не сохраняется. В графической среде это привело бы к тому, что пришлось бы хранить слишком много данных. Вместо этого Windows делает недействительным все окно. Оконная процедура получает сообщение W М_РАINТ и восстанавливает содержимое окна.

При перемещении окон так, что они перекрываются, Windows не сохраняет ту часть окна, которая закрывается другим окном. Когда эта часть окна позже открывается, Windows помечает его как недействительное. Оконная процедура получает сообщение W М_РАINТ для восстановления содержимого окна.

Последним сообщением является сообщение W М_DESTROY. Это сообщение показывает, что Windows находится в процессе ликвидации окна в ответ на полученную от пользователя команду. Программа стандартно реагирует на это сообщение, вызывая PostQuitMessage (0). Эта функция помещает сообщение WМ_QUIT в очередь сообщений программы. Когда функция GetMessage получает это сообщение, работа цикла обработки сообщений прерывается и программа заканчивает свою работу, выходя в систему.