Запрет запуска второй копии приложения

HANDLE mutex;//Глобальный хендл мютекса
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
//При открытии программы пытаемся создать мютекс.
//Мютекс - такой объект, который можно увидеть из любого приложения системы
mutex=CreateMutex(NULL,true,"MutexOfTheMyApplication");
DWORD result;
result = WaitForSingleObject(mutex,0);//А теперь пытаемся его захватить себе
//Если его захватить не получается, значит мютекс уже захватил кто-то другой
if(result!=WAIT_OBJECT_0)
  {
  ShowMessage("У вас уже запущена одна копия приложения");
  Application->ShowMainForm=false;
  Application->Terminate();
  }
}
 
void __fastcall TForm1::FormDestroy(TObject *Sender)
{
//При выключении программы освобождаем мютекс, если он был у нас захвачен
ReleaseMutex(mutex);
//И удаляем его.
CloseHandle(mutex);
}

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    try
    { 
        HANDLE hMutex = OpenMutex(MUTEX_ALL_ACCESS, 0, "xxxx");
        if(!hMutex)
            hMutex = CreateMutex(0, 0, "xxxx");
        else
        {
            HWND hWnd = FindWindow(0, "xxxx");
            SetForegroundWindow(hWnd);
            ShowWindow(hWnd, SW_SHOW);
            return 0;
        }
 
        Application->Initialize();
        Application->Title = "xxxx";
 
        Application->Run();
        ReleaseMutex(hMutex);
        CloseHandle(hMutex);
 
    }
    catch(Exception &exception)
    {
        Application->ShowException(&exception);
    }
    return 0;
}

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    Application->Terminate();
    return 0;
}

 
#pragma package(smart_init)
#pragma link "trayicon"
#pragma resource "*.dfm"
TForm1 *Form1;
TIniFile *Ini = new TIniFile("Source/options.ini");
//---------------------------------------------------------------------------
  
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    try
    { 
        HANDLE hMutex = OpenMutex(MUTEX_ALL_ACCESS, 0, "Project1.exe");
        if(!hMutex)
            hMutex = CreateMutex(0, 0, "Project1.exe");
        else
        {
            HWND hWnd = FindWindow(0, "Project1.exe");
            SetForegroundWindow(hWnd);
            ShowWindow(hWnd, SW_SHOW);
            return 0;
        }
 
        Application->Initialize();
        Application->Title = "Project1.exe";
 
        Application->Run();
        ReleaseMutex(hMutex);
        CloseHandle(hMutex);
 
    }
    catch(Exception &exception)
    {
        Application->ShowException(&exception);
    }
    return 0;
}

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Unit.cpp", FormMain);
//---------------------------------------------------------------------------
const char *NamedMutex= "MySuperPuper{4FC5BAAF-BB97-4540-8BB5-19BC9CCDB00B}";
 
HANDLE CheckInstance(const char *Name)
{
    HANDLE Mutex = CreateMutex(NULL, true,Name);
    int er = GetLastError();
    if (er) return 0;
    return Mutex;
}
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    HANDLE Mutex = CheckInstance(NamedMutex);
    if (!Mutex) {
    Application->MessageBox("Another imstance of \"MySuperPuper\" is running.",
                            "MySuperPuper",
                            MB_OK | MB_ICONINFORMATION);
    ReleaseMutex(Mutex);
// Знайшлосн відкрите вікно - виводимо його на перній план
    HWND hWnd = FindWindow( 0, "MySuperPuper");
    SetForegroundWindow(hWnd);
return 1;
}
    try
    {
         Application->Initialize();
         Application->Title = "MySuperPuper";
         Application->CreateForm(__classid(TFormMain), &FormMain);
         Application->Run();
    }
    catch (Exception &exception)
    {
         Application->ShowException(&exception);
    }
    catch (...)
    {
         try
         {
             throw Exception("");
         }
         catch (Exception &exception)
         {
             Application->ShowException(&exception);
         }
    }
    return 0;
}
//---------------------------------------------------------------------------

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "trayicon"
#pragma resource "*.dfm"
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", FormMain);//Здесь я добавил 1 к unit.cpp а толку нет:(
//---------------------------------------------------------------------------
TForm1 *Form1;
TIniFile *Ini = new TIniFile("Source/options.ini");
//---------------------------------------------------------------------------
const char *NamedMutex= "MySuperPuper{4FC5BAAF-BB97-4540-8BB5-19BC9CCDB00B}";
 
HANDLE CheckInstance(const char *Name)
{
        HANDLE Mutex = CreateMutex(NULL, true,Name);
        int er = GetLastError();
        if (er) return 0;
        return Mutex;
}
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        HANDLE Mutex = CheckInstance(NamedMutex);
        if (!Mutex) {
        Application->MessageBox("Another imstance of \"Project1.exe\" is running.",
                                                    "Project1.exe",
                                                        MB_OK | MB_ICONINFORMATION);
        ReleaseMutex(Mutex);
// Çíàéøëîñí â³äêðèòå â³êíî - âèâîäèìî éîãî íà ïåðí³é ïëàí
        HWND hWnd = FindWindow( 0, "Project1.exe");
        SetForegroundWindow(hWnd);
return 1;
}
    try
    {
         Application->Initialize();
         Application->Title = "Project1.exe";
         Application->CreateForm(__classid(TFormMain), &FormMain);
         Application->Run();
    }
    catch (Exception &exception)
    {
         Application->ShowException(&exception);
    }
    catch (...)
    {
         try
         {
             throw Exception("Project1.exe");
         }
         catch (Exception &exception)
         {
             Application->ShowException(&exception);
         }
    }
    return 0;
}
//------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    CreateMutex( NULL, true, "MySuperProgram" );
        if ( GetLastError() == ERROR_ALREADY_EXISTS )
        {
            exit(0);
        }
}