190

использовании задаваемого по умолчанию пропорционального шрифта. Для того, чтобы получить выравненное изображение, код для вывода каждой строки пришлось бы разбить на девять секций. Чтобы избежать всех этих трудностей, гораздо легче просто использовать фиксированный шрифт. Как уже говорилось в последней главе, для этого нужны две функции, которые здесь объединены в одну инструкцию:

SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT));

Программа KEYLOOK вызывает эти две функции везде, где она получает контекст устройства. Это происходит в трех местах: в функции ShowKey, при обработке сообщения WM_CREATE в WndProc и при обработке сообщения WM_PAINT. Функция GetStockObject получает описатель стандартного графического объекта, каковым является фиксированный шрифт, используемый в ранних версиях Windows, предшествовавших Windows 3.0. Вызов функции SelectObject выбирает этот объект в контекст устройства. Благодаря этому вызову, весь текст будет выводиться на экран фиксированным шрифтом. Вернуться обратно к пропорциональному шрифту можно с помощью функции:

SelectObject(hdc, GetStockObject(SYSTEM_FONT));

Функция ShowKey вызывает ScrollWindow для прокрутки вверх предыдущих строк перед выводом новой строки. Обычно это приводит к тому, что часть окна становится недействительной, и следовательно генерируется сообщение WM_PAINT. Для того, чтобы этого избежать, в функцию ShowKey включен вызов функции

ValidateRect.

Программа KEYLOOK не хранит полученные аппаратные сообщения клавиатуры, поэтому по получении сообщения WM_PAINT она не может перерисовать окно. По этой причине KEYLOOK просто выводит заголовок таблицы в верхней части рабочей области при обработке сообщения WM_PAINT. Перед вызовом функции BeginPaint, при обработке сообщения WM_PAINT, KEYLOOK делает недействительным все окно. Это позволяет стереть все окно, вместо того, чтобы стирать недействительный прямоугольник.

(То, что программа KEYLOOK не хранит полученные аппаратные сообщения клавиатуры, и следовательно не может перерисовать окно, пока обрабатывается сообщение WM_PAINT, несомненно является недостатком. В программе TYPER, показанной далее в этой главе, эта недостаток устранен.)

Вверху рабочей области программа KEYLOOK рисует заголовок таблицы и, таким образом, идентифицирует девять столбцов. Хотя можно создать шрифт, в котором символы будут подчеркнуты, здесь применяется немного другой подход. Определены две переменные типа строка символов, которые называются szTop (в ней содержится текст) и szUnd (в ней содержатся символы подчеркивания) и при обработке сообщения WM_PAINT они выводятся в одну и ту же позицию в верхней части окна. Обычно Windows выводит текст в режиме "opaque", означающим, что Windows обновляет область фона символа при его выводе на экран. Использование этого режима фона может привести к тому, что вторая символьная строка (szUnd) сотрет первую (szTop). Чтобы предотвратить это, переключите контекст устройства в режим "transparent" (режим без заполнения фона символов):

SetBkMode(hdc, TRANSPARENT);

Каретка (не курсор)

Когда вы в программе набираете текст, обычно маленький символ подчеркивания или маленький четырехугольник показывает вам место, где следующий набираемый вами символ появится на экране. Вы можете считать, что это курсор (cursor), но, если вы программируете для Windows, необходимо отказаться от такого представления. В Windows это называется "каретка" (caret). Слово же "курсор" относится к битовому образу, отражающему положение мыши на экране.

Функции работы с кареткой

Здесь перечислены пять основных функций работы с кареткой:

•CreateCaret — создает связанную с окном каретку.

•SetCaretPos — устанавливает положение каретки в окне.

•ShowCaret — показывает каретку.

•HideCaret — прячет каретку.

•DestroyCaret — удаляет каретку.

Кроме этих, еще имеется функция получения положения каретки (GetCaretPos) и функции установки и получения частоты мигания каретки (GetCaretBlinkTime) и (SetCaretBlinkTime).

Каретка — это обычно горизонтальная черточка или прямоугольник, имеющие размер символа, или вертикальная черточка. Вертикальная черточка рекомендуется при использовании пропорционального шрифта, такого как задаваемый по умолчанию системный шрифт Windows. Поскольку размер символов пропорционального шрифта не фиксирован, горизонтальной черточке и прямоугольнику невозможно задать размер символа.

192

(c) Charles Petzold, 1996

--------------------------------------*/

#include <windows.h> #include <stdlib.h>

#define BUFFER(x,y) *(pBuffer + y * cxBuffer + x)

LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)

{

static char szAppName[] = "Typer";

RegisterClassEx(&wndclass);

hwnd = CreateWindow(szAppName, "Typing 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 char *pBuffer = NULL;

switch(iMsg)

{

case WM_CREATE :

hdc = GetDC(hwnd);

193

SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT));

GetTextMetrics(hdc, &tm);

cxChar = tm.tmAveCharWidth; cyChar = tm.tmHeight;

ReleaseDC(hwnd, hdc); return 0;

case WM_SIZE :

// obtain window size in pixels

cxClient = LOWORD(lParam); cyClient = HIWORD(lParam);

// calculate window size in characters

cxBuffer = max(1, cxClient / cxChar); cyBuffer = max(1, cyClient / cyChar);

// allocate memory for buffer and clear it

if(pBuffer != NULL) free(pBuffer);

if((pBuffer =(char *) malloc(cxBuffer * cyBuffer)) == NULL) MessageBox(hwnd, "Window too large. Cannot "

"allocate enough memory.", "Typer", MB_ICONEXCLAMATION | MB_OK);

else

for(y = 0; y < cyBuffer; y++) for(x = 0; x < cxBuffer; x++)

BUFFER(x,y) = ' ';

// set caret to upper left corner

xCaret = 0; yCaret = 0;

if(hwnd == GetFocus())

SetCaretPos(xCaret * cxChar, yCaret * cyChar);

return 0;

case WM_SETFOCUS :

// create and show the caret

CreateCaret(hwnd, NULL, cxChar, cyChar);

SetCaretPos(xCaret * cxChar, yCaret * cyChar);

ShowCaret(hwnd);

return 0;

case WM_KILLFOCUS :

// hide and destroy the caret

HideCaret(hwnd);

DestroyCaret(); return 0;

case WM_KEYDOWN : switch(wParam)

{

case VK_HOME : xCaret = 0; break;

case VK_END :

194

xCaret = cxBuffer - 1; break;

case VK_PRIOR : yCaret = 0; break;

case VK_NEXT :

yCaret = cyBuffer - 1; break;

case VK_LEFT :

xCaret = max(xCaret - 1, 0); break;

case VK_RIGHT :

xCaret = min(xCaret + 1, cxBuffer - 1); break;

case VK_UP :

yCaret = max(yCaret - 1, 0); break;

case VK_DOWN :

yCaret = min(yCaret + 1, cyBuffer - 1); break;

case VK_DELETE :

for(x = xCaret; x < cxBuffer - 1; x++) BUFFER(x, yCaret) = BUFFER(x + 1, yCaret);

BUFFER(cxBuffer - 1, yCaret) = ' ';

HideCaret(hwnd); hdc = GetDC(hwnd);

SelectObject(hdc,

GetStockObject(SYSTEM_FIXED_FONT));

TextOut(hdc, xCaret * cxChar, yCaret * cyChar, & BUFFER(xCaret, yCaret),

cxBuffer - xCaret);

ShowCaret(hwnd); ReleaseDC(hwnd, hdc); break;

}

SetCaretPos(xCaret * cxChar, yCaret * cyChar); return 0;

case WM_CHAR :

for(i = 0; i <(int) LOWORD(lParam); i++)

{

switch(wParam)

{

case '\b' : // backspace if(xCaret > 0)

{

xCaret--;

SendMessage(hwnd, WM_KEYDOWN,

VK_DELETE, 1L);

}

break;