アクセラレータ

キーボードアクセラレータ

acctablename ACCELERATORS  [optional-statements]  {
	event, idvalue, [type] [options]
	...
}

/*resource.h*/
#define IDM_RENA 40001
#define IDM_YUKI 40002
#define IDM_MIMI 40003

/*リソーススクリプト*/
#include "resource.h"

KITTY MENU {
	POPUP "Kitty on your lap(&K)" {
		MENUITEM "レナ(&R)\tCtrl+R" , IDM_RENA
		MENUITEM "ユキ(&Y)\tShift + Y" , IDM_YUKI
		MENUITEM "ミミ(&M)\tm" , IDM_MIMI
	}
}

KITTY ACCELERATORS {
	"^R" , 		IDM_RENA
	VK_END ,	IDM_RENA , VIRTKEY , SHIFT

	0x59 , 		IDM_YUKI , ASCII
	VK_HOME ,	IDM_YUKI , VIRTKEY

	"m" ,		IDM_MIMI
	VK_F1 , 	IDM_MIMI , VIRTKEY , ALT , CONTROL
}

#include <windows.h>
#include "resource.h"

LRESULT CALLBACK WndProc(HWND hwnd , UINT msg , WPARAM wp , LPARAM lp) {
	switch (msg) {
	case WM_DESTROY:
		PostQuitMessage(0);
		return 0;
	case WM_COMMAND:
		switch (LOWORD(wp)) {
		case IDM_RENA:
			SetClassLong(hwnd , GCL_HBRBACKGROUND , 
				(LONG)CreateSolidBrush(RGB(0xFF , 0 , 0))
			);
			break;
		case IDM_YUKI:
			SetClassLong(hwnd , GCL_HBRBACKGROUND , 
				(LONG)CreateSolidBrush(RGB(0 , 0 , 0xFF))
			);
			break;
		case IDM_MIMI:
			SetClassLong(hwnd , GCL_HBRBACKGROUND , 
				(LONG)CreateSolidBrush(RGB(0xFF , 0xAA , 0))
			);
		}
		InvalidateRect(hwnd , NULL , TRUE);
		return 0;
	}
	return DefWindowProc(hwnd , msg , wp , lp);
}

int WINAPI WinMain(HINSTANCE hInstance , HINSTANCE hPrevInstance ,
			PSTR lpCmdLine , int nCmdShow ) {
	HWND hwnd;
	HACCEL haccel;
	MSG msg;
	WNDCLASS winc;

	winc.style		= CS_HREDRAW | CS_VREDRAW;
	winc.lpfnWndProc	= WndProc;
	winc.cbClsExtra	= winc.cbWndExtra	= 0;
	winc.hInstance		= hInstance;
	winc.hIcon		= LoadIcon(NULL , IDI_APPLICATION);
	winc.hCursor		= LoadCursor(NULL , IDC_ARROW);
	winc.hbrBackground	= (HBRUSH)GetStockObject(WHITE_BRUSH);
	winc.lpszMenuName	= TEXT("KITTY");
	winc.lpszClassName	= TEXT("KITTY");

	if (!RegisterClass(&winc)) return -1;

	hwnd = CreateWindow(
			TEXT("KITTY") , TEXT("Kitty on your lap") ,
			WS_OVERLAPPEDWINDOW | WS_VISIBLE ,
			CW_USEDEFAULT , CW_USEDEFAULT ,
			CW_USEDEFAULT , CW_USEDEFAULT ,
			NULL , NULL ,
			hInstance , NULL
	);

	if (hwnd == NULL) return -1;

	haccel = LoadAccelerators(hInstance , TEXT("KITTY"));

	while(GetMessage(&msg , NULL , 0 , 0)) {
		if (!TranslateAccelerator(hwnd , haccel , &msg)) {
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}
	return msg.wParam;
}

LoadAccelerators()

TranslateAccelerator()