#include <windows.h>
#include <Strsafe.h>

//deklaracja zapowiadająca
LRESULT CALLBACK NaszaProcedura(HWND hwnd, UINT message, WPARAM wpar, LPARAM lpar);
HWND hOkno;

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpsCmdLine, int nMode)
{

	MSG message;
	WNDCLASS okno;

	okno.hInstance = hInstance;
	okno.lpszClassName = "klasa główna";
	okno.lpfnWndProc = NaszaProcedura; //tutaj pojawia się nowość!!
	okno.lpszMenuName = NULL;
	okno.style = 0;
	okno.hIcon = LoadIcon(NULL, IDI_WINLOGO);
	okno.hCursor = LoadCursor(NULL, IDC_ARROW);
	okno.hbrBackground = (HBRUSH)GetStockObject(BLACK_BRUSH);
	okno.cbClsExtra = 0;
	okno.cbWndExtra = 0;
	if (!RegisterClass(&okno)) return 0;
	hOkno = CreateWindow("klasa główna", "",
		WS_OVERLAPPEDWINDOW, 100, 100, 900, 100,
		NULL, NULL, hInstance, NULL);
	ShowWindow(hOkno, SW_SHOW);
	while (GetMessage(&message, NULL, 0, 0))
	{
		TranslateMessage(&message);
		DispatchMessage(&message);
	}
}

LRESULT CALLBACK NaszaProcedura(HWND hwnd, UINT message, WPARAM wpar, LPARAM lpar)
{
	switch (message)
	{
	case WM_KEYDOWN:
		switch (wpar)
		{
		default:
			char kod = (char)wpar;
			char znak[2] = " ";
			znak[0] = kod;
			LPSTR bufor = (LPSTR)GlobalAlloc(GPTR, 0);
			LPSTR tekst = (LPSTR)GlobalAlloc(GPTR, 100);
			GetWindowText(hOkno, tekst, 100);
			strcpy_s(bufor, 2, znak);
			lstrcat(tekst, bufor);
			SetWindowText(hOkno, tekst);

			OpenClipboard(hOkno);
			EmptyClipboard();
			SetClipboardData(CF_TEXT, tekst);
			CloseClipboard();

			break;

		}
		break;
	case WM_PAINT:
		break;
	default:
		return DefWindowProc(hwnd, message, wpar, lpar);
	}
}