rendered paste body/******************************************************************
Grafika komputerowa, środowisko MS Windows - program przykładowy
*****************************************************************/
#include <windows.h>
int x=0,y=0;
bool klik=false;
//deklaracja funkcji obslugi okna
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
//funkcja Main - dla Windows
int WINAPI WinMain(HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPSTR lpCmdLine,
int nCmdShow)
{
MSG meldunek; //innymi slowy "komunikat"
WNDCLASS nasza_klasa; //klasa głównego okna aplikacji
HWND okno;
static char nazwa_klasy[] = "Podstawowa";
//Definiujemy klase głównego okna aplikacji
//Okreslamy tu wlasciwosci okna, szczegoly wygladu oraz
//adres funkcji przetwarzajacej komunikaty
nasza_klasa.style = CS_HREDRAW | CS_VREDRAW;
nasza_klasa.lpfnWndProc = WndProc; //adres funkcji realizującej przetwarzanie meldunków
nasza_klasa.cbClsExtra = 0 ;
nasza_klasa.cbWndExtra = 0 ;
nasza_klasa.hInstance = hInstance; //identyfikator procesu przekazany przez MS Windows podczas uruchamiania programu
nasza_klasa.hIcon = 0;
nasza_klasa.hCursor = LoadCursor(0, IDC_ARROW);
nasza_klasa.hbrBackground = (HBRUSH) GetStockObject(GRAY_BRUSH);
nasza_klasa.lpszMenuName = "Menu" ;
nasza_klasa.lpszClassName = nazwa_klasy;
//teraz rejestrujemy klasę okna głównego
RegisterClass (&nasza_klasa);
/*tworzymy okno główne
okno będzie miało zmienne rozmiary, listwę z tytułem, menu systemowym
i przyciskami do zwijania do ikony i rozwijania na cały ekran, po utworzeniu
będzie widoczne na ekranie */
okno = CreateWindow(nazwa_klasy, "Grafika komputerowa", WS_OVERLAPPEDWINDOW | WS_VISIBLE,
CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL);
/* wybór rozmiaru i usytuowania okna pozostawiamy systemowi MS Windows */
ShowWindow (okno, nCmdShow) ;
//odswiezamy zawartosc okna
UpdateWindow (okno) ;
// GŁÓWNA PĘTLA PROGRAMU
while (GetMessage(&meldunek, NULL, 0, 0))
/* pobranie komunikatu z kolejki; funkcja GetMessage zwraca FALSE tylko dla
komunikatu wm_Quit; dla wszystkich pozostałych komunikatów zwraca wartość TRUE */
{
TranslateMessage(&meldunek); // wstępna obróbka komunikatu
DispatchMessage(&meldunek); // przekazanie komunikatu właściwemu adresatowi (czyli funkcji obslugujacej odpowiednie okno)
}
return (int)meldunek.wParam;
}
/********************************************************************
FUNKCJA OKNA realizujaca przetwarzanie meldunków kierowanych do okna aplikacji*/
LRESULT CALLBACK WndProc (HWND okno, UINT kod_meldunku, WPARAM wParam, LPARAM lParam)
{
HMENU mPlik, mInfo, mGlowne;
// POINT org;
POINT brew1[] = {100+x,60+y,120+x,30+y,140+x,30+y,160+x,60+y};
POINT brew2[] = {160+x,60+y,180+x,30+y,200+x,30+y,220+x,60+y};
POINT policzek1[] = {100+x,60+y,60+x,110+y,60+x,130+y,100+x,140+y};
POINT policzek2[] = {220+x,60+y,260+x,110+y,260+x,130+y,220+x,140+y};
POINT broda[] = {100+x,140+y,140+x,160+y,180+x,160+y,220+x,140+y};
/* PONIŻSZA INSTRUKCJA DEFINIUJE REAKCJE APLIKACJI NA POSZCZEGÓLNE MELDUNKI */
switch (kod_meldunku)
{
case WM_CREATE: //meldunek wysyłany w momencie tworzenia okna
mPlik = CreateMenu();
AppendMenu(mPlik, MF_STRING, 100, "&Zapiszcz...");
AppendMenu(mPlik, MF_SEPARATOR, 0, "");
AppendMenu(mPlik, MF_STRING, 101, "&Koniec");
mInfo = CreateMenu();
AppendMenu(mInfo, MF_STRING, 200, "&Autor...");
mGlowne = CreateMenu();
AppendMenu(mGlowne, MF_POPUP, (UINT_PTR) mPlik, "&Plik");
AppendMenu(mGlowne, MF_POPUP, (UINT_PTR) mInfo, "&Informacja");
SetMenu(okno, mGlowne);
DrawMenuBar(okno);
return 0;
case WM_COMMAND: //reakcje na wybór opcji z menu
switch (wParam)
{
case 100: if(MessageBox(okno, "Zapiszczeć?", "Pisk", MB_YESNO) == IDYES)
MessageBeep(0);
break;
case 101: DestroyWindow(okno); //wysylamy meldunek WM_DESTROY
break;
case 200: MessageBox(okno, "Imię i nazwisko: Marta Felskowska\nNumer indeksu: 109149", "Autor", MB_OK);
}
return 0;
case WM_LBUTTONDOWN:
{
klik=true;
}
case WM_MOUSEMOVE://reakcja na lewy przycisk myszki
{
if (klik)
{
x = LOWORD(lParam);
y = HIWORD(lParam);
InvalidateRect(okno, NULL, TRUE);
}
return 0;
}
case WM_LBUTTONUP:
{
klik=false;
return 0;
}
case WM_PAINT:
{
PAINTSTRUCT paint;
HDC kontekst;
kontekst = BeginPaint(okno, &paint);
// SelectObject(kontekst, GetStockObject(NULL_PEN)); //NULL_PEN
// SelectObject(kontekst, CreateSolidBrush(RGB(30,255,0)));
// Polygon(kontekst,korona,7);
// DeleteObject(SelectObject(kontekst, GetStockObject(WHITE_BRUSH)));
// Polygon(kontekst,krzyz,12); //NULL_PEN
// SetViewportOrgEx(kontekst,0,65,&org);
// Polygon(kontekst,krzyz,12);
HBRUSH g_brush = CreateSolidBrush(RGB(0,255,0));
HBRUSH w_brush = CreateSolidBrush(RGB(255,255,255));
HBRUSH b_brush = CreateSolidBrush(RGB(0,0,0));
HPEN g_pen = CreatePen(PS_SOLID,3,RGB(0,255,0));
HPEN w_pen = CreatePen(PS_SOLID,3,RGB(255,255,255));
HPEN b_pen = CreatePen(PS_SOLID,3,RGB(0,0,0));
SelectObject(kontekst, g_pen);
PolyBezier(kontekst,brew1,4);
PolyBezier(kontekst,brew2,4);
PolyBezier(kontekst,policzek1,4);
PolyBezier(kontekst,policzek2,4);
PolyBezier(kontekst,broda,4);
SelectObject(kontekst, w_pen);
SelectObject(kontekst, w_brush);
Ellipse (kontekst, 115+x, 50+y, 145+x, 90+y) ;
Ellipse (kontekst, 175+x, 50+y, 205+x, 90+y) ;
SelectObject(kontekst, b_pen);
SelectObject(kontekst, b_brush);
Ellipse (kontekst, 120+x, 62+y, 140+x, 82+y) ;
Ellipse (kontekst, 180+x, 62+y, 200+x, 82+y) ;
SelectObject(kontekst, g_pen);
SelectObject(kontekst, g_brush);
Chord (kontekst, 115+x, 50+y, 145+x, 90+y, 145+x, 60+y, 115+x, 60+y);
Chord (kontekst, 175+x, 50+y, 205+x, 90+y, 205+x, 60+y, 175+x, 60+y);
DeleteObject(g_pen);
DeleteObject(w_pen);
DeleteObject(b_pen);
DeleteObject(g_brush);
DeleteObject(w_brush);
DeleteObject(b_brush);
HPEN k_pen = CreatePen(PS_SOLID,3,RGB(255,0,0));
SelectObject(kontekst, k_pen);
MoveToEx(kontekst,x,y,NULL);
LineTo(kontekst, x+50,y+50);
DeleteObject(k_pen);
EndPaint(okno, &paint);
return 0;
}
case WM_DESTROY: //obowiązkowa obsługa meldunku o zamknięciu okna
PostQuitMessage (0) ;
return 0;
default: //standardowa obsługa pozostałych meldunków
return DefWindowProc(okno, kod_meldunku, wParam, lParam);
}
}