Мютекс???

[KlIm16]

Помогите пожалуйста. Есть три потока. Нужно чтобы за их работой следил мютекс. Походу мысли правильно направленные но компилятор выдает ошибки. Подскажите что делать:confused :

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
volatile BOOL Exit;
HANDLE hMutex;
DWORD WINAPI FirstFunc (LPVOID pParam);
DWORD WINAPI SecondFunc (LPVOID pParam);
DWORD WINAPI ThirdFunc (LPVOID pParam);

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
	if (OpenMutex(SYNCHRONIZE, FALSE, "myMutex") == NULL)
{
	hMutex = CreateMutex(NULL, FALSE, "myMutex");
}
	else
	hMutex = OpenMutex(SYNCHRONIZE, FALSE, "myMutex");

HANDLE hFirst = CreateThread(NULL, 0, FirstFunc, NULL, NULL, NULL);
HANDLE hSecond = CreateThread(NULL, 0, SecondFunc, NULL, NULL, NULL);
HANDLE hThird = CreateThread(NULL, 0, ThirdFunc, NULL, NULL, NULL);
}
 DWORD WINAPI FirstFunc (LPVOID pParam)
{
	while(!Exit)
	{
if (WaitForSingleObject(hMutex, INFINITE) == WAIT_OBJECT_0)
		{
				for (int i = 0; i<= 4; i++)
					Beep(100, 250);
			ReleaseMutex(hMutex);
		}
	}
	return (0);
}
DWORD WINAPI SecondFunc (LPVOID pParam)
{
	while(!Exit)
	{
if (WaitForSingleObject(hMutex, INFINITE) == WAIT_OBJECT_0)
		{
				for (int i = 0; i<= 4; i++)
					Beep(200, 250);
			ReleaseMutex(hMutex);
		}
	}
	return (0);
}
DWORD WINAPI ThirdFunc (LPVOID pParam)
{
	while(!Exit)
	{
if (WaitForSingleObject(hMutex, INFINITE) == WAIT_OBJECT_0)
		{
				for (int i = 0; i<= 4; i++)
					Beep(300, 250);
			ReleaseMutex(hMutex);
		}
	}
	return (0);
}


//---------------------------------------------------------------------------

[Stilet]

А ошибки то какие?

[KlIm16]

[BCC32 Error] Unit1.cpp(28): E2342 Type mismatch in parameter 'lpName' (wanted 'const wchar_t *', got 'const char *')
  Full parser context
    Unit1.cpp(27): parsing: void _fastcall TForm1::Button1Click(TObject *)
[BCC32 Error] Unit1.cpp(30): E2034 Cannot convert 'char const[8]' to 'const wchar_t *'
  Full parser context
    Unit1.cpp(27): parsing: void _fastcall TForm1::Button1Click(TObject *)
[BCC32 Error] Unit1.cpp(30): E2342 Type mismatch in parameter 'lpName' (wanted 'const wchar_t *', got 'const char *')
  Full parser context
    Unit1.cpp(27): parsing: void _fastcall TForm1::Button1Click(TObject *)
[BCC32 Error] Unit1.cpp(33): E2034 Cannot convert 'char const[8]' to 'const wchar_t *'
  Full parser context

[_Bers]

если студия:

свойства проекта -> главные -> использовать мульти-байт

[KlIm16]

не нахожу такого((