CreateFileMapping((HANDLE)0xFFFFFFFF,NULL,PAGE_READWRITE,0,1024,"SharedExtraPro");
이렇게 하시면 되겟네요

홍지곤 님이 쓰신 글 :
:  안녕하세요! Magic.홍지곤 입니다.
:
:  델파이로 작성된 중복 방지 소스 입니다.
:
:  빌더로 컨버팅 해서 사용하려고 하는데요...
: 
:  어떻게 사용해야 할지 잘 모르겠습니다..
:
:  컨버팅좀 부탁드립니다.
:
:
: 아래 부분을 메인폼 하단에 넣으라고 되어 있네요!
: //---------------이부분 입니다.------------------
: initialization
: begin
: CreateFileMapping ($FFFFFFFF, nil, PAGE_READWRITE, 0, 1024, 'SharedExtraPro');
:
: if GetLastError = ERROR_ALREADY_EXISTS then halt;
: end;
:
: //-------------------------------------------
: 위에 부분을 델파이로 코딩 해봤는데 잘 됩니다..
:
: 빌더로 어떻게 적용해야 하는지요?
: