Определение собственных окон управления
Хотя Windows предлагает массу возможностей для поддержки окна диалога и дочерних окон элементов управления, имеются различные методы, позволяющие вставлять в этот процесс фрагменты собственного кода. Только что рассматривался метод, дающий возможность рисовать в окне диалога. Можно также использовать технику введения новой оконной процедуры (о котором рассказывалось в главе 8) для изменения поведения дочерних окон элементов управления.
Также можно определять собственные дочерние окна элементов управления и использовать их в окне диалога. Например, предположим, что пользователь предпочитает не прямоугольные кнопки, а эллипсоидные. Создать их можно путем регистрации класса окна и использования собственной оконной процедуры для обработки сообщений от такого специального дочернего окна. Затем этот класс окна задается в инструкции CONTROL шаблона окна диалога. Именно это делается в программе ABOUT3, представленной на рис. 11.5.
ABOUT3.MAK
#----------------------
# ABOUT3.MAK make file
#----------------------
about3.exe : about3.obj about3.res
$(LINKER) $(GUIFLAGS) -OUT:about3.exe about3.obj about3.res $(GUILIBS)
about3.obj : about3.c about3.h
$(CC) $(CFLAGS) about3.c
about3.res : about3.rc about3.h about3.ico
$(RC) $(RCVARS) about3.rc
ABOUT3.C
/*------------------------------------------
ABOUT3.C -- About Box Demo Program No. 3
(c) Charles Petzold, 1996
------------------------------------------*/
#include <windows.h>
#include "about3.h"
LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
BOOL CALLBACK AboutDlgProc (HWND, UINT, WPARAM, LPARAM) ;
LRESULT CALLBACK EllipPushWndProc (HWND, UINT, WPARAM, LPARAM) ;
int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
PSTR szCmdLine, int iCmdShow)
{
static char szAppName[] = "About3" ;
MSG msg ;
HWND hwnd ;
WNDCLASSEX wndclass ;
wndclass.cbSize = sizeof (wndclass) ;
wndclass.style = CS_HREDRAW | CS_VREDRAW ;
wndclass.lpfnWndProc = WndProc ;
wndclass.cbClsExtra = 0 ;
wndclass.cbWndExtra = 0 ;
wndclass.hInstance = hInstance ;
wndclass.hIcon = LoadIcon (hInstance, szAppName) ;
wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ;
wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH) ;
wndclass.lpszMenuName = szAppName ;
wndclass.lpszClassName = szAppName ;
wndclass.hIconSm = LoadIcon (hInstance, szAppName) ;
RegisterClassEx (&wndclass) ;
wndclass.cbSize = sizeof (wndclass) ;
wndclass.style = CS_HREDRAW | CS_VREDRAW ;
wndclass.lpfnWndProc = EllipPushWndProc ;
wndclass.cbClsExtra = 0 ;
wndclass.cbWndExtra = 0 ;
wndclass.hInstance = hInstance ;
wndclass.hIcon = NULL ;
wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ;
wndclass.hbrBackground = (HBRUSH) (COLOR_BTNFACE + 1) ;
wndclass.lpszMenuName = NULL ;
wndclass.lpszClassName = "EllipPush" ;
wndclass.hIconSm = NULL ;
RegisterClassEx (&wndclass) ;
hwnd = CreateWindow (szAppName, "About Box Demo Program",
WS_OVERLAPPEDWINDOW,
CW_USEDEFAULT, CW_USEDEFAULT,
CW_USEDEFAULT, CW_USEDEFAULT,
NULL, NULL, hInstance, NULL) ;
ShowWindow (hwnd, iCmdShow) ;
UpdateWindow (hwnd) ;
while (GetMessage (&msg, NULL, 0, 0))
{
TranslateMessage (&msg) ;
DispatchMessage (&msg) ;
}
return msg.wParam ;
}
LRESULT CALLBACK WndProc (HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
{
static HINSTANCE hInstance ;
switch (iMsg)
{
case WM_CREATE :
hInstance = ((LPCREATESTRUCT) lParam)->hInstance ;
return 0 ;
case WM_COMMAND :
switch (LOWORD (wParam))
{
case IDM_ABOUT :
DialogBox (hInstance, "AboutBox", hwnd,
AboutDlgProc) ;
return 0 ;
}
break ;
case WM_DESTROY :
PostQuitMessage (0) ;
return 0 ;
}
return DefWindowProc (hwnd, iMsg, wParam, lParam) ;
}
BOOL CALLBACK AboutDlgProc (HWND hDlg, UINT iMsg, WPARAM wParam, LPARAM lParam)
{
switch (iMsg)
{
case WM_INITDIALOG :
return TRUE ;
case WM_COMMAND :
switch (LOWORD (wParam))
{
case IDOK :
EndDialog (hDlg, 0) ;
return TRUE ;
}
break ;
}
return FALSE ;
}
LRESULT CALLBACK EllipPushWndProc (HWND hwnd, UINT iMsg, WPARAM wParam,
LPARAM lParam)
{
char szText[40] ;
HBRUSH hBrush ;
HDC hdc ;
PAINTSTRUCT ps ;
RECT rect ;
switch (iMsg)
{
case WM_PAINT :
GetClientRect (hwnd, &rect) ;
GetWindowText (hwnd, szText, sizeof (szText)) ;
hdc = BeginPaint (hwnd, &ps) ;
hBrush = CreateSolidBrush (GetSysColor (COLOR_WINDOW)) ;
hBrush = (HBRUSH) SelectObject (hdc, hBrush) ;
SetBkColor (hdc, GetSysColor (COLOR_WINDOW)) ;
SetTextColor (hdc, GetSysColor (COLOR_WINDOWTEXT)) ;
Ellipse (hdc, rect.left, rect.top, rect.right, rect.bottom) ;
DrawText (hdc, szText, -1, &rect,
DT_SINGLELINE | DT_CENTER | DT_VCENTER) ;
DeleteObject (SelectObject (hdc, hBrush)) ;
EndPaint (hwnd, &ps) ;
return 0 ;
case WM_KEYUP :
if (wParam != VK_SPACE)
break ;
// fall through
case WM_LBUTTONUP :
SendMessage (GetParent (hwnd), WM_COMMAND,
GetWindowLong (hwnd, GWL_ID), (LPARAM) hwnd) ;
return 0 ;
}
return DefWindowProc (hwnd, iMsg, wParam, lParam) ;
}
ABOUT3.RC
/*---------------------------
ABOUT3.RC resource script
---------------------------*/
#include <windows.h>
#include "about3.h"
about3 ICON about3.ico
About3 MENU
{
POPUP "&Help"
{
MENUITEM "&About About3...", IDM_ABOUT
}
}
#define TABGRP (WS_TABSTOP | WS_GROUP)
AboutBox DIALOG 20, 20, 160, 80
STYLE WS_POPUP | WS_DLGFRAME
{
CTEXT "About3" -1, 0, 12, 160, 8
ICON "About3" -1, 8, 8, 0, 0
CTEXT "About Box Demo Program" -1, 0, 36, 160, 8
CTEXT "(c) Charles Petzold, 1996" -1, 0, 48, 160, 8
CONTROL "OK" IDOK, "EllipPush", TABGRP, 64, 60, 32, 14
}
ABOUT3.H
/*----------------------
ABOUT3.H header file
----------------------*/
#define IDM_ABOUT 1
ABOUT3.ICO
Рис. 11.5. Программа ABOUT3
Класс окна, который мы будем регистрировать называется "EllipPush" эллипсоидная кнопка (elliptical push button). В шаблоне окна диалога вместо инструкции DEFPUSHBUTTON для задания класса окна используется инструкция CONTROL:
CONTROL "OK" IDOK, "EllipPush", TABGRP, 64, 60, 32, 14
Менеджер окна диалога использует этот класс окна при вызове функции CreateWindow, когда в окне диалога создается дочернее окно управления.
В файле ABOUT3.С класс окна "EllipPush" регистрируется в WinMain:
wndclass.cbSize = sizeof(wndclass) ;
wndclass.style = CS_HREDRAW | CS_VREDRAW ;
wndclass.lpfnWndProc = EllipPushWndProc ;
wndclass.cbClsExtra = 0 ;
wndclass.cbWndExtra = 0 ;
wndclass.hInstance = hInstance ;
wndclass.hIcon = NULL ;
wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ;
wndclass.hbrBackground = (HBRUSH) (COLOR_BTNFACE +1) ;
wndclass.lpszMenuName = NULL ;
wndclass.lpszClassName = "EllipPush" ;
wndclass.hIconSm = NULL ;
RegisterClassEx (&wndclass) ;
В этом классе окна задается, что оконной процедурой является функция EllipPushWndProc, которая также находится в файле ABOUT3.С.
Оконная процедура EllipPushWndProc обрабатывает только три сообщения: WM_PAINT, WM_KEYUP и WM_LBUTTONUP. При обработке сообщения WM_PAINT она при помощи функции GetClientRect получает размер своего окна, а при помощи функции GetWindowText — текст, отображаемый на кнопке. Для рисования эллипса и текста используются функции Windows Ellipse и DrawText.
Сообщения WM_KEYUP и WM_LBUTTONUP обрабатываются очень просто:
case WM_KEYUP :
if (wParam != VK_SPACE)
break ;
// идем дальше
case WM_LBUTTONUP :
SendMessage (GetParent (hwnd), WM_COMMAND,
GetWindowLong (hwnd, GWL_ID), (LPARAM) hwnd) ;
return 0 ;
Рис. 11.6. Собственная кнопка, созданная программой ABOUT3
Оконная процедура с помощью функции GetParent получает описатель своего родительского окна (окна диалога) и посылает ему сообщение WM_COMMAND с параметром wParam равным идентификатору дочернего окна элемента управления, который получен с помощью функции GetWindowLong. Затем оконная процедура диалогового окна передает это сообщение процедуре диалога программы ABOUT3. В результате создана своя собственная кнопка, показанная на рис. 11.6. Для создания других пользовательских окон элементов управления в окне диалога можно использовать точно такой же метод.
Действительно ли это все, что нужно? К сожалению, нет. Процедура EllipPushWndProc — это лишь основа той логики, которая обычно применяется для поддержки дочернего окна элемента управления. Например, созданная кнопка никак внешне не реагирует на нажатие, как это происходит с нормальной кнопкой. Для инвертирования цвета внутренней области кнопки оконная процедура должна обрабатывать сообщения WM_KEYDOWN (от клавиши <Spacebar>) и WM_LBUTTONDOWN. Кроме этого, в ответ на сообщение WM_LBUTTONDOWN оконной процедуре следует захватывать мышь (capture) и освобождать (release) ее (и возвращать кнопке нормальный цвет), если мышь перемещается вне рабочей области окна кнопки, в то время как кнопка мыши остается нажатой. Дочернее окно должно посылать своему родительскому окну сообщение WM_COMMAND только в том случае, если кнопка мыши отпускается в тот момент, когда мышь еще захвачена.
Кроме этого, EllipPushWndProc не обрабатывает сообщения WM_ENABLE. Как уже упоминалось выше, с помощью функции EnableWindow процедура диалога может сделать окно недоступным. Текст в дочернем окне можно было бы выводить в сером, а не черном цвете, чтобы показать, что окно элемента управления недоступно и не может получать сообщений.
Если в оконной процедуре дочернего окна элемента управления нужно хранить данные, которые отличаются для каждого создаваемого окна, то задаются положительные значения поля cbWndExtra в структуре класса окна. Это резервирует память во внутренней структуре окна, доступ к которой можно получить используя функции SetWindowWord, SetWindowLong, GetWindowWord и GetWindowLong.