Не создается главное окно при запуске программы, Win32 API

#include "stdafx.h"
#include "Курсовая.h"
 
fstream File;
 
#define MAX_LOADSTRING 100
DWORD Gamma[]={ RGB(34,244,115),
                RGB(0,20,250),
                RGB(100,50,200),
                RGB(200,200,50),
                RGB(100,150,200),
                RGB(200,50,50),
                RGB(150,30,89)};
SpecInfo Info;
 
// Глобальные переменные:
HINSTANCE hInst;                                // текущий экземпляр
TCHAR szTitle[MAX_LOADSTRING];                  // Текст строки заголовка
TCHAR szWindowClass[MAX_LOADSTRING];            // имя класса главного окна
 
// Отправить объявления функций, включенных в этот модуль кода:
ATOM                MyRegisterClass(HINSTANCE hInstance);
BOOL                InitInstance(HINSTANCE, int);
LRESULT CALLBACK    WndProc(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK    About(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK    InfoDlgProc(HWND,UINT, WPARAM, LPARAM);
INT_PTR CALLBACK    InPutDlgProc(HWND,UINT ,WPARAM,LPARAM);
 
 
int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
    UNREFERENCED_PARAMETER(hPrevInstance);
    UNREFERENCED_PARAMETER(lpCmdLine);
 
    // TODO: разместите код здесь.
    MSG msg;
    HACCEL hAccelTable;
 
    // Инициализация глобальных строк
    LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
    LoadString(hInstance, IDC_MY, szWindowClass, MAX_LOADSTRING);
    MyRegisterClass(hInstance);
 
    // Выполнить инициализацию приложения:
    if (!InitInstance (hInstance, nCmdShow))
    {
        return FALSE;
    }
 
    hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_MY));
 
    // Цикл основного сообщения:
    while (GetMessage(&msg, NULL, 0, 0))
    {
        if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
        {
            TranslateMessage(&msg);
            DispatchMessage(&msg);
        }
    }
 
    return (int) msg.wParam;
}
 
 
 
//
//  ФУНКЦИЯ: MyRegisterClass()
//
//  НАЗНАЧЕНИЕ: регистрирует класс окна.
//
//  КОММЕНТАРИИ:
//
//    Эта функция и ее использование необходимы только в случае, если нужно, чтобы данный код
//    был совместим с системами Win32, не имеющими функции RegisterClassEx'
//    которая была добавлена в Windows 95. Вызов этой функции важен для того,
//    чтобы приложение получило "качественные" мелкие значки и установило связь
//    с ними.
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
    WNDCLASSEX wcex;
 
    wcex.cbSize = sizeof(WNDCLASSEX);
 
    wcex.style          = CS_HREDRAW | CS_VREDRAW;
    wcex.lpfnWndProc    = WndProc;
    wcex.cbClsExtra     = 0;
    wcex.cbWndExtra     = 0;
    wcex.hInstance      = hInstance;
    wcex.hIcon          = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_MY));
    wcex.hCursor        = LoadCursor(NULL, IDC_ARROW);
    wcex.hbrBackground  = (HBRUSH)(COLOR_WINDOW+1);
    wcex.lpszMenuName   = MAKEINTRESOURCE(IDC_MY);
    wcex.lpszClassName  = szWindowClass;
    wcex.hIconSm        = LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));
 
    return RegisterClassEx(&wcex);
}
 
//
//   ФУНКЦИЯ: InitInstance(HINSTANCE, int)
//
//   НАЗНАЧЕНИЕ: сохраняет обработку экземпляра и создает главное окно.
//
//   КОММЕНТАРИИ:
//
//        В данной функции дескриптор экземпляра сохраняется в глобальной переменной, а также
//        создается и выводится на экран главное окно программы.
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;
 
   hInst = hInstance; // Сохранить дескриптор экземпляра в глобальной переменной
 
    hWnd = CreateWindow(szWindowClass, szTitle,WS_OVERLAPPED|WS_CAPTION|WS_MINIMIZEBOX|WS_SYSMENU,
      100, 200, 900, 390, NULL, NULL, hInstance, NULL);
 
   if (!hWnd)
   {
      return FALSE;
   }
 
   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);
 
   return TRUE;
}
 
//
//  ФУНКЦИЯ: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  НАЗНАЧЕНИЕ:  обрабатывает сообщения в главном окне.
//
//  WM_COMMAND  - обработка меню приложения
//  WM_PAINT    -Закрасить главное окно
//  WM_DESTROY   - ввести сообщение о выходе и вернуться.
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    int wmId, wmEvent;
    PAINTSTRUCT ps;
    HDC hdc;
    
    static int  vColor = 0;
    static HMENU hMenu = GetMenu(hWnd);
 
    switch (message)
    {
    case WM_COMMAND:
        wmId    = LOWORD(wParam);
        wmEvent = HIWORD(wParam);
        // Разобрать выбор в меню:
        switch (wmId)
        {
        case IDM_INFO:
            DialogBox(hInst, MAKEINTRESOURCE(IDD_INFO), hWnd, InfoDlgProc);
            break;
        case ID_SER_FEO:
            vColor = 0;
            CheckMenuRadioItem(GetSubMenu(hMenu,1),ID_SER_FEO,ID_ZEL_CHER,LOWORD(wParam),MF_BYCOMMAND);
            break;
        case ID_JELT_BEJ:
            vColor = 1;
            CheckMenuRadioItem(GetSubMenu(hMenu,1),ID_SER_FEO,ID_ZEL_CHER,LOWORD(wParam),MF_BYCOMMAND);
            break;
        case ID_KRAS_SIN:
            vColor = 2;
            CheckMenuRadioItem(GetSubMenu(hMenu,1),ID_SER_FEO,ID_ZEL_CHER,LOWORD(wParam),MF_BYCOMMAND);
            break;
        case ID_ZEL_CHER:
            vColor = 3;
            CheckMenuRadioItem(GetSubMenu(hMenu,1),ID_SER_FEO,ID_ZEL_CHER,LOWORD(wParam),MF_BYCOMMAND);
            break;
        case IDM_ABOUT:
            DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
            break;
        case IDM_EXIT:
            DestroyWindow(hWnd);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
        }
        InvalidateRect(hWnd,NULL,TRUE);
        break;
    case WM_PAINT:
        hdc = BeginPaint(hWnd, &ps);
 
        RECT rect;
        GetClientRect(hWnd,&rect);
        DrawShip(hWnd,hdc,rect,vColor);
        DrawText(hdc,rect,Gamma);
 
        EndPaint(hWnd, &ps);
        break;
 
    case WM_CREATE:
        {
        CheckMenuRadioItem(GetSubMenu(hMenu,1),ID_SER_FEO,ID_ZEL_CHER,ID_SER_FEO,MF_BYCOMMAND);
        File.imbue(locale(".1251"));
        File.open(FILENAME, ios::in|ios::out|ios::binary);
        if (!File)
        {
            MessageBox((HWND)GetModuleHandle(NULL),L"Файл не создан!",NULL,MB_OK);
            exit(0);
        }
        File.close();
        File.open(FILENAME, ios::in|ios::out|ios::binary);
        if (!File)
        {
            MessageBox((HWND)GetModuleHandle(NULL),L"Невозможно открыть файл!",NULL,MB_OK);
            exit(0);
        }
        }
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProc(hWnd, message, wParam, lParam);
    }
    return 0;
}
 
// Обработчик сообщений для окна "О программе".
INT_PTR CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
    UNREFERENCED_PARAMETER(lParam);
    switch (message)
    {
    case WM_INITDIALOG:
        return (INT_PTR)TRUE;
 
    case WM_COMMAND:
        if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL)
        {
            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;
        }
        break;
    }
    return (INT_PTR)FALSE;
}
 
// Обработчик сообщение для окна "Информация о специалистах"
INT_PTR CALLBACK InfoDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
    BOOL DlgTrue;
    static HWND hListBox;
    UNREFERENCED_PARAMETER(lParam);
    switch (message)
    {
    case WM_INITDIALOG:
        hListBox = GetDlgItem(hDlg,IDC_LIST1);
        return (INT_PTR)TRUE;
 
    case WM_COMMAND:
        switch(LOWORD(wParam))
        {
        case IDC_ADD_INFO:
            DlgTrue = DialogBox(hInst,MAKEINTRESOURCE(IDD_INPUT),hDlg,InPutDlgProc);
            
            if(DlgTrue)
            {
                SendMessage(hListBox,LB_ADDSTRING,0,(LPARAM)Info.spec);
                File.seekg(0,ios::end);
                write(File,Info);
            }
            break;
        //case IDC_CHANGE_INFO:
        //  DialogBox(hInst,MAKEINTRESOURCE(IDD
        //  break;
        case IDOK:
            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;
        case IDCANCEL:
            EndDialog(hDlg,LOWORD(wParam));
        }
        break;
        
    }
    return (INT_PTR)FALSE;
}
 
INT_PTR CALLBACK InPutDlgProc (HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
    UNREFERENCED_PARAMETER(lParam);
    switch (message)
    {
    case WM_INITDIALOG:
        return (INT_PTR)TRUE;
 
    case WM_COMMAND:
        switch(LOWORD(wParam))
        {
        case IDOK:
            GetInfo(hDlg);
            break;
        case IDCANCEL:
            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;
        }
        break;
        
    }
    return (INT_PTR)FALSE;
}