Как изменить цвет кисти winapi

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131

// Hello2.cpp
#include "stdafx.h"
#include <windows.h>
 
LRESULT CALLBACK WinFun(HWND, UINT, WPARAM, LPARAM);
char WinName[] = "Мое окно"; // Имя класса окна
int WINAPI WinMain(HINSTANCE hIns, HINSTANCE hPrevIns, LPSTR arg, int WinMode)
{
    HWND hwnd; // Дескриптор окна
    MSG msg; // Содержит инф. о сообщении, посылаемом Windows
    WNDCLASSEX wcl; // Определяет класс окна
                    // Определение класса окна
    wcl.hInstance = hIns; // Дескриптор данного экземпляра
    wcl.lpszClassName = WinName; //Имя класса
    wcl.lpfnWndProc = WinFun; //Функция окна
    wcl.style = 0; //стиль по умолчанию
    wcl.cbSize = sizeof(WNDCLASSEX); //Размер структуры
    wcl.hIcon = LoadIcon(NULL, IDI_APPLICATION); //Большая пиктограмма
    wcl.hIconSm = LoadIcon(NULL, IDI_WINLOGO); //Малая пиктограмма
    wcl.hCursor = LoadCursor(NULL, IDC_ARROW); //Форма курсора
    wcl.lpszMenuName = NULL; //Меню не используется
    wcl.cbClsExtra = 0; // Дополнительная информация отсутствует
    wcl.cbWndExtra = 0;
    // Фон окна задается белым
    wcl.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
    // Регистрация класса окна
    if (!RegisterClassEx(&wcl)) return 0;
    // Создание окна
    hwnd = CreateWindow(
        WinName, // Имя класса окна
        "Мое простое окно", // Заголовок
        WS_OVERLAPPEDWINDOW, // Стандартное окно
        CW_USEDEFAULT, // Координата X- определяется Windows
        CW_USEDEFAULT, // Координата Y- определяется Windows
        CW_USEDEFAULT, // ширина- определяется Windows
        CW_USEDEFAULT, // высота- определяется Windows
        HWND_DESKTOP, // Родительского окна нет
        NULL, // Меню нет
        hIns, // дескриптор данного экземпляра приложения
        NULL); // дополнительных аргументов нет
    
        // Отображение окна
        ShowWindow(hwnd, WinMode);
    UpdateWindow(hwnd);
    // Цикл сообщений
    while (GetMessage(&msg, NULL, 0, 0))
    {
        TranslateMessage(&msg); // Разрешает использование клавиатуры
        DispatchMessage(&msg);
    }
    return msg.wParam;
}
// Эта функция вызывается Windows, которая передает ей сообщение
// из очереди сообщений
struct Line
{
    int x1, x2, y1, y2;
};
struct LineList // Список линий
{
    Line L;
    LineList *pNext;
};
LineList *pFirst = 0, *p;
void add(LineList *&pF, LineList *p)
{ // Добавляем элемент в начало списка
    p->pNext = pF;
    pF = p;
}
int x1, x2, y1, y2;
HPEN  pW;
HBRUSH pB;
LRESULT CALLBACK WinFun(HWND hwnd, UINT message,
    WPARAM wParam, LPARAM lParam)
{
    HDC hdc;
    PAINTSTRUCT ps;
    
        switch (message)
        {
        case WM_CREATE:
            pB = (HBRUSH)GetStockObject(BLACK_PEN);     
            pW = (HPEN)GetStockObject(WHITE_PEN);
            break;
        case WM_RBUTTONDOWN:
            x2 = x1 = LOWORD(lParam);
            y2 = y1 = HIWORD(lParam);
            break;
        case WM_MOUSEMOVE:
            if (wParam & MK_RBUTTON) // Определяем нажата ли правая кнопка мыши
            {
                hdc = GetDC(hwnd);
                SelectObject(hdc, pW);
                MoveToEx(hdc, x1, y1, (LPPOINT)NULL);
                LineTo(hdc, x2, y2);
                x2 = LOWORD(lParam);
                y2 = HIWORD(lParam);
                SelectObject(hdc, pB);
                MoveToEx(hdc, x1, y1, (LPPOINT)NULL);
                LineTo(hdc, x2, y2);
                ReleaseDC(hwnd, hdc);
            }
            break;
        case WM_RBUTTONUP: // Отпускаем правую кнопку мыши
            p = new LineList;
            p->L.x1 = x1; p->L.x2 = x2;
            p->L.y1 = y1; p->L.y2 = y2;
            add(pFirst, p);
            break;
        case WM_PAINT: // Перерисовка
            hdc = BeginPaint(hwnd, &ps);
            p = pFirst;
            while (p)// Прсматриваем спикок и рисуем линии
            {
                MoveToEx(hdc, p->L.x1, p->L.y1, (LPPOINT)NULL);
                LineTo(hdc, p->L.x2, p->L.y2);
                p = p->pNext;
            }
            EndPaint(hwnd, &ps);
            
                break;
        case WM_DESTROY: // Завершение программы
            PostQuitMessage(0);
            break;
        default:
            // Позволяет Windows обрабатывать любые сообщения,
            // не указанные в предыдущем случае
            return DefWindowProc(hwnd, message, wParam, lParam);
        }
    return 0;
}