論理パレットの操作

論理パレットを制御する

UINT GetPaletteEntries(
	HPALETTE hpal , UINT iStartIndex ,
	UINT nEntries , LPPALETTEENTRY lppe
);

UINT SetPaletteEntries(
	HPALETTE hpal , UINT iStart ,
	UINT cEntries , CONST PALETTEENTRY *lppe
);

#include <windows.h>
#include <stdlib.h>

#define BUTTON_OK 1
#define ERR_INDEX TEXT("エントリは 0 〜 255 で指定してください")
#define ERR_COLOR TEXT("RGB 値を数値で指定してください")

LRESULT CALLBACK WndProc(HWND hWnd , UINT msg , WPARAM wp , LPARAM lp) {
	HDC hdc;
	PAINTSTRUCT ps;
	HBRUSH hBrush;
	TCHAR strIndex[16] , strColor[16];
	int count , entry , index , color , x = 20 , y = 40;
	LOGPALETTE lpPalette;
	static HPALETTE hPalette;
	static HWND hEditPalIndex , hEditColor , hButtonOK;
	
	switch (msg) {
	case WM_DESTROY:
		DeleteObject(hPalette);
		PostQuitMessage(0);
		return 0;
	case WM_CREATE:
		hEditPalIndex = CreateWindow(
			TEXT("EDIT") , TEXT("0") ,
			WS_CHILD | WS_VISIBLE | WS_BORDER |ES_NUMBER ,
			10 , 10 , 100 , 25 , hWnd , NULL ,
			((LPCREATESTRUCT)(lp))->hInstance , NULL
		);
		hEditColor = CreateWindow(
			TEXT("EDIT") , TEXT("0x000000") ,
			WS_CHILD | WS_VISIBLE | WS_BORDER ,
			120 , 10 , 100 , 25 , hWnd , NULL ,
			((LPCREATESTRUCT)(lp))->hInstance , NULL
		);
		hButtonOK = CreateWindow(
			TEXT("BUTTON") , TEXT("OK") ,
			WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON ,
			230 , 10 , 100 , 25 , hWnd , (HMENU)BUTTON_OK ,
			((LPCREATESTRUCT)(lp))->hInstance , NULL
		);

		lpPalette.palVersion = 0x0300;
		lpPalette.palNumEntries = 1;

		lpPalette.palPalEntry[0].peRed =
		lpPalette.palPalEntry[0].peGreen =
		lpPalette.palPalEntry[0].peBlue = 
		lpPalette.palPalEntry[0].peFlags = NULL;

		hPalette = CreatePalette(&lpPalette);

		return 0;
	case WM_PAINT:
		hdc = BeginPaint(hWnd , &ps);
		entry = GetPaletteEntries(hPalette , 0 , 0 , NULL);
		SelectPalette(hdc , hPalette , FALSE);
		RealizePalette(hdc);

		for (count = 0 ; count < entry ; count++ , x += 20) {
			hBrush = CreateSolidBrush(PALETTEINDEX(count));
			SelectObject(hdc , hBrush);

			Rectangle(hdc , x , y , x + 10 , y + 20);
			if (x > 600) { y += 30; x = 0; }
			SelectObject(hdc , GetStockObject(WHITE_BRUSH));
			DeleteObject(hBrush);
		}

		EndPaint(hWnd ,&ps);
		return 0;
	case WM_COMMAND:
		switch(LOWORD(wp)) {
		case BUTTON_OK:
			GetWindowText(hEditPalIndex , strIndex , 16);
			index = atoi(strIndex);
			if (index < 0 || index > 255) {
				MessageBox(hWnd , ERR_INDEX , NULL , MB_OK);
				return 0;
			}

			GetWindowText(hEditColor , strColor , 16);
			color = (int)strtol(strColor , NULL , 16);
			if (color < 0 || color > 0xFFFFFF) {
				MessageBox(hWnd , ERR_COLOR , NULL , MB_OK);
				return 0;
			}

			lpPalette.palPalEntry[0].peRed = (BYTE)(color >> 16);
			lpPalette.palPalEntry[0].peGreen = (BYTE)(color >> 8);
			lpPalette.palPalEntry[0].peBlue = (BYTE)color;
			lpPalette.palPalEntry[0].peFlags = NULL;

			if (index + 1 > GetPaletteEntries(hPalette , 0 , 0 , NULL))
				ResizePalette(hPalette , index + 1);

			SetPaletteEntries(hPalette , index , 1 , lpPalette.palPalEntry);
			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;
	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	= NULL;
	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;

	while (GetMessage(&msg , NULL , 0 , 0 )) {
		TranslateMessage(&msg);
		DispatchMessage(&msg);
	}

	return msg.wParam;
}

GetPaletteEntries()

UINT GetPaletteEntries(
	HPALETTE hpal , UINT iStartIndex ,
	UINT nEntries , LPPALETTEENTRY lppe
);

setPaletteEntries()

UINT SetPaletteEntries(
	HPALETTE hpal , UINT iStart ,
	UINT cEntries , CONST PALETTEENTRY *lppe
);

ResizePalette()

GetNearestPaletteIndex()