カスタムコントロール

独自のコントロールを使う

//リソーススクリプト
KITTY DIALOG 10 , 10 , 100 , 50
FONT 12 , "ＭＳ ゴシック"
CAPTION "Magical nyan nyan TARUTO" {
	CONTROL "Kitty on your lap" , 1 , "Control" ,
		WS_GROUP | WS_TABSTOP , 10 , 35 , 80 , 10
}

#include <windows.h>

BOOL CALLBACK DialogProc(HWND hwnd , UINT msg , WPARAM wp , LPARAM lp) {
	switch (msg) {
	case WM_CLOSE:
		EndDialog(hwnd , IDOK);
		return TRUE;
	}
	return FALSE;
}

LRESULT CALLBACK CtrlProc(HWND hwnd , UINT msg , WPARAM wp , LPARAM lp) {
	PSTR strText;
	HDC hdc;
	PAINTSTRUCT ps;
	RECT rect;
	int iTextLength;

	switch (msg) {
	case WM_PAINT:
		iTextLength = GetWindowTextLength(hwnd) + 2;
		strText = (PSTR)malloc(iTextLength);

		GetWindowText(hwnd , strText , iTextLength);
		GetClientRect(hwnd , &rect);

		hdc = BeginPaint(hwnd , &ps);
		DrawText(hdc , strText , -1 , &rect , DT_CENTER);
		EndPaint(hwnd , &ps);

		free(strText);
	}
	return DefWindowProc(hwnd , msg , wp , lp);
}

LRESULT CALLBACK WndProc(HWND hwnd , UINT msg , WPARAM wp , LPARAM lp) {
	switch (msg) {
	case WM_DESTROY:
		PostQuitMessage(0);
		return 0;
	case WM_LBUTTONUP:
		DialogBox(
			(HINSTANCE)GetWindowLong(hwnd , GWL_HINSTANCE) ,
			TEXT("KITTY") , hwnd , DialogProc
		);
		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	= NULL;
	winc.lpszClassName	= TEXT("KITTY");

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

	winc.lpfnWndProc 	= CtrlProc;
	winc.hIcon 		= NULL;
	winc.lpszClassName	= TEXT("Control");

	RegisterClass(&winc);

	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;
}

GetParent()