#include <windows.h>
/*Declare Windows procedure */
LRESULT CALLBACK WindowProcedure (HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK WindowProcedure2 (HWND, UINT, WPARAM, LPARAM);
/*Make the class name into a global variable */
char szClassName[ ] = "WindowsApp";
char szClassName2[ ] = "WindowsApp2";
HINSTANCE hinst;
int WINAPI WinMain (HINSTANCE hThisInstance,
HINSTANCE hPrevInstance,
LPSTR lpszArgument,
int nFunsterStil)
{
HWND hwnd; /* This is the handle for our window */
MSG messages; /* Here messages to the application are saved */
WNDCLASSEX wincl; /* Data structure for the windowclass */
WNDCLASSEX wincl2;
hinst = hThisInstance;
/* The Window structure */
wincl.hInstance = hinst;
wincl.lpszClassName = szClassName;
wincl.lpfnWndProc = WindowProcedure;
wincl.style = CS_DBLCLKS; /* Catch double-clicks */
wincl.
cbSize = sizeof (WNDCLASSEX
); /* Use default icon and mouse-pointer */
wincl.hIcon = LoadIcon (NULL, IDI_APPLICATION);
wincl.hIconSm = LoadIcon (NULL, IDI_APPLICATION);
wincl.hCursor = LoadCursor (NULL, IDC_ARROW);
wincl.lpszMenuName = NULL; /* No menu */
wincl.cbClsExtra = 0; /* No extra bytes after the window class */
wincl.cbWndExtra = 0; /* structure or the window instance */
/* Use Windows's default color as the background of the window */
wincl.hbrBackground = GetSysColorBrush (COLOR_WINDOW); //Colore di sfondo bianco
/* Register the window class, and if it fails quit the program */
if (!RegisterClassEx (&wincl))
return 0;
/* The Window structure */
wincl2.hInstance = hThisInstance;
wincl2.lpszClassName = szClassName2;
wincl2.lpfnWndProc = WindowProcedure2;
wincl2.style = CS_DBLCLKS; /* Catch double-clicks */
wincl2.
cbSize = sizeof (WNDCLASSEX
); /* Use default icon and mouse-pointer */
wincl2.hIcon = LoadIcon (NULL, IDI_APPLICATION);
wincl2.hIconSm = LoadIcon (NULL, IDI_APPLICATION);
wincl2.hCursor = LoadCursor (NULL, IDC_ARROW);
wincl2.lpszMenuName = NULL; /* No menu */
wincl2.cbClsExtra = 0; /* No extra bytes after the window class */
wincl2.cbWndExtra = 0; /* structure or the window instance */
/* Use Windows's default color as the background of the window */
wincl2.hbrBackground = GetSysColorBrush (COLOR_WINDOW); //Colore di sfondo bianco
/* Register the window class, and if it fails quit the program */
if (!RegisterClassEx (&wincl2))
return 0;
/* The class is registered, let's create the program*/
hwnd = CreateWindowEx (
0, /* Extended possibilites for variation */
szClassName, /* Classname */
"Conta click", /* Title Text */
WS_OVERLAPPEDWINDOW, /* default window */
500, /* Windows decides the position */
500, /* where the window ends up on the screen */
210, /* The programs width */
230, /* and height in pixels */
HWND_DESKTOP, /* The window is a child-window to desktop */
NULL, /* No menu */
hinst, /* Program Instance handler */
NULL /* No Window Creation data */
);
/* Make the window visible on the screen */
ShowWindow (hwnd, nFunsterStil);
/* Run the message loop. It will run until GetMessage() returns 0 */
while (GetMessage (&messages, NULL, 0, 0))
{
/* Translate virtual-key messages into character messages */
TranslateMessage(&messages);
/* Send message to WindowProcedure */
DispatchMessage(&messages);
}
/* The program return-value is 0 - The value that PostQuitMessage() gave */
return messages.wParam;
}
/* This function is called by the Windows function DispatchMessage() */
LRESULT CALLBACK WindowProcedure (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
switch (message) /* handle the messages */
{
case WM_CREATE:
CreateWindow("Button","Pulsante",WS_VISIBLE | WS_CHILD | WS_BORDER, 0,0,100,100,hwnd,(HMENU) 1,0,0);
break;
case WM_COMMAND:
if (LOWORD(wParam)==1)
{
MSG messages2;
HWND hwnd2 = CreateWindowEx (
0, /* Extended possibilites for variation */
szClassName2, /* Classname */
"Nuova finestra", /* Title Text */
WS_OVERLAPPEDWINDOW, /* default window */
600, /* Windows decides the position */
600, /* where the window ends up on the screen */
300, /* The programs width */
300, /* and height in pixels */
hwnd,
NULL, /* No menu */
hinst, /* Program Instance handler */
NULL /* No Window Creation data */
);
/* Make the window visible on the screen */
ShowWindow (hwnd2, 1);
/* Run the message loop. It will run until GetMessage() returns 0 */
while (GetMessage (&messages2, NULL, 0, 0))
{
/* Translate virtual-key messages into character messages */
TranslateMessage(&messages2);
/* Send message to WindowProcedure */
DispatchMessage(&messages2);
}
}
break;
case WM_DESTROY:
PostQuitMessage (0); /* send a WM_QUIT to the message queue */
break;
default: /* for messages that we don't deal with */
return DefWindowProc (hwnd, message, wParam, lParam);
}
return 0;
}
LRESULT CALLBACK WindowProcedure2 (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
switch (message)
{
case WM_CREATE:
break;
case WM_DESTROY:
PostQuitMessage (0); /* send a WM_QUIT to the message queue */
break;
default: /* for messages that we don't deal with */
return DefWindowProc (hwnd, message, wParam, lParam);
}
return 0;
}