Необработанное исключение по адресу

int CreateDlg(HWND hwnd)
{
    const TCHAR szCaption[] = TEXT("TARGET...");
 
    WORD* p, * pdlgTempl;
    p = pdlgTempl = (LPWORD)LocalAlloc(LPTR, 1024);
    if (!p)
    {
        MessageBox(NULL, TEXT("Can't allocated memory"),
            TEXT("Error"), MB_OK);
        return 1;
    }
    int cxChar, cyChar;
    {
        TEXTMETRIC tm;
        HDC hdc = GetDC(hwnd);
        GetTextMetrics(hdc, &tm);
        ReleaseDC(hwnd, hdc);
        cxChar = tm.tmAveCharWidth + 1;
        cyChar = tm.tmHeight + tm.tmExternalLeading;
    }
    DWORD dwBaseUnit = GetDialogBaseUnits();
    cxChar = cxChar * 4 / LOWORD(dwBaseUnit);
    cyChar = cyChar * 8 / HIWORD(dwBaseUnit);
 
    DWORD lStyle = DS_MODALFRAME | WS_POPUPWINDOW | WS_CAPTION;
    int wDlg, hDlg, cxWnd, cyWnd, left, top;
    wDlg = 320;
    hDlg = 240;
    RECT rc;
    GetClientRect(hwnd, &rc);
    left = ((rc.right * 4 / LOWORD(dwBaseUnit)) >> 1) - (wDlg >> 1);
    top = ((rc.bottom * 8 / HIWORD(dwBaseUnit)) >> 1) - (hDlg >> 1);
 
    LPDLGTEMPLATE lpdt;
    LPDLGITEMTEMPLATE lpdit;
    LPWSTR szDst;
    LPCWSTR szSrc;
    lpdt = (LPDLGTEMPLATE)p;
    lpdt->style = lStyle;
    lpdt->dwExtendedStyle = 0;
    lpdt->cdit = 1;
    lpdt->x = left;
    lpdt->y = top;
    lpdt->cx = wDlg;
    lpdt->cy = hDlg;
    p = (LPWORD)(lpdt + 1);
    *p++ = 0;
    *p++ = 0;
    szDst = (LPWSTR)(p);
    szSrc = szCaption;
    for (; *szDst++ = *szSrc++;)
        ;
    p = (LPWORD)szDst;
    p = lpwAlign((LPWORD)p);
 
    //1
    left = 10;
    top = 10;
    cxWnd = wDlg - 20;
    cyWnd = hDlg - 20;
    lStyle = WS_CHILD | WS_VISIBLE | WS_CHILDWINDOW | WS_BORDER | WS_DLGFRAME;
 
    lpdit = (LPDLGITEMTEMPLATE)p;
    lpdit->style = lStyle;
    lpdit->dwExtendedStyle = 0;
    lpdit->x = left;
    lpdit->y = top;
    lpdit->cx = cxWnd;
    lpdit->cy = cyWnd;
    lpdit->id = ID_POPUPWINDOW;
    szDst = (LPWSTR)(lpdit + 1);
    szSrc = szPopupClass;
    for (; *szDst++ = *szSrc++;)
        ;
    szSrc = TEXT("\0");
    for (; *szDst++ = *szSrc++;)
        ;
    p = (LPWORD)szDst;
    *p++ = 0;
    p = lpwAlign((LPWORD)p);
 
    int ret;
//Когда пытаюсь открыть стандартную диалоговую панель выбора цвета, попадаю сюда,
//с ошибкой "Вызвано исключение по адресу 0x76F66EB1 (comdlg32.dll) в Ex6_10.exe: //0xC0000005: нарушение прав доступа при чтении по адресу 0x00000000."
 
    ret = DialogBoxIndirect(hInstance, (LPCDLGTEMPLATE)pdlgTempl,
        hwnd, (DLGPROC)DlgProc);
    if (ret == -1)
        DWORD er = GetLastError();
    LocalFree(LocalHandle(pdlgTempl));
 
    return ret;
}

LRESULT CALLBACK DlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam)
{
    static HWND hPop;
    switch (msg)
    {
        case WM_INITDIALOG:
        {
            hPop = GetDlgItem(hDlg, ID_POPUPWINDOW);
            return TRUE;
        }
        case WM_COMMAND:
        {
            switch (LOWORD(wParam))
            {
                case IDCANCEL:
                {
                    EndDialog(hDlg, TRUE);
                    return TRUE;
                }
                default:
                    break;
            }
        }
    }
    return FALSE;
}
LRESULT CALLBACK WndProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
    static HMENU hMainMenu, hPopMenu;
    static MENUITEMINFO mii;
    switch (msg)
    {
    case WM_CREATE:
    {
        hMainMenu = CreateMenu();
        hPopMenu = CreatePopupMenu();
        SetMenu(hwnd, hMainMenu);
        mii.cbSize = sizeof(mii);
        mii.fMask = MIIM_TYPE | MIIM_STATE | MIIM_ID | MIIM_SUBMENU;
        mii.fType = MFT_STRING;
        mii.fState = MFS_ENABLED;
        mii.wID = CM_TARGET_OPEN;
        mii.hSubMenu = NULL;
        mii.dwTypeData = (LPTSTR)TEXT("Open target");
        mii.cch = _tcslen(TEXT("Open target"));
 
        InsertMenuItem(hPopMenu, CM_TARGET_OPEN, FALSE, &mii);
 
        mii.fType = MFT_SEPARATOR;
        mii.fState = MFS_ENABLED;
        mii.wID = 0;
        mii.hSubMenu = NULL;
        mii.dwTypeData = (LPTSTR)NULL;
        mii.cch = 0;
        InsertMenuItem(hPopMenu, 0, FALSE, &mii);
 
        mii.fType = MFT_STRING;
        mii.fState = MFS_ENABLED;
        mii.wID = CM_TARGET_QUIT;
        mii.hSubMenu = NULL;
        mii.dwTypeData = (LPTSTR)TEXT("Exit");
        mii.cch = _tcslen(TEXT("Exit"));
        InsertMenuItem(hPopMenu, CM_TARGET_QUIT, FALSE, &mii);
 
        mii.fType = MFT_STRING;
        mii.fState = MFS_ENABLED;
        mii.wID = 0;
        mii.hSubMenu = hPopMenu;
        mii.dwTypeData = (LPTSTR)TEXT("TARGET");
        mii.cch = _tcslen(TEXT("TARGET"));
        InsertMenuItem(hMainMenu, 0, TRUE, &mii);
 
        DrawMenuBar(hwnd);
 
        return 0;
    }
    case WM_COMMAND:
    {
        switch (LOWORD(wParam))
        {
        case CM_TARGET_OPEN:
        {
            CreateDlg(hwnd);
            return 0;
        }
        case CM_TARGET_QUIT:
        {
            DestroyWindow(hwnd);
            return 0;
        }
        }
        return 0;
    }
    case WM_DESTROY:
    {
        PostQuitMessage(0);
        return 0;
    }
    }
    return DefWindowProc(hwnd, msg, wParam, lParam);
}

LRESULT CALLBACK PopProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
    static int cxClient, cyClient;
    static HRGN hRgn[10];
    static RECT rcRgn[10];
    static HPEN hPen, hOldPen;
    const int indent = 0;
    static int radius, rad;
    static COLORREF lpCustColors[16], rgbResult = RGB(255, 255, 255);
    static COLORREF crCellTarget[10]; //Здесь цвет для каждого поля мишени
    static CHOOSECOLOR cc;
    static POINT ptCenter;
 
    switch (msg)
    {
    case WM_CREATE:
    {
        ZeroMemory(&cc, sizeof(CHOOSECOLOR));
        cc.lStructSize = sizeof(cc);
        cc.hwndOwner = hwnd;
        cc.hInstance = NULL;
        cc.rgbResult = rgbResult;
        cc.Flags = CC_ANYCOLOR | CC_RGBINIT;
 
        for (int i = 0; i < 10; ++i)
        {
            //hRgn[i] = CreateEllipticRgn(0, 0, 0, 0);
            crCellTarget[i] = GetClassLong(hwnd, GCL_HBRBACKGROUND);
        }
        return 0;
    }
    case WM_SIZE:
    {
        cxClient = LOWORD(lParam);
        cyClient = HIWORD(lParam);
        int d = (cxClient > cyClient) ? cyClient : cxClient;
        rad = radius = (d >> 1);
        rad /= 10; //Значение промежутка между эллипсами(или регионами, как удобнее).
        ptCenter.x = (cxClient >> 1);
        ptCenter.y = (cyClient >> 1);
 
        int l = (cxClient >> 1) - (d >> 1);
        int t = indent;
        int r = (cxClient >> 1) + (d >> 1);
        int b = cyClient - indent;
        for (int i = 0; i < 10; ++i)
        {
            SetRect(&rcRgn[i], l, t, r, b);
            hRgn[i] = CreateEllipticRgn(l, t, r, b);
            l += rad;
            t += rad;
            r -= rad;
            b -= rad;
        }
        return 0;
    }
    case WM_PAINT:
    {
        PAINTSTRUCT ps;
        HDC hdc = BeginPaint(hwnd, &ps);
 
        int OldBk = SetBkMode(hdc, TRANSPARENT);
        //int OldBkColor = SetBkColor(hdc, crColorRgn);
        hPen = CreatePen(PS_SOLID, 2, RGB(0, 0, 0));
        hOldPen = (HPEN)SelectObject(hdc, hPen);
        TCHAR szNum = '1';
        HBRUSH hBrush, hOldBrush;
        for (int i = 0; i < 10; ++i)
        {
            Ellipse(hdc, rcRgn[i].left, rcRgn[i].top,
                rcRgn[i].right, rcRgn[i].bottom);
            
            int OldAlign = SetTextAlign(hdc, TA_CENTER);
//Если это последняя ячейка-поле, то нужно сместить rad так чтобы 10-как была по середине 
//последнего эллипса. 
            if (i == 9)
                TextOut(hdc, rcRgn[i].left + rad,
                    ptCenter.y, (LPCTSTR)szNums[i], 2);
            else
            {
                TextOut(hdc, rcRgn[i].left + (rad >> 1),
                    ptCenter.y, (LPCTSTR)szNums[i], 1);
                TextOut(hdc, rcRgn[i].right - (rad >> 1),
                    ptCenter.y, (LPCTSTR)szNums[i], 1);
            }
 
            SetTextAlign(hdc, OldAlign);
        }
        for (int i = 0; i < 10; ++i)
        {
            hBrush = CreateSolidBrush(crCellTarget[i]);
            hOldBrush = (HBRUSH)SelectObject(hdc, hBrush);
 
            /*ExtFloodFill(hdc, (rcRgn[i].right >> 1),
                rcRgn[i].top + (rad >> 1),
                RGB(0, 0, 0), FLOODFILLBORDER);*/
 
            SelectObject(hdc, hOldBrush);
            DeleteObject(hBrush);
        }
        SetBkMode(hdc, OldBk);
        //SetBkColor(hdc, OldBkColor);
        SelectObject(hdc, hOldPen);
 
 
        EndPaint(hwnd, &ps);
        return 0;
    }
    case WM_LBUTTONDOWN:
    {
        int x = LOWORD(lParam);
        int y = HIWORD(lParam);
        int iMaxRad = radius;
        int iMinRad = iMaxRad - rad;
 
        int iPowMaxRad = iMaxRad * iMaxRad;
        int iPowMinRad = iMinRad * iMinRad;
        x -= ptCenter.x;
        y -= ptCenter.y;
        int i;
        int len = x * x + y * y;
        for (i = 0; i < 10; ++i)
        {
            if (len >= iPowMinRad && len <= iPowMaxRad)
            {
                break;
            }
            else
            {
                iMaxRad = iMinRad;
                iMinRad -= rad;
 
                iPowMaxRad = iMaxRad * iMaxRad;
                iPowMinRad = iMinRad * iMinRad;
 
            }
        }
        if (i < 10)
        {
            //Ошибка вылезает отсюда, как эта диалоговая панель связана с
            //моим шаблоном, не понимаю. 
            if (ChooseColor(&cc) == TRUE)
            {
                crCellTarget[i] = cc.rgbResult;
                InvalidateRect(hwnd, &rcRgn[0], TRUE);
            }
            
        /*else
        {
            TCHAR szStr[64];
            _stprintf_s(szStr, 64,
            TEXT("Point(x = %d, y = %d) In not a Region"),
            x, y);
            MessageBox(NULL, szStr, TEXT("Message"), MB_OK);
        }*/
        }
        return 0;
    }
        case WM_DESTROY:
        {
            for (int i = 0; i < 10; ++i)
                DeleteObject(hRgn[i]);
            //PostQuitMessage(0);
            return 0;
        }
    }
    return DefWindowProc(hwnd, msg, wParam, lParam);
}