🚀 go-pugleaf

"Remy Lebeau \(TeamB\)" <gambit47.no.spam@no.spam.yahoo.com> wrote:
>
>>     ReleaseMutex(handle);
>
>You should be using CloseHandle() instead.

From: http://www.bcbdev.com/faqs/faq74.htm

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    // Attempt to create a mutex. If the mutex already existed,
    // GetLastError will return ERROR_ALREADY_EXISTS
    HANDLE hInstanceMutex = ::CreateMutex(NULL,TRUE, "PROJECT1");
    if(GetLastError() == ERROR_ALREADY_EXISTS)
    {
        if(hInstanceMutex)
            CloseHandle(hInstanceMutex);
        return 0;
    }

    try
    {
         Application->Initialize();
         Application->CreateForm(__classid(TForm1), &Form1);
         Application->Run();
    }
    catch (Exception &exception)
    {
         Application->ShowException(&exception);
    }

    ReleaseMutex(hInstanceMutex);
    CloseHandle(hInstanceMutex);
    return 0;
}

You can see that last few lines does both. Comments?

~ JD