// KAS.cpp : Defines the entry point for the application.
//
#include "stdafx.h"
// Обработка сообщений WM_CHAR
#include <Windows.h>
#include <stdio.h>
#include <String.h>
LRESULT CALLBACK WindowFunc(HWND, UINT,
WPARAM, LPARAM) ;
char szWinName[]="МоеОкно"; // Имя класса окна
char sztitle[]="pR0gramm::by::Kas";
char str[80]="текст";
int X=10, Y=10;
int WINAPI WinMain(HINSTANCE hThisInst,
HINSTANCE hPrevInst,
LPSTR lpszArgs,
int nWinMode)
{
HWND hwnd;
MSG msg;
WNDCLASS wcl; // Определить класс окна
wcl.hInstance=hThisInst; // Дескриптор приложения
wcl.lpszClassName=szWinName; // Имя класса окна
wcl.lpfnWndProc=WindowFunc; // Функция окна
wcl.style=8; // Стиль по умолчанию
wcl.hIcon=LoadIcon(NULL,IDI_QUESTION);// Иконка
wcl.hCursor=LoadCursor(NULL,IDC_WAIT); // Курсор
wcl.lpszMenuName=NULL; // Без меню
wcl.cbClsExtra=0; // Без дополнительной информации
wcl.cbWndExtra=0;
wcl.hbrBackground=
CreateSolidBrush(RGB(01,100,150)); //Белый фон
if(!RegisterClass(&wcl)) // Регистрируем класс окна
return 0;
hwnd=CreateWindow(szWinName, // Создать окно
sztitle,
WS_OVERLAPPEDWINDOW, // Стиль окна
CW_USEDEFAULT, // x-координата
CW_USEDEFAULT, // y-координата
600, // Ширина
450, // Высота
HWND_DESKTOP, // Нет родител. окна
NULL, // Нет меню
hThisInst,// Дескриптор приложения
NULL); // Нет дополнит. аргументов
ShowWindow (hwnd, nWinMode); // Показать окно
UpdateWindow (hwnd); // и перерисовать
while(GetMessage(&msg,NULL,0,0)) // Запустить цикл
{ // обработки сообщений
TranslateMessage(&msg); // Разреш. исп. клавиатуры
DispatchMessage (&msg); // Вернуть управл. Windows
}
return msg.wParam;
}
// Следующая функция вызывается операционной
// системой Windows и получает в качестве
// параметров сообщения из очереди сообщений
// данного приложения
LRESULT CALLBACK WindowFunc(HWND hwnd,
UINT message,
WPARAM wParam,
LPARAM lParam)
{
HDC hdc;
PAINTSTRUCT paintstruct;
switch(message)
{
case WM_CHAR:
X=Y=1;
sprintf(str,"%c",(char)wParam);
InvalidateRect(hwnd,NULL,1);
break;
case WM_PAINT:
hdc=BeginPaint(hwnd,&paintstruct);
TextOut(hdc,X,Y,str,strlen(str));
EndPaint(hwnd,&paintstruct);
break;
case WM_RBUTTONDOWN:
hdc = GetDC(hwnd);
strcpy(str,"Нажата ПРАВАЯ кнопка");
X = LOWORD(lParam);
Y = HIWORD(lParam);
InvalidateRect(hwnd,NULL,1);
break;
case WM_LBUTTONDOWN:
hdc = GetDC(hwnd);
strcpy(str,"Нажата ЛЕВАЯ кнопка");
X = LOWORD(lParam);
Y = HIWORD(lParam);
InvalidateRect(hwnd,NULL,1);
break;
case WM_DESTROY: // Завершение программы
PostQuitMessage (0);
break;
default:
// Все сообщения, не обрабатываемые в
// данной функции, направляются на обработку
// по умолчанию
return DefWindowProc(hwnd,message,
wParam,lParam);
}
return 0;
}