145 lines
2.9 KiB
C
145 lines
2.9 KiB
C
/* * * * * * * *\
|
|
WNDPROC.C -
|
|
Copyright (c) 2023 freedom7341, Freedom Desktop
|
|
DESCRIPTION -
|
|
Program Manager's window procedure.
|
|
LICENSE INFORMATION -
|
|
MIT License, see LICENSE.txt in the root folder
|
|
\* * * * * * * */
|
|
|
|
/* Headers */
|
|
#include "progmgr.h"
|
|
#include "resource.h"
|
|
#include "registry.h"
|
|
// #define WIN32_LEAN_AND_MEAN
|
|
#include <Windows.h>
|
|
|
|
/* Functions */
|
|
/* * * *\
|
|
WndProc -
|
|
Program Manager's window procedure.
|
|
RETURNS -
|
|
Zero if nothing, otherwise returns the good stuff.
|
|
\* * * */
|
|
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
switch (message) {
|
|
|
|
case WM_CREATE:
|
|
{
|
|
RECT rc;
|
|
CLIENTCREATESTRUCT ccs;
|
|
|
|
// Frame Window
|
|
hWndProgMgr = hWnd;
|
|
|
|
// MDI Client Window
|
|
ccs.hWindowMenu = GetSubMenu(GetMenu(hWnd), IDM_WINDOW);
|
|
ccs.idFirstChild = IDM_WINDOW_CHILDSTART;
|
|
|
|
GetClientRect(hWndProgMgr, &rc);
|
|
|
|
hWndMDIClient = CreateWindow(L"MDIClient", NULL,
|
|
WS_CLIPCHILDREN | WS_CHILD | WS_VSCROLL | WS_HSCROLL,
|
|
// rc.left - 1, rc.top - 1, rc.right + 2, rc.bottom + 2,
|
|
0, 0, 0, 0,
|
|
hWnd, (HMENU)1, hAppInstance, (LPWSTR)&ccs);
|
|
|
|
if (!hWndMDIClient) {
|
|
return -1;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case WM_SYSCOMMAND:
|
|
{
|
|
if (wParam == IDM_SHUTDOWN) {
|
|
CmdProc(hWnd, wParam, lParam);
|
|
break;
|
|
}
|
|
if (wParam == IDM_TASKMGR) {
|
|
ShellExecute(hWndProgMgr, L"open", L"TASKMGR.EXE", NULL, NULL, SW_NORMAL);
|
|
break;
|
|
}
|
|
if (wParam == IDM_FILE_EXIT) {
|
|
CmdProc(hWnd, wParam, lParam);
|
|
break;
|
|
}
|
|
if (wParam == IDM_FILE_RUN) {
|
|
CmdProc(hWnd, wParam, lParam);
|
|
break;
|
|
}
|
|
goto WndProcDefault;
|
|
//return DefFrameProc(hWnd, hwndMDIClient, uiMsg, wParam, lParam);
|
|
}
|
|
|
|
case WM_COMMAND:
|
|
if (CmdProc(hWnd, wParam, lParam)) {
|
|
break;
|
|
}
|
|
goto WndProcDefault;
|
|
|
|
case WM_CLOSE:
|
|
PostQuitMessage(0);
|
|
break;
|
|
|
|
default:
|
|
WndProcDefault:
|
|
return DefFrameProc(hWnd, hWndMDIClient, message, wParam, lParam);
|
|
}
|
|
return 0;
|
|
|
|
}
|
|
|
|
/* * * *\
|
|
CmdProc -
|
|
Program Manager's syscommand procedure.
|
|
RETURNS -
|
|
Zero if nothing, otherwise returns the good stuff.
|
|
\* * * */
|
|
LRESULT CALLBACK CmdProc(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
switch (GET_WM_COMMAND_ID(wParam, lParam)) {
|
|
|
|
case IDM_SHUTDOWN:
|
|
ExitWindowsDialog(hWnd);
|
|
break;
|
|
|
|
case IDM_FILE_RUN:
|
|
RunFileDlg(hWnd, NULL, NULL, NULL, NULL, RFF_CALCDIRECTORY);
|
|
break;
|
|
|
|
case IDM_FILE_EXIT:
|
|
PostQuitMessage(0);
|
|
break;
|
|
|
|
case IDM_HELP_INDEX:
|
|
ShellExecute(NULL, L"open", szWebsite, NULL, NULL, SW_SHOWNORMAL);
|
|
break;
|
|
|
|
case IDM_HELP_ABOUT:
|
|
{
|
|
WCHAR szTitle[40];
|
|
|
|
LoadString(hAppInstance, IDS_APPTITLE, szTitle, ARRAYSIZE(szTitle));
|
|
ShellAbout(hWndProgMgr, szTitle, NULL, hProgMgrIcon);
|
|
break;
|
|
}
|
|
|
|
default:
|
|
return FALSE;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* * * *\
|
|
ChildWndProc -
|
|
Program Manager's window procedure.
|
|
RETURNS -
|
|
Zero if nothing, otherwise returns the good stuff.
|
|
\* * * */
|
|
LRESULT CALLBACK ChildWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
return FALSE;
|
|
} |