Операционная система Microsoft Windows 3.1 для программиста. Дополнительные главы

Файл cliprndr/cliprndr.cpp


// ---------------------------------------- // Отложенная запись данных в Clipboard // ---------------------------------------- #define STRICT #include <windows.h>
#include <mem.h>
#include "cliprndr.hpp"

BOOL InitApp(HINSTANCE);
LRESULT CALLBACK _export WndProc(HWND, UINT, WPARAM, LPARAM);

char const szClassName[] = "ClipRndrClass"; char const szWindowTitle[] = "Delayed Rendering Demo"; char const szClipboardText[] = "Этот текст будет записан\r\n" "в универсальный буфер обмена Clipboard\r\n" "приложением CLIPRNDR"; // ===================================== // Функция WinMain // ===================================== #pragma argsused int PASCAL WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpszCmdLine, int nCmdShow) { MSG msg; // структура для работы с сообщениями HWND hwnd; // идентификатор главного окна приложения

if(!hPrevInstance) if(!InitApp(hInstance)) return FALSE;

hwnd = CreateWindow( szClassName, szWindowTitle, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hInstance, NULL);
if(!hwnd) return FALSE;

ShowWindow(hwnd, nCmdShow);
UpdateWindow(hwnd);

while(GetMessage(&msg, 0, 0, 0)) { TranslateMessage(&msg);
DispatchMessage(&msg);
} return msg.wParam; }

// ===================================== // Функция InitApp // Выполняет регистрацию класса окна // ===================================== BOOL InitApp(HINSTANCE hInstance) { ATOM aWndClass; // атом для кода возврата WNDCLASS wc; // структура для регистрации // класса окна memset(&wc, 0, sizeof(wc));
wc.lpszMenuName = "APP_MENU"; wc.style = CS_HREDRAW | CS_VREDRAW; wc.lpfnWndProc = (WNDPROC) WndProc; wc.cbClsExtra = 0; wc.cbWndExtra = 0; wc.hInstance = hInstance; wc.hIcon = LoadIcon(hInstance, "APP_ICON");
wc.hCursor = LoadCursor(NULL, IDC_ARROW);
wc.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
wc.lpszClassName = (LPSTR)szClassName;

aWndClass = RegisterClass(&wc);
return (aWndClass != 0);
}




// ===================================== // Функция WndProc // ===================================== LRESULT CALLBACK _export WndProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { HDC hdc; PAINTSTRUCT ps; RECT rc;

static HGLOBAL hglbTextCopyBuf; LPSTR lpTextCopy; static HGLOBAL hglbTextPasteBuf; LPSTR lpTextPaste; static HGLOBAL hglbClipBuf; LPSTR lpClipBuf;

switch (msg) { case WM_CREATE: { hglbTextPasteBuf = GlobalAlloc(GHND, 1);
if(hglbTextPasteBuf == NULL) return -1; lpTextPaste = (LPSTR)GlobalLock(hglbTextPasteBuf);
if(hglbTextPasteBuf == NULL) return -1; lpTextPaste[0] = '\0'; GlobalUnlock(hglbTextPasteBuf);
return 0; } case WM_PAINT: { hdc = BeginPaint(hwnd, &ps);
lpTextPaste = (LPSTR)GlobalLock(hglbTextPasteBuf);
if(lpTextPaste != NULL) { GetClientRect(hwnd, &rc);
DrawText(hdc, lpTextPaste, -1, &rc, DT_LEFT | DT_EXPANDTABS);
GlobalUnlock(hglbTextPasteBuf);
} EndPaint(hwnd, &ps);
} case WM_COMMAND: { switch (wParam) { // Выполняем отложенное копирование данных case CM_EDITCOPY: { OpenClipboard(hwnd);
EmptyClipboard();
SetClipboardData(CF_TEXT, NULL);
CloseClipboard();
return 0; }

// Чтение текстовых данных из Clipboard case CM_EDITPASTE: { OpenClipboard(hwnd);
hglbClipBuf = GetClipboardData(CF_TEXT);
if(hglbClipBuf != NULL) { lpClipBuf = (LPSTR)GlobalLock(hglbClipBuf);
if(lpClipBuf != NULL) { hglbTextPasteBuf = GlobalReAlloc(hglbTextPasteBuf, GlobalSize(hglbClipBuf), GMEM_NODISCARD);

lpTextPaste = (LPSTR)GlobalLock(hglbTextPasteBuf);
if(lpTextPaste != NULL) { lstrcpy(lpTextPaste, lpClipBuf);
InvalidateRect(hwnd, NULL, TRUE);
GlobalUnlock(hglbTextPasteBuf);
} else MessageBox(hwnd, "Мало памяти", (LPSTR)szWindowTitle, MB_OK | MB_ICONHAND);
GlobalUnlock(hglbClipBuf);
} else MessageBox(hwnd, "Мало памяти", (LPSTR)szWindowTitle, MB_OK | MB_ICONHAND);
} else MessageBox(hwnd, "Формат CF_TEXT недоступен", (LPSTR)szWindowTitle, MB_OK | MB_ICONHAND);
CloseClipboard();
return 0; } case CM_HELPABOUT: { MessageBox(hwnd, "Приложение CLIPTXT\n(C) Фролов А.В., 1995", (LPSTR)szWindowTitle, MB_OK | MB_ICONINFORMATION);
return 0; } case CM_FILEEXIT: { DestroyWindow(hwnd);
return 0; } default: return 0; } } // Копируем данные во всех форматах case WM_RENDERALLFORMATS: { OpenClipboard(hwnd);
EmptyClipboard();



// Инициируем копирование в текстовом формате SendMessage(hwnd, WM_RENDERFORMAT, CF_TEXT, 0L);
CloseClipboard();
return 0; } // Копируем данные в нужном формате case WM_RENDERFORMAT: { // Работаем только с текстовым форматом if(wParam != CF_TEXT) return 0;

hglbTextCopyBuf = GlobalAlloc(GHND, sizeof(szClipboardText) + 1);
if(hglbTextCopyBuf != NULL) { lpTextCopy = (LPSTR)GlobalLock(hglbTextCopyBuf);
if(lpTextCopy != NULL) { lstrcpy(lpTextCopy, szClipboardText);
GlobalUnlock(hglbTextCopyBuf);

// Фактическая запись данных SetClipboardData(wParam, hglbTextCopyBuf);
} else MessageBox(hwnd, "Мало памяти", (LPSTR)szWindowTitle, MB_OK | MB_ICONHAND);
} else MessageBox(hwnd, "Мало памяти", (LPSTR)szWindowTitle, MB_OK | MB_ICONHAND);
return 0; } case WM_DESTROY: { if(hglbTextPasteBuf != NULL) GlobalFree(hglbTextPasteBuf);
PostQuitMessage(0);
return 0; } default: break; } return DefWindowProc(hwnd, msg, wParam, lParam);
}

В приложении CLIPRNDR использованы рассмотренные нами приемы. Так как данные, предназначенные для записи в Clipboard, определены статически, приложение не освобождает занимаемую ими память и, соответственно, не обрабатывает сообщение WM_DESTROYCLIPBOARD.

Файл cliprndr.hpp содержит определения констант (листинг 2.12).


Содержание раздела