색상 선택기 (ChooseColor)

#include <windows.h>

LRESULT CALLBACK WndProc(HWND,UINT,WPARAM,LPARAM);
HINSTANCE g_hInst;
LPSTR lpszClass="ColDial";

int APIENTRY WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance
         ,LPSTR lpszCmdParam,int nCmdShow)
{
    HWND hWnd;
    MSG Message;
    WNDCLASS WndClass;
    g_hInst=hInstance;
    
    WndClass.cbClsExtra=0;
    WndClass.cbWndExtra=0;
    WndClass.hbrBackground=(HBRUSH)GetStockObject(WHITE_BRUSH);
    WndClass.hCursor=LoadCursor(NULL,IDC_ARROW);
    WndClass.hIcon=LoadIcon(NULL,IDI_APPLICATION);
    WndClass.hInstance=hInstance;
    WndClass.lpfnWndProc=(WNDPROC)WndProc;
    WndClass.lpszClassName=lpszClass;
    WndClass.lpszMenuName=NULL;
    WndClass.style=CS_HREDRAW | CS_VREDRAW;
    RegisterClass(&WndClass);

    hWnd=CreateWindow(lpszClass,lpszClass,WS_OVERLAPPEDWINDOW,
        CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,
        NULL,(HMENU)NULL,hInstance,NULL);
    ShowWindow(hWnd,nCmdShow);
    
    while(GetMessage(&Message,0,0,0)) {
        TranslateMessage(&Message);
        DispatchMessage(&Message);
    }
    return Message.wParam;
}

COLORREF Color=RGB(0,0,255);    // 기본 컬러 blue #0000ff
LRESULT CALLBACK WndProc(HWND hWnd,UINT iMessage,WPARAM wParam,LPARAM lParam)
{
    HDC hdc;
    PAINTSTRUCT ps;
    HBRUSH MyBrush, OldBrush;
    CHOOSECOLOR COL;
    static COLORREF crTemp[16];
    int i;

    switch(iMessage) {
    case WM_CREATE:
        for (i=0;i<16;i++) {
            crTemp[i]=RGB(0,0,i*8+128);
        }
        return 0;
    case WM_LBUTTONDOWN:
        memset(&COL, 0, sizeof(CHOOSECOLOR));
        COL.lStructSize = sizeof(CHOOSECOLOR);
        COL.hwndOwner=hWnd;
        COL.lpCustColors=crTemp;
        COL.Flags = CC_FULLOPEN;        // 확장형
        if (ChooseColor(&COL)!=0) {
            Color=COL.rgbResult;
            InvalidateRect(hWnd, NULL, TRUE);
        }
        return 0;
    case WM_PAINT:
        hdc=BeginPaint(hWnd,&ps);
        MyBrush=CreateSolidBrush(Color);
        OldBrush=(HBRUSH)SelectObject(hdc,MyBrush);
        Rectangle(hdc,10,10,300,200);
        SelectObject(hdc,OldBrush);
        DeleteObject(MyBrush);
        EndPaint(hWnd,&ps);
        return 0;
    case WM_DESTROY:
        PostQuitMessage(0);
        return 0;
    }
    return(DefWindowProc(hWnd,iMessage,wParam,lParam));
}